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

Ответ на OnMinimize главной формы   Найти похожие ветки 

← →
olookin ©   (2004-01-31 16:05) [0]

Не получается отловить минимизацию главной формы. Я делаю это так:

Application.OnMessage:=EDIPbaseOnMessage;

procedure TEDIPbase.EDIPbaseOnMessage(var Msg: TMsg; var Handled: Boolean);
begin
if EDIPbase.Windowstate=wsminimized then Beep;
end;

---

← →
olookin ©   (2004-01-31 16:09) [1]

Извиняюсь - но уже решилась проблема. Всем спасибо.

---

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

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



Память: 0.44 MB
Время: 0.011 c