Hallo,
FStringgrid.RowCount := 0; // alles löschen
damit löscht Du nicht wirklich alles.
Darum schreibst Du mit FStringgrid.Cols[0].Add... unter die sichtbaren Zeilen.
Setz mal vor der Zeile den Code ein, vermute das es Dein Problem löst:
Delphi-Quellcode:
for i := 0 to FStringgrid.RowCount-1 do
FStringgrid.Rows[i].Clear;