Discussion :

[chourmo]

Bonjour,
ça doit être tout simple mais je souhaiterai afficher deux LEDs dont les couleurs varieront à ma guise.
merci pour tout aide
j'ai parcouru le forum et la faq, en vain, je suis débutant
Seb

[Rayek]

tu peux utiliser les TShapes (en mode stCircle) ou bien, tu peux utiliser les composants Led de la JVCL.

[chourmo]

tu peux utiliser les TShapes (en mode stCircle) ou bien, tu peux utiliser les composants Led de la JVCL.

J'ai choisi d'utiliser le type TShape. cependant, je rencontre des difficultés pour changer la couleur. Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
  if ( FH1500_250.FH_en_TX )
  then fm03_ModeMaintenance_250.sh_LED_TX.Brush.Color:=clLime;

Delphi me dit "Identificateur non déclaré pour cllime "
???
merci
Seb

[chourmo]

j'ai plutot utilisé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
  if ( FH1500_250.FH_en_TX )
  then fm03_ModeMaintenance_250.sh_LED_TX.Pen.Color:=clGreen;

sans succès, toujours "identificateur non déclaré"
???
Seb

[chourmo]

décidemment , je me mélange : c'est bien la propriété brush.color que je veux passer en vert ou blanc selon certaines conditions de mon code.
Le code ci dessous ne marche pas, qui pourrait m'éclairer ? :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
  if ( FH1500_250.FH_en_TX )
  then fm03_ModeMaintenance_250.sh_LED_TX.Brush.Color:=clGreen;

Seb

[Rayek]

Est ce que tu as mis dans les uses de ton unité : Graphics,
car vu le message d'erreur c'est qu'il ne te trouve pas les couleurs et elles sont dans cette unité.

[chourmo]

Est ce que tu as mis dans les uses de ton unité : Graphics,
car vu le message d'erreur c'est qu'il ne te trouve pas les couleurs et elles sont dans cette unité.

effectivement
merci pour l'aide

[tourlourou]

tu as des bmp de LED de plusieurs couleurs, allumées ou éteintes fournies dans les images avec delphi (dans Prgrm Files\fichiers communs\Borland)