so - jetzt lassen wir mal Luckies Schandtaten bei Seite
- und kommen wieder zum eigentlichen Thema zurück, irgendwie hab ich da immer noch ein Verständnis-Problem.
Ich hab einen Fenster-
Handle und möchte von der Application den Titel ermitteln.
Wenn ich Himitsu´s Beispiel richtig verstanden habe, dann kann ich mittels
H := FindWindowEx(0, H, 'TApplication', nil);
das Nicht-sichtbare Fenster des Fenster-Handles in H ermitteln.
Ich hab das mal bei mir umgesetzt:
Delphi-Quellcode:
function FensterText(Wnd: HWND):
String;
var
AWnd : HWND;
WText:
array[0..MAX_PATH - 1]
of Char;
begin
//Rückgabewert vordefinieren
Result := '
';
//prüfen ob ein Fenster-Handle übergeben wurde
If Wnd = 0
then
exit;
//Handle der Application zu dem Fenster auslesen
AWnd := FindWindowEx(0, Wnd, '
TApplication',
nil);
//Fenster-Text auslesen
If GetWindowText(AWnd, @WText, Length(WText)) > 0
then
//Rückgabewert = Fenster-Name
Result :=
String(WText)
else
//Rückgabewert = SystemFehler
Result := SysErrorMessage(GetlastError);
end;
Ich habe (in einer Liste) die Fenster-Handles zweier unterschiedlicher Prozesse.
Bei dem ersten Fenster-
Handle erhalte ich auch den richtigen Application-Titel.
Bei dem zweiten
Handle immer den Titel des ersten Handles.
Oder ich erhalte beim zweiten
Handle die Meldung "Das Fenster hat keine Bildlaufleisten"
Also entweder ich hab einen Gedankenfehler bei der Verwendung von FindWindowEx oder ich hab schlicht und einfach etwas am Code vergessen.