마음의 안정을 찾기 위하여 - Mutex 생성 체크
1948862
176
348
관리자새글쓰기
태그위치로그방명록
별일없다의 생각
dawnsea's me2day/2010
색상(RGB)코드 추출기(Color...
Connection Generator/2010
최승호PD, '4대강 거짓말 검...
Green Monkey**/2010
Syng의 생각
syng's me2DAY/2010
천재 작곡가 윤일상이 기획,...
엘븐킹's Digital Factory/2010
Mutex 생성 체크
Delphi/Etc Tip | 2010/11/05 13:29
어떤 프로그램이 이미 실행중인지 여부를 체크하거나, 내 프로그램이 동시에 2개 이상 실행되지 않도록 하기 위해서 자주 사용되는 방법으로 Mutex를 생성하고 해당 Mutex의 생성 여부를 확인하는 방법을 사용한다.

아래는 뮤텍스를 생성하고, 이미 생성되어 있는 경우 결과를 Boolean 형으로 리턴하는 함수이다.

Const
   Chk_Mutex_Name = 'Check_Mutex_Created';
     
Function Is_VNC_Running : Boolean;
Var
   Mutex : LongInt;
Begin
   { Mutex 생성}
   Mutex := CreateMutex(nil, TRUE, Chk_Mutex_Name);

   { Mutex 생성 실패면 False }
   If Mutex = 0 Then Begin
      Result := True;
      Exit;
   End;

   { Mutex가 이미 생성되어 있음 }
   If (GetLastError = ERROR_ALREADY_EXISTS) Then Begin
      Result := True;
      Exit;
   End;

   CloseHandle(Mutex);
   Result := False;
End;

2010/11/05 13:29 2010/11/05 13:29
Article tag list Go to top
View Comment 0
Trackback URL :: 이 글에는 트랙백을 보낼 수 없습니다
 
 
 
 
: [1] ... [146][147][148][149][150][151][152][153][154] ... [855] :
«   2021/10   »
          1 2
3 4 5 6 7 8 9
10 11 12 13 14 15 16
17 18 19 20 21 22 23
24 25 26 27 28 29 30
31            
전체 (855)
출판 준비 (0)
My-Pro... (41)
사는 ... (492)
블로그... (22)
My Lib... (32)
게임 ... (23)
개발관... (3)
Smart ... (1)
Delphi (75)
C Builder (0)
Object... (0)
VC, MF... (9)
Window... (1)
Open API (3)
Visual... (0)
Java, JSP (2)
ASP.NET (0)
PHP (4)
Database (12)
리눅스 (28)
Windows (23)
Device... (1)
Embedded (1)
게임 ... (0)
Web Se... (2)
Web, S... (19)
잡다한... (5)
프로젝트 (0)
Personal (0)
대통령... (9)
Link (2)