problem z instrukcja w petli for - poczatkujacy

Witam,

Jestem poczatkujacym uzytkownikiem delphi , moj problem polega na:

Mam stringgrid z 5 wersami , button dodaje tekst z edita do stringgrida. Po kliknieciu tekst ma pojawic sie w pierwszym wersie , po kolejnym kliknieciu na button tekst ma pojawic sie w drugim wersie itd po kolei.

Chce wykorzystac petle for, napisalem cos takiego:

var
x,y:integer;
begin
for x:=1  to 5 do begin
 StringGrid1.Rowcount:=y;
 y:=x+1;
 StringGrid1.Cells[1,x]:=Edit1.text;
end;
end;

ale nie dziala jak powinno , zamiast dodawac po jednym po kolei do nastepnych wersow to wywala Od razu wszystkie. Nie wiem jak napisac ,aby sprawdzac aktualny nr pustego wersu ze stringgrid i dodawac 1 nastepny.

Prosze o pomoc , dziekuje

jest tu kto?

Hmm... jak masz for'a w procedurze obslugi przycisku, to CALY for sie wykonuje po jedynym wcisnieciu tego przycisku. A nie tylko jedna iteracja (obrot petli).

co ???? o czym mowisz

var
x,y:integer; //<-- Za każdym razem Y = 0
begin
for x:=1  to 5 do begin
 StringGrid1.Rowcount:=y;
 y:=x+1;
 StringGrid1.Cells[1,x]:=Edit1.text;
end;
end;

Użyj Inc(Y, X+1); oraz zadeklaruj Y jako zmienną globalną a nie w funkcji

Kod w pętli wykona się w tym samym momencie bez oczekiwania na wciśnięcie buttona.