(delphi菜鸟大提问系列)1.我做的程序为什么总是象死机一样!

Question

各位大虾:
我是一个delphi初学者,已经做了几个程序,但发现老存在这样那样的问题,
现分批求问:
1.我做的程序都有这样一个通病,就是当程序执行某项操作时,整个程序就几乎
什么都不响应,如果将其最小化或切换窗口后再恢复时,程序界面简直是惨不忍睹
----------白白的一片!直到执行结束,尤其是对数据库进行操作时情况更加严重,
一点都象如foxmail等程序一样即使正在执行操作时也能正常响应!

Answer 1

还有,如我在进行数据遍历操作时,想同时用label控件显示当前的计数变量的值,但如上面我所说的那样,程序根本就不响应,除非用showmessage(inttostr(i))的办法,i是显示出来了,但每次都用按ok,太麻烦了!

Answer 2

在循环体的内部或者是处理数据的间隙中放入下列语句：
Application.ProcessMessage;
这是让 Windows 来处理消息，也就是可以让你的 label 等等控件的内容得到更新，还可以处理其它动作，比如鼠标的单击等。

Answer 3

不好意思，错了一个字。
Application.ProcessMessages.
                          ^