怎樣讓程式不會重複被執行

最近我只在 M$ 平台上混，真的被氣死了。話不多說，來說一個怎樣讓程式不會重複被叫起來的方法，這是同仁的心得，我代貼而已。

主要使用到CreateMutex()函數和GetLastError()以及一個常量
ERROR_ALREADY_EXISTS.

下面為sample code:

HANDLE hMutex = CreateMutex(NULL, false, "Process");
if (GetLastError() == ERROR_ALREADY_EXISTS)
{
CloseHandle(hMutex);
MessageBox(Application->Handle, "程序已經執行中，不能重覆啟動！", "提示",
MB_OK);

return 0;
}

參考網頁 : http://hi.baidu.com/machh03/blog/item/52c0cc3864fd5b2697ddd815.html