Verzweifelt suche ich noch nach einer Lösung für das eigene book keeping.
Die Procedure löscht die 1.Zeile im StringGrid, nimmt aber auch die Titel-
zeile weg.
Delphi-Quellcode:
procedure DeleteFirstRow(const: Grid : TStringGrid; RowNumber : Integer);
var
i: Integer;
begin
for i := RowNumber to Grid.RowCount -2 do
Grid.Rows[i].Assign(Grid.Rows [i -1]);
Grid.Rows [Grid.RowCount -1].Clear;
Grid.RowCount := Grid.RowCount-1;
end;
procedure TFRechn.BtnNeuClick(Sender: TObject);
...
DeleteFirstRow(StringGridRedat, 1);
...
Gruß
Lombi