Changer la couleur d'un texte au passage de la souris [Résolu]

cs_mathieu49 3 Messages postés mardi 20 avril 2004Date d'inscription 28 novembre 2005 Dernière intervention - 17 nov. 2005 à 19:30 - Dernière réponse : ni69 1529 Messages postés samedi 12 juin 2004Date d'inscription 5 juillet 2010 Dernière intervention
- 18 nov. 2005 à 13:46
Bonjours à tous, j'aimerais savoir comment modifier l'aspect d'un texte
au passage de la souris mais sans avoir à cliquer dessus.



Merci
Afficher la suite 

Votre réponse

3 réponses

Meilleure réponse
ni69 1529 Messages postés samedi 12 juin 2004Date d'inscription 5 juillet 2010 Dernière intervention - 18 nov. 2005 à 13:46
3
Merci
Et si tu veux appliquer cette procédure à plusieurs labels différents,
tu n'as qu'à mettre ces procédures dans les événements de tous tes
labels :



procedure TForm1.LabelsMouseEnter(Sender: TObject);

begin

(Sender as TLabel).Font.Color := clBlue;

end ;



procedure TForm1.LabelsMouseLeave(Sender: TObject);

begin

(Sender as TLabel).Font.Color : = clWindowText;

end;


@+

Nico { http://www.ni69.new.fr/ }




<hr size="2" width="100%">

N'oubliez pas de cliquer sur Réponse Acceptée lorsque la réponse vous convient !

Merci ni69 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 75 internautes ce mois-ci

Commenter la réponse de ni69
neodelphi 442 Messages postés jeudi 4 avril 2002Date d'inscription 11 août 2008 Dernière intervention - 18 nov. 2005 à 07:01
0
Merci
Utilise les évènement d'un TLabel, je croit que c'est onMouseEnter et onMouseLeave.

neodelphi
Commenter la réponse de neodelphi
jlen100 1651 Messages postés samedi 10 juillet 2004Date d'inscription 25 juillet 2014 Dernière intervention - 18 nov. 2005 à 10:33
0
Merci
tu peux faire comme ça:

procedure TForm1.Label1MouseEnter(Sender: TObject);


begin


label1.Font.Color:= clblue;//change la couleur à l'entrée


end;

procedure TForm1.Label1MouseLeave(Sender: TObject);

begin

label1.Font.Color:= clWindowText;//la rétablie à la sortie

end;



@+

jlen
Commenter la réponse de jlen100

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.