Merci beaucoup pur ta réponse. Ca parait tellement simple dès qu'on a la solution ^^
@pluche
-------------------------------
Réponse au message :
-------------------------------
> Tu peux effectivement les créés à la chaine dans le OnCreate de la fiche ou à un autre moment :
>
>
procedure TForm1.FormCreate(Sender: TObject);
> Var ED:TEdit;
> i:Integer;
> begin
> ListBox1.Items.Assign(Screen.Fonts);
> For i:=1 to 100 Do
> Begin
> ED:=TEdit.Create(Self);
> ED.Parent:=Self;
> ED.Name :='MonEdit'+IntToStr(i);
> ED.Top:=i*2;
> ED.Meft:=i*2;
> End;
> end; |
>
> Ensuite pour accéder à un Edit particulier :
>
>
| TEdit(Form1.FindComponent('MonEdit'+IntToStr(Num))).Text:='Toto'; |
>
> ---
Nono40@fr.st
---
> Nouveau --->
Nono40.fr.st>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > Bonjour à tous
> >
> > Lors de l'exécution de mon prog, je doit créer X composant Tedit sur une forme. Suis je obligé de déclaré X fois Edit1, Edit2, ..., ou puis uniquement en déclarer un, puis les créer dans une boucle en utilisant un indice genre Edit[i] := Tedit.create ...
> >
> > Merci d'avance
>