隨筆 - 312, 文章 - 14, 評論 - 1393, 引用 - 0
          數據加載中……

          判斷ShellExecute函數是否執行完一個程序的方法

          本文為原創,如需轉載,請注明作者和出處,謝謝!

              ShellExecute是windows的API函數,功能是執行可執行文件(exe)或任何關聯文件(doc、txt、xls等)。但ShellExecute是異步執行的,也就是說,不管執行的程序是否成功運行,運行的時間是長是短,ShellExecute函數都會立即返回。這樣雖然可以很好地完成執行程序的工作,但卻會給后續的工作帶來麻煩。
              例如,當調用bcp命令向sql server導入數據后,在DBGrid中顯示這些導入的數據。如果使用ShellExecute來直接執行bcp命令,很可能會在數據未完全導入時顯示DBGrid。這樣就會造成數據顯示不完整或根本顯示不出來數據。
              要解決這個問題的方法就是使ShellExecute變成同步直接的,解決方法很多,例如,可以判斷彈出的控制臺窗口是否已關閉來確定bcp是否執行完。但這樣做還會有一些問題,例如,如果執行根本沒有彈出窗口的程序,那這種方法就不起作用了。而本書給出了另一種比較通用的方法。基本原理是利用了批處理文件的特性。雖然ShellExecute是異步執行的,但批處理是同步執行的,也就是在.bat、.cmd、.sh(linux/unix)中的命令是一個接一個順序執行的。因此,我們可以采用在批處理文件中調用bcp命令的方法來實現同步調用。也就是說,可以在調用bcp之前,先中當前目錄中建立一個文件或空目錄,然后調用bcp,最后再刪除這個文件或目錄。這樣可以通過判斷文件或目錄是否存在來確定bcp是否執行完成。為了確保在調用ShellExecute之前文件一定存在,可以在調用ShellExecute之前在程序中建立一個文件,在批處理中刪除這個文件。下面是一個批處理文件的例子。

          批處理文件名:bcp.cmd
          set path = <bcp.exe的本地路徑>/bcp.exe
          bcp 
          %1 in %2 %3 %4 其他命令行參數
          del temp.txt

          假設我們使用delphi來通過ShellExecute函數來運行bcp命令,代碼如下:

          FileCreate("temp.txt");
          ShellExecute(,
          "bcp.cmd",,);
          while true do
          begin
             
          if temp.txt不存在 then
             begin 
                
          //  bcp已成功執行
                 break;
             end;
          end;
          //  后續的處理代碼





          Android開發完全講義(第2版)(本書版權已輸出到臺灣)

          http://product.dangdang.com/product.aspx?product_id=22741502



          Android高薪之路:Android程序員面試寶典 http://book.360buy.com/10970314.html


          新浪微博:http://t.sina.com.cn/androidguy   昵稱:李寧_Lining

          posted on 2010-03-27 15:14 銀河使者 閱讀(2807) 評論(2)  編輯  收藏 所屬分類: delphi 原創

          評論

          # re: 判斷ShellExecute函數是否執行完一個程序的方法  回復  更多評論   

          謝謝,學習一下先
          2010-03-27 22:11 | 不銹鋼水箱

          # re: 判斷ShellExecute函數是否執行完一個程序的方法[未登錄]  回復  更多評論   

          perfect

          我轉載了,并說明出處。
          2010-07-13 13:26 | bird
          主站蜘蛛池模板: 黄大仙区| 土默特左旗| 贵南县| 左贡县| 灵丘县| 津南区| 政和县| 尼勒克县| 黑山县| 道孚县| 吉水县| 红安县| 米林县| 荃湾区| 贺兰县| 公安县| 株洲市| 太和县| 溧水县| 海林市| 静宁县| 娄底市| 安远县| 渭源县| 京山县| 海盐县| 武川县| 凌云县| 德安县| 玛多县| 苏尼特左旗| 东丽区| 高安市| 横山县| 凌海市| 宿州市| 鹤峰县| 大足县| 天峨县| 金阳县| 长宁县|