Небольшой ответик.
Цитата:
|
Сообщение от segas
Чтобы при нажатии на кнопку Button1 ворма сворачивалась, на Button2 разворачивалась.
|
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowWindow(Application.Handle, SW_MINIMIZE);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
ShowWindow(Handle, SW_SHOWMAXIMIZED);
end;
Цитата:
|
Как называется событие которое вызывается при нажатии на кнопку свернуть (развернуть)?
|
Такие события формы явно не предусмотрены. Но их можно отлавливать по сообщениям WM_SYSCOMMAND, отсылаемым окну.