Peux ton simplifier du code

bonjour

j'aimerais savoir si il est possible de modifier cette partie de code

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41

while(Connection_BD->TableSqlPal->Eof == false) { EtatZone = Connection_BD->TableSqlPal->FieldByName("Etat")->Value; // Champ a remplir if(EtatZone == "Occupé") { NomZone = Connection_BD->TableSqlPal->FieldByName("Nom_ZoneP")->Value;   switch(NomZone) { case 1: { BP1->Color = clRed; ShapeBP1->Brush->Color = clRed; break; }   case 2: { BP2->Color = clRed; ShapeBP2->Brush->Color = clRed; break; } case 3: { BP3->Color = clRed; ShapeBP3->Brush->Color = clRed; break; } case 4: { BP4->Color = clRed; ShapeBP4->Brush->Color = clRed; break; } }   } Connection_BD->TableSqlPal->Next(); }

---

car de le switch je dois mettre 21 case logiquement.

merci d'avance

Tu peux faire des array de taille 21.
Tu en fait une de BP, une de ShapeBP et une de (ou deux je sais pas trop) de Couleur. Ensuite ton code ressemble à

Code:

---

1 2 3

BP[NomZone]->Color = Couleur[NomZone]; ShapeBP[NomZone]->Brush->Color = Couleur[NomZone];

---

ok merci

mais je comprend pas trop comment je fais mon test pour verifier si il faut mettre la couleur ??

le nombre de ligne de code reste identique non ??

merci de votre aide

Dans le code que tu as mis plus haut tu ne fais pas de test, tu mets toujours de la couleur?

Moi je te parle de faire une array comme celle-ci pour la couleur:

Code:

---

1 2 3

TColor Couleur[] = {clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed, clRed};

---

Je ne sait pas si tes ShapeBPXX sont des TShape, si oui le code devrait être comme ceci:

Code:

---

1 2 3 4

TShape *ShapeBP[] = {ShapeBP1, ShapeBP2, ShapeBP3, ShapeBP4, ShapeBP5, ShapeBP6, ShapeBP7, ShapeBP8, ShapeBP9, ShapeBP10, ShapeBP11, ShapeBP12, ShapeBP13, ShapeBP14, ShapeBP15, ShapeBP16, ShapeBP17, ShapeBP18, ShapeBP19, ShapeBP20, ShapeBP21};

---

Ensuite tu n'as pas besoin de faire de switch/case. Tu fais simplement:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

while(Connection_BD->TableSqlPal->Eof == false) { EtatZone = Connection_BD->TableSqlPal->FieldByName("Etat")->Value; // Champ a remplir if(EtatZone == "Occupé") { NomZone = Connection_BD->TableSqlPal->FieldByName("Nom_ZoneP")->Value; //BP[NomZone]->Color = Couleur[NomZone]; ShapeBP[NomZone]->Brush->Color = Couleur[NomZone];   } Connection_BD->TableSqlPal->Next(); }

---

Bonjour les builderistes ...
(ca fait bien longtemps que je n'étais pas passé par la)

Est ce obligatoire de passer par des déclarations de tableaux ?
On ne pourrais pas jouer avec FindComponent, sachant que l'on a une partie fixe pour le nom de l'objet apparement ("ShapeBP") et une partie dynamique( NomZone ).


Comme décris ici quoi:
http://cpp.developpez.com/faq/bcb/?p...mposantsdivers

@+
;)

Voici ma contribution :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

while(Connection_BD->TableSqlPal->Eof == false) { if( Connection_BD->TableSqlPal->FieldByName("Etat")->Value == "Occupé") { String cpIdx = Connection_BD -> TableSqlPal -> FieldByName("Nom_ZoneP") -> Value ;   TPaintBrush *PBrushi = dynamic_cast <TPaintBrush*> (this -> FindComponent("BP" + cpIdx)); TShape *Shapei = dynamic_cast <TShape*> (this -> FindComponent("ShapeBP" + cpIdx));   if (Shapei != NULL && PBrushi !=NULL) { PBrushi -> Color = clRed; Shapei -> Brush -> Color = clRed; } } }

---

A noter :ccool:

Il ya aussi une façon d'optimiser plus ton programme :

Si TableSqlPal est une requette, ajoute une condition à la requette de manière à sélectionner les enregistrements dont :

Code:

---

1 2 3 4

Select .... Form .... Where .... AND (Connection_BD->TableSqlPal->FieldByName("Etat")->Value == "Occupé")

---

Sinon, Si TableSqlPal est une table, tu peux faire un filtrage des enregistrements, ça aacèlère l'execution.

;)

Salut, l'idée du FindComponent est bonne si le code n'est pas appelé trop souvent. Faire 42 FindComponent prend beaucoup de temps comparativement à lire une array, mais si la tâche n'est exécuter que quelques fois et qu'il n'est pas dans une boucle, c'est bon ;)

En plus, il n'avait pas préciser si les composants étais tous sur la même Form. Donc à ce niveau aussi l'array est une meilleure solution. C'est très facile de faire:

Code:

---

1 2	TShape *ShapeBP[] = {Form1->ShapeBP1, Form2->ShapeBP2, ...};

---

Il y'avait un bug sur le programme que j'ai posté plus haut :aie:

Code:

---

1 2 3

if (Shapei != NULL)

---

A reprendre par :

Code:

---

1 2 3

if (Shapei != NULL && PBrushi !=NULL)

---

C bon j'ai corrigé :mrgreen:

Merci de votre aide j'ai choisi la méthode de Crayon rapide et efficace .

Merci