Problem mit StringGrid Füllen, komme nicht weiter

[AlexII]

Hallo,

ich will ein StringGrid füllen, es klappt auch soweit, aber wenn ich die Anwendung schließe stürzt sie ab (siehe Screenshot), weiß nicht mehr weiter.

Hab wie folgt eingestellt:
RowCount=1
FixCols=0

Hier der Code:

Delphi-Quellcode:

i:=Form1.StringGrid1.RowCount-1; //<- wenn ich die 1 weglasse stürzt das Prog nicht ab, aber dann wird die SringGrid falsch gefüllt, erste Zeile bleibt leer.

senderindex[i].name:=LabeledEdit1.Text;
senderindex[i].vorname:=LabeledEdit2.Text;

Form1.StringGrid1.RowCount:=Form1.StringGrid1.RowCount+1;

Form1.StringGrid1.Cells[0,i] := senderindex[i].name;
Form1.StringGrid1.Cells[1,i] := senderindex[i].vorname;

Danke für die Hilfe!