主题：pascal的暂停方法
stuart920106
[专家分：730] 发布于 2005-07-29 17:20:00
请问pascal能不能在运行时不要一闪而过？？有什么函数可以使他暂停？（就象C++的
getch()一样)。谢谢！
回复列表 （共15个回复）
沙发
jzyray [专家分：20610] 发布于 2005-07-29 17:31:00
那就跟getch()类似好了，readln;
板凳
阿Ben [专家分：2200] 发布于 2005-07-29 20:37:00
用CRT单元的Readkey; 也行
3 楼
口口and枕头 [专家分：1550] 发布于 2005-07-30 00:44:00
有没有人能介绍一下单元的使用呀~~~
4 楼
闪电123 [专家分：470] 发布于 2005-08-06 13:38:00
我找了些！
5 楼
QQ331373582 [专家分：1500] 发布于 2005-08-06 15:03:00
单步执行就看的很清楚咯
6 楼
安然 [专家分：990] 发布于 2005-08-06 18:50:00
sleep(133333){括号号内是时间，可改}
readln;
都可以吗
7 楼
weiyulan [专家分：50] 发布于 2005-08-06 21:28:00
[em2]
readln;
最方便实用
8 楼
口口and枕头 [专家分：1550] 发布于 2005-08-06 22:01:00
也不一定,万一,前面是死循环,跟本就到不了readln那一句~还是ctrl+break最好`(我试过了~)
9 楼
阿Ben [专家分：2200] 发布于 2005-08-07 22:25:00
Function ReadKey : char; assembler;
Asm
mov ah,08h
int 21h
End;
这是CRT单元的Readkey的源代码。
把这段代码加到你的程序中，就可以在不用CRT单元的情况下使用Readkey函数了！！
10 楼
阿Ben [专家分：2200] 发布于 2005-08-07 22:28:00
我还有CRT中Delay的源代码：
Procedure Delay(ms : Word); Assembler;
Asm
mov ax, 1000;
mul ms;
mov cx, dx;
mov dx, ax;
mov ah, $86;
int $15;
end;
---------------------------------
Delay(2000); 代表暂停2000毫秒（即2秒）。
我来回复
您所在位置：社区首页 — PASCAL语言讨论区 — pascal的暂停方法