ET oui pas le temps de laisser le forum trankil...décidé!
 
 
une autre kestion m'interroge?
 
sur une form j'ai placé plusieurs zones de texte "edit"
 
edit1 edit2 edit3....edit10
 
kk'un pourrais me corrige ce petit test?
 
    For i:= 1 to 10 do
      begin
        j := i;
        str(j, S);
        Tableau_test[1,i] := 'edit' + S '.text';
      end;
 
comment fait on pour indexer une zone de texte.
 

La solution pas très propre et pas très performante mais qui ne demande pas bcp de lignes de code :
Tableau_test[1,i] := (FindComponent(Format('edit%d', [i])) as TEdit).Text;
(et donc virer S et j)
 
Une meilleure solution si tu dois souvent accéder à tes TEdit sur base d'un index est de les mettre dans un tableau (array of TEdit)

je teste ça hélico presto....ne t'endors pas, reste éveillé...
 
Ton aide m'est d'un grand secours.
 
merci bocoup!

Fonctionne....la premiere évaluation sale et cochon de findComponent..
 
 
ALlé je m'attak à Tableau(array of Tedit).

les parenthèses c'était pas du code, c'était pour préciser ce que j'entendais par un tableau
 
un truc genre :
 
Edits: array [1..10] of TEdit;
 
Dans le OnCreate de ta Form tu mets :
Edits[1] := Edit1;
Edits[2] := Edit2;
etc. jusqu'à 10
 
Puis quand tu voudras accéder à un de ces edits tu n'aurais qu'à utiliser Edits[i].Text par exemple.

ça fonctionne, !! c trop classe..IMPRESSIONANT..
j'ai hate d'etre une bestiole comme twa.
 
et pour le fichier aide de DELPHI, juré je m'y mets...apré cette derniere kestion:
 
Pokoi, g ce message d'avertissement kand je fais une boucle FOR
 
"La variable de contrôle de la boucle FOR doit etre un variable locale simple"..

la variable que tu indiques dans ton for (for i := ... to ..., le i dans ce cas-ci) doit être déclarée dans la section var de la fonction/procédure dans laquelle il y a le for