Im Stringgrid oben eine neue Zeile einfügen

[saschi35]

HALLO ich habe eine Frage,

ich habe ein stringgrid erstellt, dieses füllt sich nach eingabe meiner edits und mit dem abschluss durch klicken auf einen button.

Beispiel:

NAME ORT DATUM
HALLO HALLO HALLO
.... ..... .....

wie kann ich beim nächsten klick auf den Button nach unten rutschen, sprich der 2 eintrag steht unter dem ersten oder noch besser wäre der 2 eintrag steht über dem 1.

Vielen Dank

Derzeit habe ich es so stehen, aber es funktioniert nicht:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.visible:= true;

//EINGABEN IN LISTE ANZEIGEN//
stringgrid1.cells[1,1]:= e_name.Text;
stringgrid1.cells[2,1]:= e_ort.Text;
stringgrid1.cells[3,1]:= e_stra.Text;
stringgrid1.cells[4,1]:= e_stich.Text;
stringgrid1.cells[5,1]:= e_anz.Text;


stringgrid1.RowCount := stringgrid1.RowCount + 1;