首页
学习
活动
专区
圈层
工具
发布
首页
学习
活动
专区
圈层
工具
MCP广场
社区首页 >问答首页 >睡眠()的最佳替代方案是什么?

睡眠()的最佳替代方案是什么?
EN

Stack Overflow用户
提问于 2022-08-27 10:51:33
回答 2查看 38关注 0票数 1

我正在使用delphi制作一个应用程序,下面是我的代码片段

代码语言:javascript
运行
复制
pnlMenu1.Visible := True;
Sleep(5000);
pnlMenu1.Visible := False;
pnlMenu2.Visible := True;

我需要用户在Sleep()运行时仍然能够做一些事情,但是Sleep()停止了停止程序的主线程。有什么可以用它来代替睡眠()的吗?比如:

代码语言:javascript
运行
复制
pnlMenu1.Visible := True;
//Wait 5 seconds but dont holt main thread
pnlMenu1.Visible := False;
pnlMenu2.Visible := True;
EN

回答 2

Stack Overflow用户

发布于 2022-08-27 14:11:35

使用TTimer。启用使pnlMenu可见后的时间,并从OnTimer事件中,将处理的其余部分放入其中。

您可以使用“等待循环”来调用ProcessMessages,但是这有很多困难(重新输入事件),所以当用户单击各处时,要小心测试您的应用程序。

票数 2
EN

Stack Overflow用户

发布于 2022-08-27 11:55:22

我找到了解决办法。对于任何有同样问题的人:

在代码中添加以下内容:

代码语言:javascript
运行
复制
procedure Delay(dwMilliseconds: Longint);
var
iStart, iStop: DWORD;
begin
iStart := GetTickCount;
repeat
iStop := GetTickCount;
Application.ProcessMessages;
Sleep(1);
until (iStop - iStart) >= dwMilliseconds;
end;

然后将“睡眠(时间)”改为“延迟(时间)”

所以:

代码语言:javascript
运行
复制
Sleep(5000);

替换为

代码语言:javascript
运行
复制
Delay(5000);
票数 -1
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/73510349

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档