Registriert seit: 14. Mai 2005
108 Beiträge
Delphi 2005 Professional
Fenster finden
28. Dez 2007, 10:34
Hallo,
ich hab ein kleines Problem, ich habe versucht mit X-Spy einen Code zu generieren der mich zu einem bestimmten Fenster bring um dort dann ferngesteuert Text reinschreiben zu können, leider funktioniert das aber nicht. Ich stelle hier mal den Code rein, vielleicht kann mir ja jemand helfen. Zudem stelle ich noch das Bild ein in dem man die Parents sieht.
Delphi-Quellcode:
wnd := FindWindow('ThunderRT6Form ', 'Gesprächsmonitor - Vertical TeleVantage ViewPoint ');
wnd := FindWindowEx(wnd, 0, 'ABSDynaBarCls ', nil );
wnd := FindWindowEx(wnd, 0, 'ThunderRT6PictureBox ', nil );
wnd := FindWindowEx(wnd, 0, 'ThunderRT6UserControl ', nil );
wnd := FindWindowEx(wnd, 0, 'ThunderRT6UserControl ', nil ); // hier stimmt es schon nicht mehr
wnd := FindWindowEx(wnd, 0, 'ThunderRT6UserControl ', nil );
wnd := FindWindowEx(wnd, 0, 'ABSDynaBarCls ', nil );
wnd := FindWindowEx(wnd, 0, 'ThunderRT6PictureBox ', nil );
wnd := FindWindowEx(wnd, 0, 'ThunderRT6UserControl ', nil );
wnd := FindWindowEx(wnd, 0, 'ThunderRT6UserControl ', nil );
wnd := FindWindowEx(wnd, 0, 'ThunderRT6UserControl ', nil );
wnd := FindWindowEx(wnd, 0, 'ThunderRT6UserControl ', nil );
wnd := FindWindowEx(wnd, 0, 'ThunderRT6TextBox ', '<Anmerkungen> ');
funktionieren tut das bis zum
Handle 402E4, danach nimmt er dann anstelle von 402EA das
Handle 402F0, warum? (sieht man auf dem Bild).
Danke mal für Eure Hilfe!
Martin
Miniaturansicht angehängter Grafiken
ich weiss, das ich nichts weiss!