김철수 wrote:

> 1. 중복 실행되지 않도록 하는 방법을 알고 싶습니다.

> 그런데 단지 중복 실행 뿐만아니라 몇개의 미리 정의된 프로그램도 실행되지 않게 하

> 고 싶거든요.

> 가령, 프로그램을 실행시키면 그 프로그램 뿐만아니라

> 'c:aaa.exe','d:bbb.exe','e:ccc.exe'등의 프로그램이 실행되었는지를 확인하고

> 싶습니다.

>

> 2. NT상에서 어떤 보드의 서비스가 실행중인지를 확인하고 싶습니다.

> 가령, 어떤 프로그램을 실행하려고 하는데 컴퓨터에 설치된 어떤 보드의 서비스가 시

> 작되었는지를 확인한후에 프로그램이 구동되게 하려고 합니다.

>

> 답변 바랍니다.

2번은 질문의 의도가 파악이 안되고요 ^^;;;;;;;;;;;;;;;

1번은 HWND FindWindow(

LPCTSTR lpClassName, // pointer to class name

LPCTSTR lpWindowName // pointer to window name

);

하시면 되겠네요^^;; 즐코~~~~~~~~~~!

김철수 wrote:

> 1. 중복 실행되지 않도록 하는 방법을 알고 싶습니다.

> 그런데 단지 중복 실행 뿐만아니라 몇개의 미리 정의된 프로그램도 실행되지 않게 하

> 고 싶거든요.

> 가령, 프로그램을 실행시키면 그 프로그램 뿐만아니라

> 'c:aaa.exe','d:bbb.exe','e:ccc.exe'등의 프로그램이 실행되었는지를 확인하고

> 싶습니다.

>

> 2. NT상에서 어떤 보드의 서비스가 실행중인지를 확인하고 싶습니다.

> 가령, 어떤 프로그램을 실행하려고 하는데 컴퓨터에 설치된 어떤 보드의 서비스가 시

> 작되었는지를 확인한후에 프로그램이 구동되게 하려고 합니다.

>

> 답변 바랍니다.

>

>







1번 질문에 대한 답입니다.



프로젝트에서 자동생성되는 메인폼 pas의 제일 마지막 부분에 추가하세여.



initialization

begin

CreateFileMapping($FFFFFFFF, nil, PAGE_READWRITE, 0, 1, '실행파일명');

if GetLastError = ERROR_ALREADY_EXISTS then

begin

ShowMessage('이미 실행중입니다.');

halt;

end;

end;