請問如何防止程式重複執行? |
|
答題得分者是：RaynorPao
|
|
jessechan
版主   發表：109 回覆：394 積分：254 註冊：2002-04-05 發送簡訊給我 |
|
|
RaynorPao
版主  發表：139 回覆：3622 積分：7025 註冊：2002-08-12 發送簡訊給我 |
|
|
wzl
一般會員  發表：14 回覆：31 積分：9 註冊：2003-02-12 發送簡訊給我 |
下面的程式應該可以幫助你
利用判斷視窗名稱...來不讓程式重覆run
HANDLE hMutex2 = OpenMutex(MUTEX_ALL_ACCESS, 0, "UltraSonicMap");
if (!hMutex2) {
hMutex2 = CreateMutex(0, 0, "UltraSonicMap");
}
else {
HWND hWnd = FindWindow("TApplication", "擷取系統");
//ShowMessage("不可以重新啟動程式喔!!");
SetForegroundWindow(hWnd);
return 0;
}
ReleaseMutex(hMutex2);
|
|
jessechan
版主 發表：109 回覆：394 積分：254 註冊：2002-04-05 發送簡訊給我 |
引言: 下面的程式應該可以幫助你 利用判斷視窗名稱...來不讓程式重覆run HANDLE hMutex2 = OpenMutex(MUTEX_ALL_ACCESS, 0, "UltraSonicMap"); if (!hMutex2) { hMutex2 = CreateMutex(0, 0, "UltraSonicMap"); } else { HWND hWnd = FindWindow("TApplication", "擷取系統"); //ShowMessage("不可以重新啟動程式喔!!"); SetForegroundWindow(hWnd); return 0; } ReleaseMutex(hMutex2);wzl, 多謝您的回應, 有關這個問題我在 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=24350 這篇文章中有一些心得分享, 還請您不吝指教. Jesse Chan
------
Jesse Chan |
發表時間：2002-12-26 00:39:49
IP:61.228.xxx.xxx 未訂閱
系統時間：2025-02-28 6:54:32
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |