Delphi 中如何禁止重复运行程序的方法
第一种方法，使用“过程调用”procedure Del; // 自定义过程var Mutex: THandle;begin Mutex := CreateMutex(nil, True, PChar(Application.Title)); if GetLastError = ERROR_ALREADY_EXISTS then begin Application.MessageBox('重复登录！','系统提示', MB_ICONERROR); ReleaseMut...
