Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.23;
Скачать: CL | DM;

Вниз

Как заставить приложение что-либо делать, когда окно получает фок   Найти похожие ветки 

 
prockrut ©   (2004-05-11 15:40) [0]

Как заставить приложение что-либо делать, когда окно получает фокус?


 
WebErr ©   (2004-05-11 15:42) [1]

Обрабатывать OnEnter


 
WebErr ©   (2004-05-11 15:42) [2]

Обрабатывать OnEnter


 
WebErr ©   (2004-05-11 15:44) [3]

Обрабатывать OnEnter, если это окно - контрол или OnActivate если всё-таки форма.


 
prockrut ©   (2004-05-11 15:47) [4]

окно - это форма.
OnActivate -  проходит только один раз, при создании окна!


 
prockrut ©   (2004-05-11 15:48) [5]

WM_SETFOCUS  - ваще не отрабатывается!


 
WebErr ©   (2004-05-11 15:50) [6]


> OnActivate -  проходит только один раз, при создании окна!

Ну вот ещё! Сейчас ведь проверю...


 
webpauk   (2004-05-11 16:03) [7]

procedure WM_Act(var Msg: TMessage); Message WM_SETFOCUS;

procedure WM_Act(var Msg: TMessage);
begin
  inherited;
  Caption:=DateTimeToStr(Now)
end;


 
prockrut ©   (2004-05-11 16:07) [8]

2 webpauk

c WM_SETFOCUS делал - те же яй..., все равно не работает!!!


 
webpauk   (2004-05-11 16:11) [9]

procedure WM_Act(var Msg: TMessage); Message WM_SETFOCUS;

procedure WM_Act(var Msg: TMessage);
begin
  inherited;
  Caption:=DateTimeToStr(Now)
end;


 
ssk ©   (2004-05-11 16:11) [10]

Событие активации деактивации окна

type
  //...
 private
   { Private declarations }
   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;


 
WebErr ©   (2004-05-11 16:14) [11]

Вот он help Великий и Могучий:

Occurs when the form becomes active.

property OnActivate: TNotifyEvent;

Description

Use OnActivate to perform special processing when the form receives focus. A form becomes active when focus is transferred to it (when the user clicks on the form, for example).


Note:
The OnActivate event of the application (TApplication), not the form, occurs when Windows switches control from another application.


То есть надо ещё ловить OnActivate у Application в случае, когда переключается управление с другого приложения.


 
prockrut ©   (2004-05-11 16:14) [12]

Всем Спасибо!
Особенно ssk!!!
Заработало!!!



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

Текущий архив: 2004.05.23;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.036 c
11-1071066173
.::D.e.M.o.N.i.X::.
2003-12-10 17:22
2004.05.23
Что не так в коде???


9-1073822435
iudjen
2004-01-11 15:00
2004.05.23
помогите сдеать игру


1-1083571381
lehich
2004-05-03 12:03
2004.05.23
перемещение по строкам excel


11-1071470678
BaDeVlad
2003-12-15 09:44
2004.05.23
Что за глюк с иконками в меню?


4-1080740688
xtz
2004-03-31 17:44
2004.05.23
Ув мастера как по PId узнать скока памяти занимает процесс