L
liu-yb
Unregistered / Unconfirmed
GUEST, unregistred user!
最近遇到一件怪事。代码如下：
var filet:textfile;
begin
assignfile(filet,'sy.txt');
rewrite(filet);
while not eof(filet) do//运行到此出错
begin
//doing
end;
CloseFile(filet);
end;
出错提示为“I/O error 104.”。
不知为何？
但是把文件类型修改后可通过。
如文件类型的定义改为：
var filet:file of char;
哪位前辈知道，望能告知。
var filet:textfile;
begin
assignfile(filet,'sy.txt');
rewrite(filet);
while not eof(filet) do//运行到此出错
begin
//doing
end;
CloseFile(filet);
end;
出错提示为“I/O error 104.”。
不知为何？
但是把文件类型修改后可通过。
如文件类型的定义改为：
var filet:file of char;
哪位前辈知道，望能告知。