![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Стандартная кнопка максимизации, [D6, Win95/98, WinXP]
XenonXX © (2003-10-31 08:22:00)
как перехватить ее нажатие и отреагировать? А то надо реагировать не как на ресайз.
XenonXX (2003-11-04 16:51:00) [1]
ZEE,
Аригато, сенсей!(="Спасобо мастер") Тормозил я утром после ночи в интернете...
ZEE (2003-11-04 10:32:00) [2]
if Msg.WParam=SC_MAXIMIZE then
begin
///something
end else inherited; ???
XenonXX (2003-11-04 06:27:00) [3]
Игорь Шевченко © (31.10.03 12:16) [4]
WM_SYSCOMMAND SC_MAXIMIZE - не получается ?
Если так делать, то
procedure WM_SYSCOMMAND1 (Var Msg: TMessage); message WM_syscommand;
...........................
procedure TForm1.WM_SYSCOMMAND1;
begin
if Msg.WParam=SC_MAXIMIZE then
begin
///something
end;
end;
Это ловит верно, но тогда ведь надо самому писать обработчитки всех кнопок(ну это можно) и даже перетаскивания(а вот с этим траблы), так ведь или можно как-то переправить мессагу туда куда она шла?
Игорь Шевченко (2003-10-31 12:32:00) [4]
DVM © (31.10.03 12:21)
Это не там, случайно, где просьба удалить ветку, была ?
ZEE (2003-10-31 12:28:00) [5]
упс, ошибочка у меня в [1]
надо наверно
WM_SIZE + SIZEFULLSCREEN
хотя про SC_MAXIMIZE я как-то вообще не подумал...
DVM (2003-10-31 12:21:00) [6]
> Игорь Шевченко © (31.10.03 12:16) [4]
Он этот вопрос уже задавал, ему ответили - ноль внимания.
Игорь Шевченко (2003-10-31 12:16:00) [7]
WM_SYSCOMMAND SC_MAXIMIZE - не получается ?
AbrosimovA (2003-10-31 12:09:00) [8]
Извините, ответ мой не в тему.
AbrosimovA (2003-10-31 12:05:00) [9]
А так например:
procedure TMainForm.FormCreate(Sender: TObject);
begin
Application.OnMinimize := OnMinimize;
end;
procedure TMainForm.OnMinimize(Sender : TObject);
begin
..............//Здесь твоя реакция
end;
ZEE (2003-10-31 10:55:00) [10]
WM_SIZE + SIZEICONIC - по другому думаю врядли