hardouz199
Messages postés jeudi 22 février 2007Date d'inscription
26 novembre 2009
Dernière intervention
-
21 nov. 2007 à 00:34 - Dernière réponse : japee1799
Messages postés vendredi 27 décembre 2002Date d'inscription
19 juillet 2018
Dernière intervention
- 22 nov. 2007 à 10:43
salut
quelqu'un peut m'expliquer comment determiner le nom de la fenetre active !!!! (determiner le texte dans la barre de titre de la fenetre active )
merci d'avance
l0sth34d276
Messages postés mercredi 21 mars 2007Date d'inscription
13 novembre 2008
Dernière intervention -21 nov. 2007 à 21:13
3
Merci
function ActiveCaption: string;
var
Handle: THandle;
Len: LongInt;
Title: string;
begin
Result := '';
Handle := GetForegroundWindow;
if Handle <> 0 then
begin
Len := GetWindowTextLength(Handle) + 1;
SetLength(Title, Len);
GetWindowText(Handle, PChar(Title), Len);
ActiveCaption := TrimRight(Title);
end;
end;
hardouz199
Messages postés jeudi 22 février 2007Date d'inscription
26 novembre 2009
Dernière intervention -21 nov. 2007 à 20:11
0
Merci
apparement c'est GetForeGroundWindow pour renvoyer le handle de la fenetre active mais comment l'utiser pour afficher le texte de cette fenetre Getwindows text ?
japee1799
Messages postés vendredi 27 décembre 2002Date d'inscription
19 juillet 2018
Dernière intervention -22 nov. 2007 à 10:43
0
Merci
Salut,
Je suppose :
+ 1 parce que GetWindowText retourne un résultat tronqué d'un caractère dans la plupart des cas => donc TrimRight pour les autres cas.
Personnellement, je prèfère utiliser un array of Char pour récupérer la valeur, ça simplifie et raccourcit le code :
var
Handle: THandle;
Title: array[0..255] of Char;
begin
Result := '';
Handle := GetForegroundWindow;
if Handle <> 0 then
begin
GetWindowText(Handle, Title, SizeOf(Title));
Result := Title;
end;
end;
a aidé 97 internautes ce mois-ci