PB10.5操纵网络连接源码
PB10.5开发的操纵网络连接的源代码,可以实现:启动、关闭、修复、桥接、创建快捷方式、删除、属性等功能
PB9通用右键菜单演示程序
PB9开发的通用右键菜单,内带m_general菜单对象,预置20个菜单项
pb9 按F3将文本框内容模拟输入到其他程序中
pb9 按F3将文本框内容模拟输入到其他程序中
pb9 按F3将文本框内容复制到其他程序中
pb9 按F3将文本框内容复制到其他程序中
pb最好用的bmp图片转jpg图片dll(ImageUtils.dll)
pb最好用的bmp图片转jpg图片dll(ImageUtils.dll)
PB 函数声明
function Boolean Bmp2Jpgzzp(ref string bmp_name,ref string jpg_name) library 'ImageUtils.dll' alias for 'Bmp2Jpg'
function Boolean Jpg2Bmpzzp(ref string bmp_name,ref string jpg_name) library 'ImageUtils.dll' alias for 'Jpg2Bmp'
PB9将数据窗口导出到一个EXCEL文件的多个工作表中
PB9将数据窗口导出到一个EXCEL文件的多个工作表中
PB9使用api实现ftp查看与下载的源码
PB9使用api实现ftp查看与下载的源码
PB 显示icon文件,文件、文件夹默认图标
pb 使用SHGetFileInfo函数,提取系统文件图标,并显示在界面上
PB-mdi窗口标签切换示例
PB-mdi窗口标签切换示例
简单的一个使得打开的sheet窗口具有标签切换功能的示例
pb操作系统服务——重启MSSQLSERVER
pb操作系统服务——重启MSSQLSERVER
主要是可以重启MSSQLSERVER
FUNCTION ulong OpenSCManager(ref string lpMachineName,ref string lpDatabaseName,ulong dwDesiredAccess) LIBRARY "advapi32.dll" ALIAS FOR "OpenSCManagerA"
FUNCTION ulong CreateService(ulong hSCManager,ref string lpServiceName,ref string lpDisplayName,ulong dwDesiredAccess,ulong dwServiceType,ulong dwStartType,ulong dwErrorControl,ref string lpBinaryPathName,ref string lpLoadOrderGroup,ref ulong lpdwTagId,ref string lpDependencies,ref string lp,ref string lpPassword) LIBRARY "advapi32.dll" ALIAS FOR "CreateServiceA"
FUNCTION ulong DeleteService(ulong hService) LIBRARY "advapi32.dll"
FUNCTION ulong CloseServiceHandle(ulong hSCObject) LIBRARY "advapi32.dll"
FUNCTION ulong OpenService(ulong hSCManager,ref string lpServiceName,ulong dwDesiredAccess) LIBRARY "advapi32.dll" ALIAS FOR "OpenServiceA"
FUNCTION ulong QueryServiceConfig(ulong hService,ref QUERY_SERVICE_CONFIG lpServiceConfig,ulong cbBufSize,ref ulong pcbBytesNeeded) LIBRARY "advapi32.dll" ALIAS FOR "QueryServiceConfigA"
FUNCTION ulong QueryServiceConfig(ulong hService,ref query1 lpServiceConfig,ulong cbBufSize,ref ulong pcbBytesNeeded) LIBRARY "advapi32.dll" ALIAS FOR "QueryServiceConfigA"
FUNCTION ulong QueryServiceStatus(ulong hService,ref SERVICE_STATUS lpServiceStatus) LIBRARY "advapi32.dll"
FUNCTION ulong ControlService(ulong hService,ulong dwControl,ref SERVICE_STATUS lpServiceStatus) LIBRARY "advapi32.dll"
FUNCTION ulong StartService(ulong hService,ulong dwNumServiceArgs,ulong lpServiceArgVectors) LIBRARY "advapi32.dll" ALIAS FOR "StartServiceA"
FUNCTION ulong ChangeServiceConfig(ulong hService,ulong dwServiceType,ulong dwStartType,ulong dwErrorControl,ref string lpBinaryPathName,ref string lpLoadOrderGroup,ref ulong lpdwTagId,ref string lpDependencies,ref string lpServiceStartName,ref string lpPassword,ref string lpDisplayName) LIBRARY "advapi32.dll" ALIAS FOR "ChangeServiceConfigA"
FUNCTION ulong EnumDependentServices(ulong hService,ulong dwServiceState,ref ENUM_SERVICE_STATUS lpServices,ulong cbBufSize,ref ulong pcbBytesNeeded,ref ulong lpServicesReturned) LIBRARY "advapi32.dll" ALIAS FOR "EnumDependentServicesA"
PB操作系统服务的简单例子
PB操作系统服务的简单例子,目前仅包含判断服务存在,取服务状态,停止和启动服务等
这个链接下,有功能较强的版本
http://download.csdn.net/source/3557823
FUNCTION ulong OpenSCManager(ref string lpMachineName,ref string lpDatabaseName,ulong dwDesiredAccess) LIBRARY "advapi32.dll" ALIAS FOR "OpenSCManagerA"
FUNCTION ulong CreateService(ulong hSCManager,ref string lpServiceName,ref string lpDisplayName,ulong dwDesiredAccess,ulong dwServiceType,ulong dwStartType,ulong dwErrorControl,ref string lpBinaryPathName,ref string lpLoadOrderGroup,ref ulong lpdwTagId,ref string lpDependencies,ref string lp,ref string lpPassword) LIBRARY "advapi32.dll" ALIAS FOR "CreateServiceA"
FUNCTION ulong DeleteService(ulong hService) LIBRARY "advapi32.dll"
FUNCTION ulong CloseServiceHandle(ulong hSCObject) LIBRARY "advapi32.dll"
FUNCTION ulong OpenService(ulong hSCManager,ref string lpServiceName,ulong dwDesiredAccess) LIBRARY "advapi32.dll" ALIAS FOR "OpenServiceA"
FUNCTION ulong QueryServiceConfig(ulong hService,ref QUERY_SERVICE_CONFIG lpServiceConfig,ulong cbBufSize,ref ulong pcbBytesNeeded) LIBRARY "advapi32.dll" ALIAS FOR "QueryServiceConfigA"
FUNCTION ulong QueryServiceConfig(ulong hService,ref query1 lpServiceConfig,ulong cbBufSize,ref ulong pcbBytesNeeded) LIBRARY "advapi32.dll" ALIAS FOR "QueryServiceConfigA"
FUNCTION ulong QueryServiceStatus(ulong hService,ref SERVICE_STATUS lpServiceStatus) LIBRARY "advapi32.dll"
FUNCTION ulong ControlService(ulong hService,ulong dwControl,ref SERVICE_STATUS lpServiceStatus) LIBRARY "advapi32.dll"
FUNCTION ulong StartService(ulong hService,ulong dwNumServiceArgs,ulong lpServiceArgVectors) LIBRARY "advapi32.dll" ALIAS FOR "StartServiceA"
FUNCTION ulong ChangeServiceConfig(ulong hService,ulong dwServiceType,ulong dwStartType,ulong dwErrorControl,ref string lpBinaryPathName,ref string lpLoadOrderGroup,ref ulong lpdwTagId,ref string lpDependencies,ref string lpServiceStartName,ref string lpPassword,ref string lpDisplayName) LIBRARY "advapi32.dll" ALIAS FOR "ChangeServiceConfigA"
FUNCTION ulong EnumDepend
pb半透明弹窗示例(右下角弹出提示窗口)
pb9 开发的简单软件弹窗(半透明)功能,可以自动在右下角弹出提示窗口
listview、treeview添加背景图(防挤压图片)
listview、treeview添加背景图(防挤压图片)
利用api函数在treeview的pbm_paint事件中进行处理,可以解决在树的子项展开,收缩时候以及拖动滚动条时挤压图形的问题,在pbm_paint事件中由于做了多次的位图处理操作,在配置较低的机器上可能会有延迟的现象,所以treeview控件的长度和宽度不要太大,子项的数目应该控制在合理的范围内
PB串口通讯源码-API
PB串口通讯源码-API
利用api实现
Function Boolean CloseHandle(ulong hObject ) Library "kernel32.dll"
FUNCTION boolean ReadFile(ulong fhand, ref string lpbuffer, ulong numbyte, ref ulong bytesread, ulong lpover) LIBRARY "kernel32.dll"
FUNCTION ulong CreateFileA(ref string fname, ulong f_access, ulong f_share, ulong f_sec, ulong f_create, ulong f_flag, ulong f_attrib) LIBRARY "kernel32.dll"
Function Boolean WriteFile(uLong handle,ref string lpbuffer,ulong numbytes, ref ulong bytesread, ulong lpOverLaped) Library "Kernel32.dll"
Function Boolean GetCommProperties(ulong hFile,ref COMMPROP lpCommProp ) Library "Kernel32.dll"
Function Boolean BuildCommDCBA(ref string lpDef,ref DCB lpDCB ) Library "Kernel32.dll"
Function Boolean SetCommState(ulong hCommDev,ref DCB lpdcb ) Library "Kernel32.dll"
Function Boolean GetCommState(ulong hCommDev,ref DCB lpdcb ) Library "Kernel32.dll"
Function ulong GetLastError() Library "Kernel32.dll"
Function Boolean SetCommTimeouts(ulong hCommDev, ref COMMTIMEOUTS lpctmo ) Library "Kernel32.dll"
Function Boolean PurgeComm(ulong hCommDev, ulong fdwAction ) Library "Kernel32.dll"
EQ2008动态库开发实例 —— PB版
EQ2008动态库开发实例 —— PB版
PB9做的一个全新的触摸屏系统
PB9做的一个全新的触摸屏系统(原源码为PB6.5的,现将它升级为PB9的)
PB9做的局域网搜索器
PB9做的局域网搜索器,以及检测是否连接外网
PB从剪贴板取图并保存
PB从剪贴板取图并保存,是我的博客上的博文(http://blog.csdn.net/yyoinge/article/details/6316874)的对应例程
PB 数据窗口(控件、窗口)截图、图片尺寸更改、画线保存
PB9开发的控件截图功能,具体包括如下功能:
1、数据窗口(控件、窗口)截图:无论控件及窗口是否被遮挡还是显示在屏幕外,都可以进行截图, 截图后将图片保存到本地磁盘
2、图片尺寸更改:将图片大小更改为任意大小并保存到本地磁盘
3、画线保存:专门为CSDN上的AndriyChoi兄弟开发的功能
pb开发的图片尺寸缩小程序
pb开发的图片尺寸缩小程序
可以将大图缩放为小图,方便用于界面显示
可以将图片缩小、放大、拉伸为任意大小的图片,并存储为bmp文件
PB9输入法自动切换
pb9写的输入法自动切换示例
用于控件焦点切换时自适应输入法
PB自动切换屏幕分辨率
pb自动切换屏幕分辨率
切换到软件就改变分辨率
切换出来就还原分辨率
需要编译后才能实现“切换出来就还原分辨率”的效果
pb利用datawindow倒计时
仅利用数据窗口进行倒计时显示,在开始按钮中自己设置倒计时时间(以秒为单位)
PB自动下拉模糊检索
pb自动下拉模糊检索使用datawindow实现,调用showlist = yes 方法,可以自适应宽度
pb取未用ID,解决 jsnch 的 “查询未使用产品号问题”
pb取未用ID,解决 jsnch 的 “查询未使用产品号问题”
PB源码查找与替换、PB代码行数统计
PB源码查找与替换、PB代码行数统计
PB9写的,使用ORCA对pb源码进行相关操作
PB自动下拉模糊检索
PB自动下拉模糊检索
datawindow实现 showlist=yes
pb自动下拉模糊检索
pb自动下拉模糊检索
使用datawindow实现,调用showlist = yes 方法,
可以自适应宽度
pb中API函数的参考查询软件
pb中API函数的参考查询软件 使用与PB
PB API文件属性设置
SetFileAttributesA和
GetFileAttributesA操作文件属性