关于pascal 的keypressed 与readkey的问题。
1个回答
展开全部
都是crt的
keypressed表示确认是否有键被按下了,它返回的是一个布尔值,返回TRUE表示有键被按下了,返回FALSE表示没有键被按下。
readkey表示读入一个键,读入的键将不会显示在屏幕上。返回的是一个字符类型char,返回按下的键的字符,比如按下'A'键,就返回一个字符'A'。
用法示例:
Uses crt; {使用crt函数前先要声明使用了crt}
Var
i:char;
Begin
{readkey的用法}
i:=Readkey;
Writeln('You pressed ',i);
{keypress的用法}
delay(3000); {等待3秒让用户按键}
If keypressed then
Writeln('You pressed the keyboard')
Else
Writeln('You didn't pressed the keyboard');
Readln;
End.
keypressed表示确认是否有键被按下了,它返回的是一个布尔值,返回TRUE表示有键被按下了,返回FALSE表示没有键被按下。
readkey表示读入一个键,读入的键将不会显示在屏幕上。返回的是一个字符类型char,返回按下的键的字符,比如按下'A'键,就返回一个字符'A'。
用法示例:
Uses crt; {使用crt函数前先要声明使用了crt}
Var
i:char;
Begin
{readkey的用法}
i:=Readkey;
Writeln('You pressed ',i);
{keypress的用法}
delay(3000); {等待3秒让用户按键}
If keypressed then
Writeln('You pressed the keyboard')
Else
Writeln('You didn't pressed the keyboard');
Readln;
End.
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询