这样建立的互斥对象怎么编译通不过？(100分)

var
HMutex:THandle;

Initialization
MutexHandle:=CreateMutex(Nil,False,'互斥软件名');
if GetLastError=Error_Already_Exists then
begin
Application.MessageBox('该程序已经打开.','提示',64);
ReleaseMutex(MutexHandle);
CloseHandle(MutexHandle);
Application.Terminate;
end;

楼主var处定义的变量与后面使用的不一样
HMutex ？ MutexHandle

这问题在编译通过时，应该有提示的啊

HMutex 改成 MutexHandle 就行了，大意啊！

接受答案了.