那位大虾给做个类似vb中doEvents的功能

Question

说明转让控制权，以便让操作系统处理其它的事件。
DoEvents 会将控制权传给操作系统。当操作系统处理完队列中的事件，并且在 SendKeys 队列中的所有键也都已送出之后，返回控制权。DoEvents 对于简化诸如允许用户取消一个已启动的过程 — 例如搜寻一个文件 — 特别有用。对于长时间过程，放弃控制权最好使用定时器或通过委派任务给 ActiveX EXE 部件来完成。以后，任务还是完全独立于应用程序，多任务及时间片由操作系统来处理小弟用delphi处理数据是时间代长。这样屏幕就会‘死掉’只要切换一下屏幕就花了！痛苦中...... 那位高人指点以下！

Answer 1

Application.ProcessMessage;
或者
Application.HandleMessage;
就可以了。

Answer 2

就是
Application.ProcessMessages;