注册
登录
pascal
Lazarus readln不读取变量
返回
Lazarus readln不读取变量
作者:
那月静好
发布时间:
2025-01-15 10:36:25 (19天前)
转自：
<div class =“excerpt”> 我想请求一些帮助，因为我无法确定我在下面的代码中做错了什么，因为它不会读取记录的第一个单元，但之后它会读取... </DIV>
收藏
举报
2 条回复
0#
回复此人
star*위위
|
2019-08-31 10-32
<div class =“post-text”itemprop =“text”> <P> 我注意到了之间的本质区别 <code> FPC </code> <code> Read() </code> 和 <code> ReadLn </code> 使用时的功能 <code> standard input </code> 没有很好的文档记录（在Delphi文档中可以阅读）。因此，您的问题的答案如下。 </p> <P> 根据 <code> FPC </code> 文档， <code> CRLF </code> ， <code> CR </code> 和 <code> LF </code> ，都被认为是 <code> End-Of-Line (EOL) </code> 字符，所以在下面 <code> EOL </code> 代表任何一个。 </p> <P> 的<strong> 打电话的时候 <code> Read(s) </code> </强> 哪里 <code> s: string; </code> 程序等待用户输入，直到 <code> EOL </code> 被添加到输入缓冲区。输入字符直到（但不包括） <code> EOL </code> 从缓冲区中删除并传递给 <code> s </code> 。 的<strong> 该 <code> EOL </code> 留在输入缓冲区中 </强> 。 </p> <P> 接下来打电话给 <code> Read(s) </code> 会马上认出来的 <code> EOL </code> 在输入缓冲区中，不会等待用户输入。该 <code> EOL </code> 继续留在缓冲区，因此没有后续 <code> Read(s) </code> 将等待用户输入。 </p> <P> <EM> 第一次打电话给 <code> ReadLn(s) </code> 之后 <code> Read(s) </code> 也会马上发现 <code> EOL </code> 在缓冲区而不是等待用户输入。 </EM> </p> <P> 的<strong> 打电话的时候 <code> ReadLn(s) </code> </强> 程序等待（如前面的例子中）用户输入，直到 <code> EOL </code> 被添加到输入缓冲区。输入字符直到（但不包括） <code> EOL </code> 从缓冲区中删除并传递给 <code> s </code> 。 的<strong> 那么 <code> EOL </code> 从缓冲区中删除并丢弃 </强> 。 </p> <P> 接下来打电话给 <code> ReadLn(s) </code> 将再次停止并等待用户输入。 </p> <P> 在你的代码中，你正在打电话 <code> Read(n) </code> 在执行的最开始。然后，在 <code> beiras() </code> 你在打电话 <code> ReadLn() </code> 检测到 <code> EOL </code> 在缓冲区中因此立即返回，但也删除了 <code> EOL </code> 来自缓冲区。随后的电话 <code> ReadLn() </code> 现在将等待用户输入。 </p> <P> 的<strong> 治愈 </强> 是不是要改变 <code> Read()n </code> 到了 <code> ReadLn(n) </code> 在你的程序的开头。 </p> </DIV>
编辑
登录
后才能参与评论
