在Delphi中清空字符串网格

发布时间：2020-12-15 09:10:52 所属栏目：大数据来源：网络整理

导读：在Delphi中,是否有一种快速清空TStringgrid(包含超过5000行)的方法,它还可以释放内存？将rowcount设置为1,清空网格但不释放内存. 提前致谢, 保罗解决方法这应该取消初始化分配的字符串(从存储行文本的字符串列表).清理由列完成,因为您有很多行. procedure

在Delphi中,是否有一种快速清空TStringgrid(包含超过5000行)的方法,它还可以释放内存？

将rowcount设置为1,清空网格但不释放内存.

提前致谢,

保罗

解决方法

这应该取消初始化分配的字符串(从存储行文本的字符串列表).清理由列完成,因为您有很多行.

procedure TForm1.Button1Click(Sender: TObject);
var
  I: Integer;
begin
  for I := 0 to StringGrid1.ColCount - 1 do
    StringGrid1.Cols[I].Clear;
  StringGrid1.RowCount := 1;
end;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!