Also ich habe mir ein Funktion geschrieben die egal welches Stringrid löscht und nur die Fixen col und row unbearbeitet bleiben
Delphi-Quellcode:
function TForm1.StringGridLeer(genstrgrid:Tstringgrid):tstringgrid;
var
i,j :integer;
begin
for i := genstrgrid.FixedCols to genstrgrid.ColCount - 1 do
begin
for j := genstrgrid.FixedRows to genstrgrid.RowCount - 1 do
begin
genstrgrid.Cells[i,j] := '';
end;
end;
genstrgrid.rowCount := genstrgrid.Fixedrows + 2;
result := genstrgrid; // wieder zurückgeben
end;
Der Aufruf erfolgt dann mit
kbuch1 := form1.StringGridLeer(kbuch1); // Kbuch ist hier das Stringrid
Somit kann ich es einfach aufrufen egal welches löschen möchte !
und wie findet Ihr das ?