hur.cn - 华软网

 热门搜索

一个很强很强很强很强很强的问题!!!!

  作者:未知    来源:网络    更新时间:2019/1/25
PB怎样能关闭外部程序
PB怎样能关闭已开发的端口
PB怎样能关闭内存中已启用的东西!!!!
------华软网友回答------
没找到啊~~求你们了!!!!真的!!!
------华软网友回复------
太强了,答不上~
------华软网友回复------
也许调用。。。。
------华软网友回复------
先查找已经打开程序的句柄,然后能够和PB写的程序绑定,当PB写的程序关闭的时候,该程序就一起关闭。

需要用到API函数,也是对照简单的。
有很多的地方都能够看到这样的例子。

用PB关闭已开发的端口,一样的需要调用API函数,
VBVC中一样,只是VBVC有些是封装了。
------华软网友回复------
调用外部VC程序吧
------华软网友回复------
在PB中调用外部程序并判断其运行结束
在PB中经常要调用外部程序并期待此程序运行结束后显示相关信息。如咱们要备份Adaptive Server Anywhere 6.0数据库,在备份结束后显示"备份完成!"的提醒信息,如果在调用备份程序dbbackup后马上用messagebox显示提醒信息,那么程序运行时则会出现这类情况: dbbackup备份程序还在运行,"备份完成!"的提醒就已经显示了,显然不合适咱们的设想。对于这类情况,咱们能够借助API函数FindWindowA()、IsWindow()和PB自身函数yield()来解决。 
声明API函数:
Function long FindWindowA (String lpClassName , String lpWindowName ) Library "user32.dll" 
Function boolean IsWindow (Long hwnd ) Library "user32.dll"

调用:
ulong ll_handle
int li_loop

SetPointer(HourGlass!) //设置鼠标指针
//运行备份数据库程序dbbackup,并使其最小化
run("dbbackup -c ~"uid=dba;pwd=sql; dbf=D:\Sybase\Adaptive Server Anywhere 6.0\asademo.db~" d:\backup", Minimized!)

ll_handle = 0
//循环至dbbackup窗口打开
Do While ll_handle = 0
ll_handle = FindWindowA("tty","dbbackup")
yield() //
loop 
//期待dbbackup窗口关闭
Do While isWindow(ll_handle)
Yield()
Loop
//应用执行完成
MessageBox("提醒信息", "备份完成!")
------华软网友回复------
调用外部函数
Function Long GetCurrentProcessId() Library "kernel32.dll" 
Function Long CreateToolhelp32Snapshot(Long Flags,Long ProcessId) Library "kernel32.dll" 
Function Integer Process32First(uLong Snapshot,ref s_process process) Library "kernel32.dll" 
Function Integer Process32Next(uLong Snapshot,ref s_process process) Library "kernel32.dll" 
Function long CreateFileA(ref string fname, ulong f_access, ulong f_share, ulong f_sec,ulong f_create, ulong f_attrib, ulong f_flag) LIBRARY "kernel32.dll"
Function Boolean CloseHandle(ulong  hObject )  Library "kernel32.dll" 
Function Long GetLastError() Library "kernel32"

------华软网友回复------
谢谢谢谢!!!!

我解决了,上面的很有帮助,如果可能的话,我会把原资料给发上来,我做了一个定时开启/关闭外部程序的东东,很好用的!真的!!!
------华软网友回复------
学习...
------华软网友回复------
建议楼主改下题目
方便以后来查找
------华软网友回复------
mark。。。      
华软声明:本内容来自网络,如有侵犯您版权请来信指出,本站立即删除。