国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 開發 > 綜合 > 正文

怎樣在PB中調用外部程序并判斷其運行結束?

2024-07-21 02:10:05
字體:
來源:轉載
供稿:網友

在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: ybase/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("提示信息", "備份完成!")
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 石柱| 云林县| 定西市| 阳泉市| 西城区| 景泰县| 禄丰县| 曲沃县| 天全县| 九江县| 大丰市| 蚌埠市| 方山县| 房产| 南城县| 保德县| 高尔夫| 什邡市| 扶绥县| 大余县| 泸溪县| 马边| 偏关县| 南漳县| 雷州市| 台东市| 新绛县| 遂昌县| 德格县| 栾川县| 榆中县| 九台市| 松溪县| 漯河市| 淅川县| 兖州市| 合肥市| 郧西县| 页游| 定安县| 大名县|