salut les amis
j'ai une form avec 10 panal et dans chaque panal j'ai 3 label alors comment je peut changer la couleur de mes label (tout) avec une seul clique....?
merci d'avance
salut les amis
j'ai une form avec 10 panal et dans chaque panal j'ai 3 label alors comment je peut changer la couleur de mes label (tout) avec une seul clique....?
merci d'avance
Salut
il te suffit de lister les composant de ta form et d'appliquer la couleur si le composant et un tlabel
exemple :@+ Phil
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 for i := 0 to Pred(maform.ComponentCount) do begin c := maform.Components[i]; if c is Tlabel Then c.Color := CurrentColor ; end;
Blaise PascalNous souhaitons la vérité et nous trouvons qu'incertitude. [...]
Nous sommes incapables de ne pas souhaiter la vérité et le bonheur, et sommes incapables ni de certitude ni de bonheur.
PS : n'oubliez pas le tag
Merci beacoup alors moi j'ai essaye caEnvoyé par anapurna
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 for I := ComponentCount - 1 downto 0 do begin if Components[I] is Tlabel Then begin Tlabel(FindComponent(Components[i].Name)).Color:= clBackground; end else end;
C'est très bien ce que tu as essayé
Il y a juste un else en trop sur l'avant-dernière ligne, c'est tout.
Bidouilleuse Delphi
salut
le findcompoment ne sert a rien dans ton code
@+ Phil
Blaise PascalNous souhaitons la vérité et nous trouvons qu'incertitude. [...]
Nous sommes incapables de ne pas souhaiter la vérité et le bonheur, et sommes incapables ni de certitude ni de bonheur.
PS : n'oubliez pas le tag
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager