application.processmessage是什么意思？

Question

application.processmessage是什么意思？

Answer 1

这个其实在帮助中写得很详细。
就是让应用程序中断当前正在处理的事件，去响应消息队列中的有关消息。举一个例子吧：
var 
  Breaked:Boolean;
procedure TForm1.FormCreate(Sender:TObject);
begin
  Breaked:=Flase;
end;procedure TForm.Button1Click(Sender:TObject);
begin
  Breaked:=True;
end;procedure TForm.Button2Click(Sender:TObject);
begin
  Breaked:=False;
  while true do
  begin
    GetTickOut;
    Application.ProcessMessage;//响应消息队列中的有关消息
    if Break then
      Break;//如果Button1按了就跳出循环.
  end;
  ShowMessage('已经 跳出了循环!');
end;

Answer 2

processmessage中process是"处理"的意思