Form.OnLeave(...)

← →
_Ed_ © (2002-12-06 21:51) [0]

Господа мастера, я пробую силы в KOL, и теперь ваш частый гость!
Возникла проблема: событие OnLeave (как я понимаю - это аналог OnDeactivate в VCL) главной формы не происходит при потере фокуса.

В чём тут может быть проблема и как её решить?

← →
Gandalf (2002-12-06 22:58) [1]

> Господа мастера, я пробую силы в KOL, и теперь ваш частый
> гость!
> Возникла проблема: событие OnLeave (как я понимаю - это
> аналог OnDeactivate в VCL) главной формы не происходит при
> потере фокуса. В чём тут может быть проблема...

Не реализованно! Т.е. либо автор проглядел, т.е. забыл, толи не стал. (А может я уже совсем засыпаю).

> ... и как её решить?

Можно так:

function TForm1.KOLForm1Message(var Msg: tagMSG; var Rslt: Integer): Boolean; begin if Msg.message=WM_ACTIVATE then begin if LoWord(Msg.wParam)=WA_INACTIVE then ShowMessage("Aha!"); end; Result:=False; end;

Form.OnLeave(...) Найти похожие ветки