Ĺadny brzuch
Więc tak, klasa formy pewnej aplikacji to: "TFrmAbout". W tej formie znajduje się memo klasy "TMemo". (klasy sprawdzane metodą getwindowfrompoint, gdzie punkt to aktualna pozycja myszy). Jak teraz wyszukać uchwyt komponentu klasy TMemo? Dodam, że findwindow('Tmemo',nil) nie działa. Znalazłem podobny temat na forum (tam chciał pobrać uchwyt edita) ale tamte metody albo się nie działają (jak getwindow(uchwytl,GW_CHILD)) lub sie nie sprawdzają (jak metoda pobrania uchwytu komponentu pod kursorem myszy). Podawajcie inne propozycje ;) Z góry dziękuję.
h:=FindWindowEx(TFrmAbout.Handle,0,'TMemo',nil);?
Coś nie działa, zrobiłem programik kontrolny. Wstawiłem do timera nast. procedure.
h:=FindWindow('TfrmAbout', nil); uchwyt:=FindWindowEx(h,0,'TMemo',nil); richedit1.Text:='Uchwyt memo: '+inttostr(uchwyt)+' uchwyt okna: '+inttostr(h)+' z pozycji myszy: '+inttostr(WindowFromPoint(mouse.CursorPos));
Gdy ustawie kursor myszy nad tym memo, to w richedit wyświetla się nast. text:
Uchwyt memo: 0 uchwyt okna: 5506170 z pozycji myszy: 1115364
Uchwyt okna wykrywa poprawie, tak samo jak uchwyt komp. z pozycji myszy, tylko dlaczego nie wykrywa tego memo?
Hm... może między editem a formą, jest jeszcze jakiś parent? Najlepiej napisz sobie programik który przechwytuje parentów danego komponentu wskazanego myszą :)
Hehe, faktycznie. Między Tmemo, a oknem są 2 inne klasy.
TFrmAbout>TPanel>TPanel>TMemo
Zrobiłem testowy programik. W nim były 2 edity i timer.
W procedurze timera:
var hedit: hwnd; begin hedit:=findwindow('TFrmAbout',nil); hedit:=findwindowex(hedit,0,'TPanel',nil); hedit:=findwindowex(hedit,0,'TPanel',nil); hedit:=findwindowex(hedit,0,'TMemo',nil); edit1.Text:=inttostr(hedit); edit2.Text:=inttostr(windowfrompoint(mouse.CursorPos)); end;
Teraz po uruchomieniu programu i ustawieniu kursora w miejscu gdzie jest szukane Memo w edicie1 oraz w edit2 powinny być takie same wartości, ale nie są :( Więc co jest źle?
Użytkownik Stephanek edytował ten post 29 czerwiec 2006, 16:49
Programiści! Skąd wy umiecie takie rzeczy? Skąd się uczyliście?bo ja nic z tego nie kumam choć chce sie nauczyć. Tą wiedzę macie dzięki internetowi??
Skąd wy umiecie takie rzeczy?
Sorry, że się wtrącam ale jakie rzeczy, bo ja nie rozumiem??
chodzi mi o te uchwyty okien, co to jest??
W Google "uchwyt okna" i trzeci wynik od góry... <_<
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
h:=FindWindowEx(TFrmAbout.Handle,0,'TMemo',nil);?
Coś nie działa, zrobiłem programik kontrolny. Wstawiłem do timera nast. procedure.
h:=FindWindow('TfrmAbout', nil); uchwyt:=FindWindowEx(h,0,'TMemo',nil); richedit1.Text:='Uchwyt memo: '+inttostr(uchwyt)+' uchwyt okna: '+inttostr(h)+' z pozycji myszy: '+inttostr(WindowFromPoint(mouse.CursorPos));
Gdy ustawie kursor myszy nad tym memo, to w richedit wyświetla się nast. text:
Uchwyt memo: 0 uchwyt okna: 5506170 z pozycji myszy: 1115364
Uchwyt okna wykrywa poprawie, tak samo jak uchwyt komp. z pozycji myszy, tylko dlaczego nie wykrywa tego memo?
Hm... może między editem a formą, jest jeszcze jakiś parent? Najlepiej napisz sobie programik który przechwytuje parentów danego komponentu wskazanego myszą :)
Hehe, faktycznie. Między Tmemo, a oknem są 2 inne klasy.
TFrmAbout>TPanel>TPanel>TMemo
Zrobiłem testowy programik. W nim były 2 edity i timer.
W procedurze timera:
var hedit: hwnd; begin hedit:=findwindow('TFrmAbout',nil); hedit:=findwindowex(hedit,0,'TPanel',nil); hedit:=findwindowex(hedit,0,'TPanel',nil); hedit:=findwindowex(hedit,0,'TMemo',nil); edit1.Text:=inttostr(hedit); edit2.Text:=inttostr(windowfrompoint(mouse.CursorPos)); end;
Teraz po uruchomieniu programu i ustawieniu kursora w miejscu gdzie jest szukane Memo w edicie1 oraz w edit2 powinny być takie same wartości, ale nie są :( Więc co jest źle?
Użytkownik Stephanek edytował ten post 29 czerwiec 2006, 16:49
Programiści! Skąd wy umiecie takie rzeczy? Skąd się uczyliście?bo ja nic z tego nie kumam choć chce sie nauczyć. Tą wiedzę macie dzięki internetowi??
Skąd wy umiecie takie rzeczy?
Sorry, że się wtrącam ale jakie rzeczy, bo ja nie rozumiem??
chodzi mi o te uchwyty okien, co to jest??
W Google "uchwyt okna" i trzeci wynik od góry... <_<