Вниз
Скачать: CL | DM;

Событие смена активного окна в винде   Найти похожие ветки 

 
312kbps   (2008-04-17 12:00) [0]

Уважаемые профессионалы.
Подскажите пожалйста мне, как в моей программе отследить смену активного окна в виндовс, типа какого события в моей програме !?

Спасибо !


 
<>   (2008-04-17 12:49) [1]

Может быть вот так:


VAR A:HWND;

procedure TForm1.Timer1Timer(Sender: TObject);
VAR H:HWND;
begin
H:= GetForegroundWindow();
IF A<> H THEN  Application.Title:=IntToStr(H);
A:=H;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
 A:=GetForegroundWindow();
end;


 
Palladin ©   (2008-04-17 12:52) [2]

профессионалы... слово то какое...  :)
а с чего вдруг твоя программа должна уведомлятся о том, что активное окно виндовс сменилось? она только о своем активировании/деактивировании будет знать. а что бы следить за телодвижениями пользователя с окнами, нужно будет такую серьезную штуку сделать, как хук (hooks) реализовать. страшно? а может не надо? у меня ощущение что ты все равно ничего не поймешь, хотя может кто сердобольный даст тебе код, но ты все равно его тупо скопируешь и вставишь, а смысл в этом какой?... а никакого... а вот подсказку куда копать я тебе уже сделал... копай...


 
312kbps   (2008-04-17 14:05) [3]

я знаю что надо использовать хук
SetWindowsHookEx

я не знаю как будет называться эта ловушка, тип ловушки
idHook - !?


 
Palladin ©   (2008-04-17 14:13) [4]

в справке все виды ловушек перечисленны и достаточно подробно описаны


 
312kbps   (2008-04-17 15:31) [5]

блин, не нашел я в справке, может не умею пользоваться, а может и нету у меня этого в справке (((
подскажите как она называется !?
пожалуйста )


 
312kbps   (2008-04-17 18:00) [6]

WH_SHELL


 
DVM ©   (2008-04-18 10:57) [7]

Можно и без хуков обойтись.



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

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



Память: 0.46 MB
Время: 0.026 c
15-1232753631
trsteep
2009-01-24 02:33
2009.03.29
Модель базы данных.


3-1216374027
123456711
2008-07-18 13:40
2009.03.29
получить Insert Id после запроса INSERT...


6-1201628955
Lamer666
2008-01-29 20:49
2009.03.29
Возможно ли использоватьOpera в место TWebBrowser?


2-1233557503
Mops
2009-02-02 09:51
2009.03.29
определение variant


4-1207322584
engine
2008-04-04 19:23
2009.03.29
TerminateProcess




   Наверх