Delphi-Quellcode:
begin
Cells[0, RowCount-1]:=LabeledEdit1.Text;
Cells[1, RowCount-1]:=LabeledEdit2.Text;
Cells[2, RowCount-1]:=LabeledEdit3.Text;
Cells[3, RowCount-1]:=LabeledEdit4.Text;
RowCount:=RowCount+1;
end;
Mit dem Code produzierst du aber immer eine Leerzeile am Ende, oder?
Du solltest erst den RowCount hochsetzten und dann die Werte eintragen:
Delphi-Quellcode:
begin
RowCount := RowCount + 1; // erst Platz schaffen für neue Daten
// dann neue Daten eintragen
Cells[0, RowCount - 1] := LabeledEdit1.Text;
Cells[1, RowCount - 1] := LabeledEdit2.Text;
Cells[2, RowCount - 1] := LabeledEdit3.Text;
Cells[3, RowCount - 1] := LabeledEdit4.Text;
end;