Plusieurs shape

Résolu

ced55957 Messages postés 108 Date d'inscription dimanche 2 mars 2003 Statut Membre Dernière intervention 19 juin 2012 - 14 août 2009 à 00:29
ced55957 Messages postés 108 Date d'inscription dimanche 2 mars 2003 Statut Membre Dernière intervention 19 juin 2012 - 14 août 2009 à 01:20

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

A voir également:

Shape delphi
Delphi format - Conseils pratiques -Delphi
Delphi thread - Conseils pratiques -Delphi
Delphi stringreplace - Forum Delphi / Pascal
Delphi formatdatetime ✓ - Forum Delphi / Pascal
Manipulation avec FormatDateTime ✓ - Forum Delphi / Pascal

2 réponses

Réponse 1 / 2

f0xi Messages postés 4205 Date d'inscription samedi 16 octobre 2004 Statut Modérateur Dernière intervention 12 mars 2022 35
14 août 2009 à 00:40

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);

Réponse 2 / 2

ced55957 Messages postés 108 Date d'inscription dimanche 2 mars 2003 Statut Membre Dernière intervention 19 juin 2012
14 août 2009 à 01:20

merci bien foxi

Discussions similaires

Parametre de ShellExecute

Fonction Pos().

Convertir un png en jpeg Delphi XE

Récupérer le nom d'un shape

Décompiler un EXE Delphi

Votre réponse

Discussions similaires