stringgrid如何清空
with StringGrid1 do for I := 0 to ColCount - 1 do Cols[I].Clear;
//或
with StringGrid1 do for I := 0 to RowCount - 1 do Rows[I].Clear;
//或
for i := 0 to vGrid.rowcount-1 do
for j := 0 to vGrid.colcount-1 do
vGrid.cells[j , i -] := '';