国产探花免费观看_亚洲丰满少妇自慰呻吟_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("提示信息", "備份完成!")
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 古蔺县| 咸丰县| 隆林| 淮南市| 宜黄县| 石棉县| 游戏| 车致| 赤峰市| 神木县| 安化县| 叶城县| 韶关市| 乐山市| 大新县| 昌黎县| 惠安县| 钦州市| 东平县| 天柱县| 尉犁县| 鹤峰县| 长治县| 边坝县| 扶沟县| 通州市| 临泽县| 弋阳县| 楚雄市| 龙南县| 乌苏市| 萨嘎县| 阿克苏市| 彰武县| 泰和县| 庆元县| 五家渠市| 徐汇区| 曲周县| 通州区| 北安市|