Hi ich wollte aus einem
FTP Programm, das einzelne Kopiervorgänge anzeigt Daten auslesen. (Dateiname, Fertigstellung etc.)
Jetzt lese ich hier überall im Forum, dass man den Klassennamen der Komponente braucht. Es handelt sich bei der Komponente um eine Art Listbox, leider weiß ich nicht was ich als Classname bei
FindWindowEX() angeben soll :/
2. und viel wichtigeres Problem:
Ich komme noch nichtmal soweit! Sitze schon seit einer halben Stunde an dem Codeschnipsel fest:
Code:
var
FoundWindow,F2: HWND;
WindowText: array[0..255] of char;
begin
F2 := FindWindow('TApplication',nil);
{Find a TButton child window}
FoundWindow := FindWindowEx(F2, 0, 'TButton', nil);
{Get its text}
GetWindowText(FoundWindow, WindowText, 255);
{Display it}
label1.Caption := 'FindWindowEx found window
handle ' +
IntToStr(FoundWindow) + ': ' + WindowText;
Mit XSpy hab ich den Classname der Anwendung bekommen, aber er findet nur einen Button, wenn ich
bei FoundWindow := FindWindowEx(Form1.handle, 0, 'TButton', nil); Das Form1.handle angebe. Wenn ich da F2 für einsetze, also mein ermitteltes
Handle, findet er nicht
Was mach ich nur Falsch?