메인폼에서 실행파일을 실행 시킬때 어떤 함수로 실행 시키시나요?



shellexecute 함수를 사용해서 실행 시킨다면 그 함수의 리턴값이 실행파일의 핸들값이 되기때문에 메인폼 종료전에 SendMessage로 WM_QUIT 메세지를 보내면 될꺼 같네요..



바보 wrote:

> 프로그램이 메인폼에 실행파일이 연결되어있습니다.

> 메인폼이 종료될때 활성화되어있는 실행파일도 함께 종료하려고 합니다.

> 어떻게 해야하나요?

stoney wrote:

> 메인폼에서 실행파일을 실행 시킬때 어떤 함수로 실행 시키시나요?

>

> shellexecute 함수를 사용해서 실행 시킨다면 그 함수의 리턴값이 실행파일의 핸들값이 되기때문에 메인폼 종료전에 SendMessage로 WM_QUIT 메세지를 보내면 될꺼 같네요..

>

> 바보 wrote:

> > 프로그램이 메인폼에 실행파일이 연결되어있습니다.

> > 메인폼이 종료될때 활성화되어있는 실행파일도 함께 종료하려고 합니다.

> > 어떻게 해야하나요?



우선답변감사드리고요...

제가 다음과 같은 방법들로 해보았는데 안되네요.

ie := findwindow('Config', nil);

SendMessage(ie,WM_QUIT,0,0);

//if ie <> 0 then

//SendMessage(ie,WM_CLOSE,0,0);

//PostMessage(ie, WM_CLOSE, 0, 0);

//sendMessage( ie, WM_SYSCOMMAND, SC_CLOSE, 0 );



방법이 없을까요?

바보 wrote:

> stoney wrote:

> > 메인폼에서 실행파일을 실행 시킬때 어떤 함수로 실행 시키시나요?

> >

> > shellexecute 함수를 사용해서 실행 시킨다면 그 함수의 리턴값이 실행파일의 핸들값이 되기때문에 메인폼 종료전에 SendMessage로 WM_QUIT 메세지를 보내면 될꺼 같네요..

> >

> > 바보 wrote:

> > > 프로그램이 메인폼에 실행파일이 연결되어있습니다.

> > > 메인폼이 종료될때 활성화되어있는 실행파일도 함께 종료하려고 합니다.

> > > 어떻게 해야하나요?

>

> 우선답변감사드리고요...

> 제가 다음과 같은 방법들로 해보았는데 안되네요.

> ie := findwindow('Config', nil);

> SendMessage(ie,WM_QUIT,0,0);

> //if ie <> 0 then

> //SendMessage(ie,WM_CLOSE,0,0);

> //PostMessage(ie, WM_CLOSE, 0, 0);

> //sendMessage( ie, WM_SYSCOMMAND, SC_CLOSE, 0 );

>

> 방법이 없을까요?

//////////////////////////////////////////////////

조금 수정해서 해보세요.

1.pchar로 해당 메인 폼의 클래스명 즉,T자붙인 'T폼명'으로 하고요

ie := findwindow(pchar('TConfig'), nil);

2.죽일땐

if bbb<>NULL then

PostMessage(ie, WM_CLOSE, 0, 0);