Hi !
Am einfachsten löst Du es über eine Schleife:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i,x : integer;
begin
for x := 1 to StringGrid1.RowCount do
for i := 1 to StringGrid1.ColCount do
StringGrid1.Cells[i-1,x-1]:='';
end;
Gruß, Helld