本文整理自网络,侵删。
很不错的咚咚 对线程 然后等待响应 就不会卡死窗体了。
Repeat
Ret :=WaitForSingleObject(hThread,100);
Application.ProcessMessages;
Until Ret <> Wait_Timeout ;
相关阅读 >>
Delphi里参数修饰符const、var、out的作用分别是什么?
Delphi xe [dcc32 fatal error] f2039 could not create output file 问题的解决
Delphi 2009 之 tcategorypanelgroup[5]: headerstyle
更多相关阅读请进入《Delphi》频道 >>