안녕하세요

청개구리 남기석입니다.



아래처럼 해 보세요...

설명은....음...백설이 불여일코!!!!!!1



procedure TForm1.Button1Click(Sender: TObject);

begin

SendMessage( Handle, WM_SYSCOMMAND, SC_MAXIMIZE, 0 ); // 최대화

end;



procedure TForm1.Button2Click(Sender: TObject);

begin

SendMessage( Handle, WM_SYSCOMMAND, SC_MINIMIZE, 0 ); // 최소화

end;



procedure TForm1.Button3Click(Sender: TObject);

begin

SendMessage( Handle, WM_SYSCOMMAND, SC_RESTORE, 0 ); // 원래대로

end;



procedure TForm1.Button4Click(Sender: TObject);

begin

SendMessage( Handle, WM_SYSCOMMAND, SC_CLOSE, 0 ); // 닫기

end;



행복하세요...



=============================================================================

생초보 wrote:

> 질문이 있는데요..

> 폼에보면 최대화/최소화/닫기 버튼이 있는데요

> 이걸 이벤트를 이용해서 마치 해당 버튼을 누른 것처럼 할 수는 없나요?

> 폼을 생성할때가 아니라 실행하는 실시간에요..

> 밑에 보니까 비슷한 질문도 있던데...

>

> send message 를 이용해서 처리하는 예를 보여 주시면 고맙겠읍니다.

> 해당 시스템 버튼을 send message를 이용해서 제어하는 예가 없어서 고생하는 이가...