本文整理自网络，侵删。
delphi关于延迟时间的一点智慧
一般的做法：
Sleep(2000); // 延迟2秒
此种做法有俩个弊端：
（1）如果实际需要的延迟时间不需要2秒，则明显有延迟时间浪费；
（2）如果实际需要的延迟时间超过2秒，则很可能发生不可预料的错误。
改进的做法：
repeat
Sleep(10);
until
FileExists('c:\temp\invoice.pdf')=True;
优点：将一次大的延迟时间分割成小的，一旦条件成立就退出了延迟，
使得延迟的时间同实际需要的几乎一样。也杜绝了前面第二种情况错误的发生。
相关阅读 >>
Delphi superobject json操作类的基本用法
更多相关阅读请进入《Delphi》频道 >>
