在delphi的同一个事件中对其中的特定程序延时

procedureTform1.button1click(sender:Tobject);beginedit1.text:='123';edit2.text:='456'... procedure Tform1.button1click(sender:Tobject);
begin
edit1.text:='123';
edit2.text:='456';
sleep(3000);
end;
这里edit1和edit2的显示同时延迟,而我希望让edit2的显示比edit1延迟3秒。怎么写?
展开
 我来答
天地惶惶
2009-04-01 · TA获得超过3223个赞
知道大有可为答主
回答量:1215
采纳率:0%
帮助的人:808万
展开全部
Edit1.Text:= '1111';
Application.ProcessMessages;
sleep(3000);
Edit2.Text:= '2222';
七鑫易维信息技术
2024-09-02 广告
Play Video 七鑫易维是致力于机器视觉和人工智能领域的高新科技企业,迄今已专注眼球追踪技术的研发、创新与应用超过14年,拥有完全自主知识产权,全球专利总量655余项。 作为眼球追踪技术领域的全球知名品牌,七鑫易维的产品体系覆盖眼动分... 点击进入详情页
本回答由七鑫易维信息技术提供
热烈还鲜丽丶柠檬3831
2009-04-01 · TA获得超过455个赞
知道小有建树答主
回答量:426
采纳率:0%
帮助的人:344万
展开全部
Edit1.Text:= '1111';
Application.ProcessMessages;
sleep(3000);
Edit2.Text:= '2222';
这个正解
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
幻谛
2009-04-01 · TA获得超过121个赞
知道小有建树答主
回答量:156
采纳率:0%
帮助的人:99万
展开全部
可以换上 Timer 试一试。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式