boujour tous le monde ou a ceux qui sont entrain de me lire
 
je vient de débuter dans ce domaine et mes premiers pas sont baser sur les forums, voila mon petit probleme
 
 
je veut remplir des Edits depuis un Stringgrid sont faire genre
 
edit1.Text:=cells [0,0] ;
edit2.Text:=cells [0,1] ;
edit3.Text:=cells [0,2] ;
 
merci de votre gentiesse et votre patience avec les débutant

Bonjour

il faudrait preciser la question car là j'ai pas bien compris
ce que vous voullez ou ne pas faire .

pour acceder aux données d'un stringgrid
stringgrig1.cells[0,0] := 'test' pour afficher un text
ou edit1.text := stringgrig1.cells[0,0] pour avoir le text

CDT

je veut  faire genre :

edit(I).text := stringgrig1.cells[0,(J)]

Bonjour tt le monde

utilisez le code suivante, je pense qu'il vous sera util  :-(

Var i : integer;
begin
for i := 0 to ComponentCount-1 do
begin
if (Components[i] is TEdit) then
(Components[i] as TEdit).Text:=stringgrig1.cells[0,i]

end;

J'ai oublie de vous souhaiter bonne chance et bon courage

HAFTARIFOUAD

for i := 0 to ComponentCount-1 do

ne marche que si le conteneur est une forme..

cantador

C'est ce que j'ai fait:

procedure TForm1.Button5Click(Sender: TObject);

 Var i : integer;
     j : integer;
 begin
       for i := 10 to ComponentCount   do es ce que  le -1 aprés ComponentCount                                                                     est essentiel parceque lors                                                                                        du remplissage des edit j'ai les valeurs                                                                        les cells impaire
begin
      for j := 0 to 4 do
begin
     if (Components[i] is TEdit) then
     (Components[i] as TEdit).Text:=stringgrid1.cells[0,j]

end;
end;
end;
end.

le message d'erreur que je reçoi:
[Avertissement] Unit1.pas(174): La variable de contrôle de boucle FOR doit être une variable locale simple

C'est ce que j'ai fait:

procedure TForm1.Button5Click(Sender: TObject);

 Var i : integer;
     j : integer;
 begin
       for i := 10 to ComponentCount   do es ce que  le -1 aprés ComponentCount est essentiel parceque lors  du remplissage des edit j'ai les valeurs les cells impaire
begin
      for j := 0 to 4 do
begin
     if (Components[i] is TEdit) then
     (Components[i] as TEdit).Text:=stringgrid1.cells[0,j]

end;
end;
end;
end.

le message d'erreur que je reçoi:
[Avertissement] Unit1.pas(174): La variable de contrôle de boucle FOR doit être une variable locale simple

désolé pour la repétition du message je me suis trompé lors de la correction


merci

Bonjour

Merci de nous montrer le nombre des TEdit, qui contient votre TForm?

et pour la variable i;

For I:=PremierNombreDesTEdit to DernierNombreDesTEdit-1    do

si vous pousez 5TEdit dans une TForm le code sera

For i:=0 to 5-1 do
// votre code ici
end;