<textarea class="cpp" rows="10" cols="60" name="code"> int i=0; HANDLE handle; do { ShellExecute(NULL,"open","C:\\Modeltech_6.0c\\win32\\modelsim.exe", "-do resimscript1.do" ,"C:\\Modeltech_6.0c\\examples\\wb_synthesis_2", SW_HIDE ); n=WaitForSingleObject(handle,INFINITE); i ; }while(i<2); </textarea><br />
我想要利用BCB依序開啟外部執行檔兩次,但是這樣的寫法是一次開兩個外部執行檔
如何可以完成自動依序開兩~N個外部執行檔!(不使用ShowMessage!!)

您是要第1個開啟的檔案關閉了, 程式自動開啟第2個;
第2個開啟的檔案關閉了, 程式自動開啟第3個嗎 ? 在程式中間檢查記憶體中是否某程式是否存在即可
執行第1個程式
一值檢查記憶體中是否第1個程式仍存在, 不存在則執行第2個

...

------
能力不足，求助於人；有能力時，幫幫別人；如果您滿意答覆，請適時結案！

子曰：問有三種，不懂則問，雖懂有疑則問，雖懂而想知更多則問！

===================引 用 文 章===================
您是要第1個開啟的檔案關閉了, 程式自動開啟第2個;
第2個開啟的檔案關閉了, 程式自動開啟第3個嗎 ? 在程式中間檢查記憶體中是否某程式是否存在即可
執行第1個程式
一值檢查記憶體中是否第1個程式仍存在, 不存在則執行第2個

...
是的,等第一個開啟的檔案關閉了在開第二個,
那檢查記憶體 第一個程式是否關閉的程式碼應該如何寫?

[發表] 顯示目前執行的程序(Process List) (含Source Code)
http://delphi.ktop.com.tw/board.php?cid=31&fid=79&tid=86821

------
能力不足，求助於人；有能力時，幫幫別人；如果您滿意答覆，請適時結案！

子曰：問有三種，不懂則問，雖懂有疑則問，雖懂而想知更多則問！

可否把它改成BCB的語法跟加上註解,因為我是新手,
看不太懂Delphi = =

可以改, 但是小弟沒那麼熟 BCB, 而且這需要時間
建議您自己改看看, 有問題再提出來會比較快, 不然您就要慢慢等
===================引 用 文 章===================
可否把它改成BCB的語法跟加上註解,因為我是新手,
看不太懂Delphi = =

------
能力不足，求助於人；有能力時，幫幫別人；如果您滿意答覆，請適時結案！

子曰：問有三種，不懂則問，雖懂有疑則問，雖懂而想知更多則問！

為什麼抓取執行中程式在記憶體位址 需要區別WINDOWS類型呢?

因為不同作業系統 位址不同?

> 為什麼抓取執行中程式在記憶體位址 需要區別WINDOWS類型呢?
因為某些 API 只能在某些作業系統中使用, 所以只好先辨識 Windows 版本
為什麼某些 API 只能在某些作業系統中使用 => 問 微軟 吧, 微軟提供的 API 就是這樣

------
能力不足，求助於人；有能力時，幫幫別人；如果您滿意答覆，請適時結案！

子曰：問有三種，不懂則問，雖懂有疑則問，雖懂而想知更多則問！

最後我是使用其他的做法: 
轉錄: http://www.vckbase.com/document/viewdoc/?id=416

中的
SHELLEXECUTEINFO ShExecInfo = {0};
ShExecInfo.cbSize = sizeof(SHELLEXECUTEINFO);
ShExecInfo.fMask = SEE_MASK_NOCLOSEPROCESS;
ShExecInfo.hwnd = NULL;
ShExecInfo.lpVerb = NULL;
ShExecInfo.lpFile = "c:\\MyProgram.exe";
ShExecInfo.lpParameters = "";
ShExecInfo.lpDirectory = NULL;
ShExecInfo.nShow = SW_SHOW;
ShExecInfo.hInstApp = NULL;
ShellExecuteEx(&ShExecInfo);
WaitForSingleObject(ShExecInfo.hProcess,INFINITE);

其中 我忘記說了,其實我要執行的程式可以下common讓它關閉^^!!