如何快速清空stringgrid中的全部内容

如题所述

第1个回答 2017-05-11

procedure TForm1.Button1Click(Sender: TObject);
var
x, y: integer;
begin
for y := 0 to StringGrid1.RowCount - 1 do
for x := 0 to StringGrid1.ColCount - 1 do
StringGrid1.Cells[x, y] := '';
end;

第2个回答 2018-03-20

StringGrid.RowCount := 0;

相似回答

delphi 要清除stringgrid所有的信息怎么写?我写的代码是:Self.strng...答：//StringGird内容清空 procedure SG_clear(SG:TStringGrid);var i,j: integer;begin for i:=0 to SG.ColCount -1 do for j:=0 to SG.RowCount -1 do SG.Cells[i,j] := '';SG.ColCount := 0;SG.RowCount := 0;end;

有没有较直接的方法删除STRINGGRID中所选中的一行??答：可将所选行的记录清空后，将下一行的记录上移后，然后再用ROWCOUNT-1删除最后一行。虽然比较麻烦，但可以实现你的要求！

关于delphi中stringgrid的一个函数答：rows[Selection.Bottom+1].Clear;//清空插入行，你对它赋值就好了 end;for i:=Selection.Bottom+1 to rowcount-1 do 对选择行的最后那行后面那行开始到stringgrid的最后一行遍历 for i:=j+1 to rowcount-1 do 清空最后几行

delphi中stringgrid如何动态增加一行。如何删除一行。答：动态增加一行就是把当前RoaCount 加一,在最新的行下面赋上相应的值就行了.删除一样麻烦,如果删除最后一行,直接将最后一行值清空, rowcount 减一.如果不是最后一行,把当前行清空,同时把当前行下面的所有行都依次上移.需要写个循环了这个...

大家正在搜

如何清空表格中的内容如何全部删除朋友圈的内容如何快速清空朋友圈如何清理朋友圈别人的内容怎么快速删除表格里的内容自己朋友圈怎么全部清空怎么清理朋友圈以前的内容朋友圈怎么全部清空一键清空表格内容