textfile 类型的文件如何判断已经到了结束了(100分)

L

lhxu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-24

• #1

sourfile,destfile:textfile;<br>sn:='c:/test.txt'<br>dn:='c:/test2.txt'<br>&nbsp; assignfile(sourfile,sn);<br>&nbsp; assignfile(destfile,dn);<br>读sourfile,写 destfile<br>&nbsp; readln(sourfile,temp1);<br>&nbsp; writeln(destfile,temp1);<br>我怎么判断sourfile已经到了文件尾了呢?<br>sourfile 没有 &nbsp;eof 属性 <br><br>

 

C

cAkk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-24

• #2

while not eof(sourfile) do

 

W

www

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-24

• #3

cAkk的手真快！<br>if not eof(sourfile) then readln(.....)

 

蚯

蚯蚓

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-24

• #4

&lt;B&gt;Typed or untyped files:&lt;/B&gt;<br>function Eof(var F): Boolean;<br><br>&lt;B&gt;Text files:&lt;/B&gt;<br>function Eof [ (var F: Text) ]: Boolean;<br><br>eof函数判断文件f是否到达文件尾，如果省略f，<br>则认为是标准输入，即con<br><br>当文件到达最末尾字符或文件为空时函数返回true，<br>否则返回false

 

A

Another_eYes

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-24

• #5

借宝地提个低级问题: 怎么用这种顺序文件读写操作呀?<br>eYes只会随机文件读写的操作.

 

C

cAkk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-24

• #6

readln(文件句柄,字符串变量); &nbsp;//读取一行内容<br>writeln(文件句柄,字符串变量); &nbsp;//写入一行内容<br><br>

 

C

cytown

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-24

• #7

还可以用seekeof(sourcefile)来判断<br>

 

L

lhxu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-24

• #8

谢谢