delphi – 如何禁用更新大量控件的屏幕更新?

前端之家收集整理的这篇文章主要介绍了delphi – 如何禁用更新大量控件的屏幕更新?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我有一个形式与50或更多的控件,我创建和添加在运行时.我不想看到一个一个出现;我宁愿在开始时禁用绘图/开始缓冲然后看到它们都立即出现.

我似乎记得在十年前在BCB这样做的事情,但忘记了如何.

解决方法

我不知道是否有一个特定于Delphi的方法来执行此操作,但是使用Win32 API,这是通过 WM_SETREDRAW消息完成的.

编辑:感谢Ken White和Sertac Akyuz下面的示例代码.

begin
  // Defer updates
  SendMessage(Handle,WM_SETREDRAW,WPARAM(False),0);
  try
    // Create all your controls here
  finally
    // Make sure updates are re-enabled
    SendMessage(Handle,WPARAM(True),0);
    // Invalidate;  // Might be required to reflect the changes  
  end;
end;

猜你在找的Delphi相关文章