Delphi中如何读取文件?(20分)

  • 主题发起人 主题发起人 DJ6674
  • 开始时间 开始时间
D

DJ6674

Unregistered / Unconfirmed
GUEST, unregistred user!
Delphi中如何读取文件。我用read时,总是出现read beyond end of file。而且无法使用
writeln和readln。
该怎么是我的数据写入某个文件。


 
用TstringList读写文件方便的多。用它后仔细看它方法,属性等,一般问题都能解决.
 
你可以用MEMO控件来读写文件!用起来非常方便!
 
assignfile(myfile,'shuj.txt');
Reset(myfile);
while not SeekEof(MyFile) do
begin
readln(myFile,temp);
RichEdit1.lines.add(temp);
end;
end;
CloseFile(myfile);
 
用TstringList的loadfromfile方法读取文件
 
你是要读取文本文件?在你用ASSIGNFILE()打开文件后,需用RESET()来将文件指针指
向文件的初始位置,,,另外,在你读取文件内容的时候(不论是文本文件或是其它文件),
你都可以使用EOF()函数来判断是否为文件的末尾,如果不为文件尾,就继续对文件进行操作,
否则就可以用 CLOSEFILE() 来关闭文件了!关于这方面的例子很多,,你随便找本书或
就在 DELPHI 的文件主题里就有完整的例子!
 
多人接受答案了。
 
后退
顶部