Помогите !!!!!!!!!!!(Как перехватить нажатие кнопки Maximize)

← →
_PG_gaws (2003-04-21 13:18) [0]

ВОТ он вопрос ,Как перехватить нажатие кнопки Maximize !!?

← →
Songoku © (2003-04-21 16:02) [1]

сначало надо перехватить WM_SYSCOMMNAD а потом SC_MINIMIZE!!!

← →
Shurik (2003-04-27 05:40) [2]

type
TForm1 = Class (TForm)
...
private
procedure WMGetSysCommand (var Message :TMessage); message WM_SYSCOMMAND;
end;

...
implementation
...
procedure TForm1.WMGetSysCommand (var Message: TMessage);
begin
case Message.WParam of
SC_MINIMIZE, SC_MAXIMIZE:
begin
ShowMessage ("Нифига!");
end;
SC_CLOSE:
begin
ShowMessage ("Нифига!");
end;
else
inherited;
end;
end;

Что такое SC_MAXIMIZE, SC_MINIMIZE, SC_CLOSE надеюсь понятно.

Помогите !!!!!!!!!!!(Как перехватить нажатие кнопки Maximize) Найти похожие ветки