중복 실행 방지

프로젝트 Dpr 파일을 열어서 user 에 WinApi.Windows 추가하고,
아래 코드를 사용하면 간단하게 중복 실행하는 것을 방지합니다.

// TestMutex 는 중복 방지를 위한 식별자로 수정해서 사용하세요.
var
  Mutex : THandle;
begin
  Mutex := CreateMutex(nil, True, 'TestMutex');
  if (Mutex = 0) or (GetLastError > 0) Then Exit;

评论

精华帖

Delphi Delphi IDE 메인 폼 안열림 dproj 설정으로 해결
Delphi TDirectory.Delete 대신 CMD 으로 폴더 삭제
Delphi 폼이 모니터 한 가운데 있는 경우 자연스럽게 왼쪽으로 …
Delphi TrayIcon 이 흐릿하게 보이는 버그? 수정
Delphi 실행 중인 프로세스가 활성 창인지 확인하는 함수
Delphi 메세지 다이어그램(Message Dialog) 에 체크박스(CheckB…
Delphi 윈도우 알림센터에 메시지 출력하기
浏览 Delphi 중복 실행 방지
Delphi 파일 포맷 알아내기
Delphi 권한상승
Delphi Glyph 에 사용할 이미지 생성하기
Delphi bsNone 인 폼에서 드래그 및 크기조절