Remplir un TStringGrid avec delphi 7

Question

Bonjour, je ne sais pas pourquoi le debut de mon programme ne fonctionne pas. 
J'ai bien placé un StringGrid1 dans ma form. 
J'ai créer une procedure que j'ai nommé RemplissageStringGrind1. En paramètre j'ai mis StringGring1. 

Dans la peocedure je fais juste StringGrid1. Cells[1,1]=IntoStr (1);

Il n'y a aucune erreur quanf j'exécute le programme mais rien ne s'écrit sur mon StringGrid. Je ne sais pas pourquoi. 

Merci pour votre aide. Cela fait longtemps que j'ai programmé. Soyez indulgents.

cs_yanb · Answer

Salut,
Avec le code ca serait bien plus simple, ici on ne peut faire que des suppositions...
"en paramètre j'ai mis  StringGring1" veut dire quoi ? que tu as créé une procédure qui appel  en paramètre StringGring1 au lieu de StringGrid1 dans la procedure RemplissageStringGrind1au lieu de RemplissageStringGrid1...
Aie...
@+

pierrotk10d · Answer

Bonjour,
Voici le code fourni par l'aide de Delphi pour le remplissage d'un TStringGrid.

procedure TForm1.Button1Click(Sender: TObject);
var I, J, K : Integer;
begin
  K := 0;
  with StringGrid1 do
    for I := 0 to ColCount - 1 do
      for J:= 0 to RowCount - 1 do
        begin
          K := K + 1;
          Cells[I,J] := IntToStr(K);
        end;
end;
 
Amicalement

Remplir un TStringGrid avec delphi 7

2 réponses

Votre réponse

Discussions similaires