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

Перехват сворачивания окна   Найти похожие ветки 

← →
tovSuhov   (2003-04-08 11:40) [0]

Господа, подскажите, как сделать такую вещь:
хочу при нажатии на системную кнопку biMinimize выполнить команду Form1.Hide (чтобы с панели задач исчезла и кнопка, а по клику трей-иконки Form1.Show).
Как такое проще и грамотнее сделать?

---

← →
neodiX ©   (2003-04-08 11:56) [1]

Описываешь метод:
procedure onminize(var Message:tmessage); message WM_SYSCOMMAND;

потом реализуешь:
implementation
procedure TForm1.onminize(var Message:tmessage);
begin
if message.WParam=SC_MINIMIZE then
hide
else
inherited;
end;

---

← →
tovSuhov   (2003-04-08 12:05) [2]

Сенкс!

---

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

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



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