Текущий архив: 2003.05.15;
Скачать: CL | DM;
Вниз
Помогите !!!!!!!!!!!(Как перехватить нажатие кнопки 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 надеюсь понятно.
Страницы: 1 вся ветка
Текущий архив: 2003.05.15;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.017 c
