Probleme avec TEdit

Bonjour,

Voila, j ai defini sur ma fiche 21 composants TEdit (Edit1, ... Edit21).
A l interieur de chacun de ces composants je veux afficher une valeur (qui elle vient d un tableau a une dimension de taille 255).
Je veux pouvoir faire defiler mon tableau a l interieur de ces 21 composants (J espere que je suis clair).

Pour cela, j aimerais utiliser une boucle "for" et remplir la valeur du TEdit correspondant.

Le probleme c est que je ne veux pas taper dans mon source Edit1->Text =
puis Edit2->

...
jusqu a Edit21->Text =

Comment est il possible d automatiser tout ca, car si je fais une AnsiString qui contient le nom du genre: editName = "edit"+position
et que je l utilise de lq mqniere suivante:
Form1->editName->Text

le compilateur me donne une erreur car il ne connait pas ca (ce qui parait logique apres reflexion)

Mais comment faire ???

Passer par des macros qui remplace tout ca lors de la precompilation

Ou faire pointer mes 21 Edit->Text sur des pointeurs d entier

...

Je sais plus moi

Merci d avance

tu peux par exemple employer la fonction
FindComponent qui te retoune le pointeur vers le composant grâce à son nom :

exemple avec 10 TEdits:

Code:

---

1 2 3 4 5 6 7 8 9 10 11

void __fastcall TForm1::Button1Click(TObject *Sender) { int tab[10]={2,23,45,65,78,89,100,23,34,4}; for(int i=1;i<=10;i++){ TEdit * Edit=NULL; Edit =(TEdit*) FindComponent("Edit"+IntToStr(i)); if(Edit!=NULL){ Edit->Text=IntToStr(tab[i-1]); } } }

---

Salut !

Si tes 21 TEdit sont sur le même parent et si l'algo pour les placer n'est pas trop
compliqué, alors le plus simple est encore de faire une class dérivée de TComponent
qui va créer tes 21 TEdit dynamiquement. Ensuite, il suffit de développer une méthode
qui va traiter ses propres "Components" c'est à dire les 21 TEdit.
Quelque chose dans ce genre là :

Code:

---

1 2 3 4 5 6 7

class jEdits : public TComponent { public : __fastcall jEdits(TComponent *Owner); __fastcall ~jEdits(); void __fastcall Afficher(int *Tableau, int N, int Max); };

---

Code:

---

1 2 3 4 5 6 7 8 9 10

__fastcall jEdits::jEdits(TComponent *Owner) : TComponent(Owner) { TEdit *E; for(int j = 0; j < 21; j++) { E = new TEdit(this); //E est détenu par l'objet jEdits E->Parent = (TWinControl*)Owner; //Owner dérivé de TWinControl (TForm, TPanel..) E->SetBounds(., ., ., .); } }

---

Code:

---

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

void __fastcall jEdits::Afficher(int *Tableau, int N, int Max) { int n; for(int j = 0; j < 21; j++) { n = N + j; if(n < Max) { ((TEdit*)Components[j])->Text = IntToStr(Tableau[n]); } else { ((TEdit*)Components[j])->Text = "Overflow"; } } }

---

Sauf erreur de ma part...

Code:

---

1 2 3

TScrollBar *Scrollbar1; jEdits *Edits; int Tableau[255];

---

Code:

---

Edits = new jEdits(this); //dans le constructeur de la form

---

Code:

---

Edits->Afficher(Tableau, ScrollBar1->Position, 255);

---

NB : La destruction des objets dérivés de TComponent est automatique.

A plus !

voui c 'est évidemment beaucoup plus élégant :wink:
..et plus évolué...pour afficher un tableau d'entier.

personellement j'aurais plutôt choisi une StringGrid ...