Plusieurs shape [Résolu]

Signaler
Messages postés
110
Date d'inscription
dimanche 2 mars 2003
Statut
Membre
Dernière intervention
19 juin 2012
-
Messages postés
110
Date d'inscription
dimanche 2 mars 2003
Statut
Membre
Dernière intervention
19 juin 2012
-
bonsoir

je voulais savoir comment fait t'on pour dire si la shape1 shape2 shape3 son de meme couleur alors shape 4 la meme couleur que shape1,2,3 sinon shape4 une couleur differente

merci pour vos reponse

2 réponses

Messages postés
4199
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
2 janvier 2019
29
if (Shape1.Brush.Color = Shape2.Brush.color) and
(Shape1.Brush.Color = Shape3.Brush.Color) then
Shape4.Brush.Color := Shape1.Brush.Color
else
Shape4.Brush.Color := $00FFFFFF and (not Shape1.Brush.Color);
Messages postés
110
Date d'inscription
dimanche 2 mars 2003
Statut
Membre
Dernière intervention
19 juin 2012

merci bien foxi