Delphi TStringGrid 闪烁

Question

我正在运行时从 CSV 文件向字符串网格添加多行，但是 StringGrid 在更新时似乎会闪烁很多，我认为会有一个 beginupadate / Endupdate 命令来停止此操作。但是我找不到它。有没有其他方法可以在更新网格 ID 时停止闪烁。

科林

Answer 1

迟到总比不到好……
我使用 WM_SETREDRAW。例如：

...
StringGrid1.Perform(WM_SETREDRAW, 0, 0);
try
  // StringGrid1 is populated with the data here 
finally
  StringGrid1.Perform(WM_SETREDRAW, 1, 0);
  StringGrid1.Invalidate; // important! to force repaint after all
end;
...

Answer 2

是的，TStringgrid 中没有 BeginUpdate/EndUpdate，但每行或每列都有：

StringGrid1.Rows[0].BeginUpdate;
StringGrid1.Cols[0].BeginUpdate;

Answer 3

These are methods of the `TStrings` object.

Use

StringGrid1.Rows[i]/Cols[i].BeginUpdate;
...
StringGrid1.Rows[i]/Cols[i].EndUpdate;

更新

您是否尝试设置DoubleBuffered := true？

Answer 4

您可以使用 Windows 函数 LockWindowUpdate(AHandle) 来阻止控件的刷新，然后使用 LockWindowUpdate(0) 来重新绘制它。

当句柄传递 Grid.Handle 时。