如果运行一个耗时的循环，可能会导致程序不会响应用户的其它操作，例如鼠标点击。这个时候可以在循环中添加Application.ProcessMessages，以便于在循环执行到此代码时，
应用能够响应用户的操作。这里的用户操作仅限于对此应用的操作，用户对其它软件或操作系统的操作都是可以的。
我之前写过一个抽奖小程序，在一个对号码随机抽取的循环中，发现无法点击程序的其它按钮。
delphi7:Application.ProcessMessages的作用
原文：https://www.cnblogs.com/huiy/p/12466999.html