Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Как отловить у формы активность/неактивность?

Автор: TechBee 9.10.2007, 17:27

Доброго времени суток!
Уже много чего перепробовал, но того чего нужно так и не нашел...

Необходимо перехватить активность/неактивность окна.

Пример...
Вот форма неактивна:
user posted image

Вот мышкой щелкнул по ней, т.е. стала активной:
user posted image

Дак вот это изменение активности и надо отловить... smile

Автор: volvo877 9.10.2007, 17:38

Ну, так лови TApplicationEvent.OnActivate

Автор: TechBee 9.10.2007, 18:05

Елки... забыл добавить в private и ничего не получалось, перелестав DRKB понял... smile

Код


private
   procedure WMNCACTIVATE(var M: TWMNCACTIVATE); message WM_NCACTIVATE;
end; 

implementation

procedure TForm1.WMNCACTIVATE(var M: TWMNCACTIVATE);
begin
inherited;
if M.Active then
   caption:='Form active'
else caption:='Form not active' ;
end;

Можно удалить.