delphi视图刷新问题

问题描述：

当软件与其他应用程序切换后（比如切换到word，然后切换回来），导致软件的绘图区域花屏，显示不全，这个现象是偶现，但是频率很高，不得不处理。

分析解决：

花屏的原因应该是opengl的刷新不及时，导致切换回来花屏，解决办法就是当切换回来，手动刷新一下。

然而愚钝的是，对于在delphi下的消息截取及分发机制很不熟悉，查了很久，发现可以窗体可以截取消息，然后将消息分发给需要刷新的窗体，手动刷新一下。

消息为：WM_ACTIVATE，当窗体被激活时会发送这个消息。

窗体override wndproc函数，截取WM_ACTIVATE消息，给子窗体发送Sendmessage，然后调用刷新。千万不要在子窗体（如MDI窗体）中截取这个消息，因为子窗体是截取不到该消息的。只能是主窗体截取该消息，然后将消息分发，子窗体响应该消息就可以了，在子窗体响应函数中刷新需要的组件（我这里是opengl的视图）。

本来很简单的事情，还弄了很久，看来基本功确实需要加强，惭愧。