
如何让Free pascal 程序中途停止运行1秒钟然后继续运行?
3个回答
展开全部
楼主你好
首先在程序开始写一句: uses crt;意思是调用crt单元,然后就可以使用crt单元里的函数了。
注意:程序开头可以先写program xxxxx;但是下一行必须写uses crt;
在你要暂停的时候就用delay函数
delay(x);x是一个整数,单位是毫秒。所以停止1秒就是delay(1000);
求采纳!
首先在程序开始写一句: uses crt;意思是调用crt单元,然后就可以使用crt单元里的函数了。
注意:程序开头可以先写program xxxxx;但是下一行必须写uses crt;
在你要暂停的时候就用delay函数
delay(x);x是一个整数,单位是毫秒。所以停止1秒就是delay(1000);
求采纳!
展开全部
可以使用crt库中的delay函数.
在程序一开始引入一下crt单元:
uses crt;
然后需要暂停的时候,调用delay函数:
delay(1000);
参数是暂停的毫秒数.
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
(绕过msvcrt)Windows库的Sleep
procedure Sleep(time:word);stdcall;external 'kernel32.dll';
procedure Sleep(time:word);stdcall;external 'kernel32.dll';
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询