如何让程序只能启动一个实例
我不知道该怎么说：
就是我的程序启动后，如果再双击启动程序就激活已启动的实例
或提示程序已启动。

谢谢！

[解决办法]
hMutex: HWND;

hMutex := CreateMutex(nil, False, '随便写，最好时软件的名称 ');
Ret := GetLastError;
If Ret ＝ ERROR_ALREADY_EXISTS Then
ShowMessage( '程序已经启动 ')
[解决办法]
http://www.google.cn/search?complete=1&hl=zh-CN&newwindow=1&q=delphi%E9%98%B2%E6%AD%A2%E5%87%BA%E7%8E%B0%E5%A4%9A%E4%B8%AA%E5%BA%94%E7%94%A8%E7%A8%8B%E5%BA%8F%E5%AE%9E%E4%BE%8B&meta=