11 Stimme

Delphi/Lazarus: Titel des aktiven Fensters ermitteln

Tipp von Delphianer | 09.08.2014 um 18:48

Heute möchte ich euch zeigen, wie ihr unter Windows den Titel bzw. die Caption von dem Fenster ermitteln könnt, das gerade den Fokus hat.

Die folgende Funktion dafür funktioniert sowohl mit Delphi als auch mit Lazarus (die Unit Windows muss eingebunden sein).

function GetTitleOfActiveWindow: string;
var
  AHandle: THandle;
  ATitle: string;
  ALen: Integer;
begin
  Result := '';
  AHandle := GetForegroundWindow;  // aktives fenster

  if AHandle <> 0 then begin
    ALen := GetWindowTextLength(AHandle) + 1;
    SetLength(ATitle, ALen);
    GetWindowText(AHandle, PChar(ATitle), ALen);
    result := Trim(ATitle);
  end;
end;  

Zunächst bestimmen wir das Handle des Fensters, das sich aktuell im Vordergrund hat und befindet und damit den Fokus hat. Anschließend lesen wir den Titel des Fensters aus und geben diesen als Result der Funktion zurück.

AntwortenPositivNegativ

Über den Autor

AvatarDer Autor hat keine Kurzbeschreibung seines Profils angegeben.
Profil anzeigen

 

Ähnliche Themen

Wichtiger Hinweis

Bitte beachten Sie: Die Beiträge auf askingbox.de sind Beiträge von Nutzern und sollen keine professionelle Beratung ersetzen. Sie werden nicht von Unabhängigen geprüft und spiegeln nicht zwingend die Meinung von askingbox.de wieder. Mehr erfahren.

Jetzt mitmachen

Stellen Sie Ihre eigene Frage oder schreiben Sie Ihren eigenen Artikel auf askingbox.de. So gehts.