Application.ProcessMessages
摘要://如果有这样一个循环, 是非常可怕的; 因为它完不了, 你得等着. procedure TForm1.Button1Click(Sender: TObject); var i: Integer; begin for i := 0 to MaxInt do begin Text := IntToStr(i); end; end; //即使这样也无济于事, 因为在循环期...
阅读全文
posted @
2008-02-16 10:55
万一
阅读(12866)
推荐(0) 编辑