Скачать: CL | DM;

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

← →
_PG_gaws   (2003-04-21 14:07) [0]

Помогите перехватить нажатие Maximize

---

← →
Skier ©   (2003-04-21 14:09) [1]

WM_SYSCOMMAND + SC_MAXIMIZE

---

← →
Сергей Ч   (2003-04-21 14:17) [2]

В public формы


procedure WMGetSysMessage(var Mes : TMessage); message WM_SYSCOMMAND;
В public
procedure WMGetSysMessage(var Mes : TMessage); message WM_SYSCOMMAND;
описание процедуры:

procedure TForm1.WMGetSysMessage(var Mes : TMessage) ;
begin
if (mes.wParam = SC_MAXIMIZE) Then
...
else
inherited;
end;

---

← →
Skier ©   (2003-04-21 14:23) [3]

> В public формы

Необязательно...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c