读取文件

zp1020 发布于 2007-05-11 16:23， 511 次点击

procedure TForm1.Button1Click(Sender: TObject);
var
F:textfile;
begin
assignfile(F,'d:/spy/a.txt');
Reset(F);
end;

F是TXT型的值
怎么显示F的值呢用什么组件？

1 回复

anthony6342007-05-11 23:27

不懂你说什么，现实F里面的内容么？ Strlist: Tstringlist; strlist.loadformfile(F); memo1.lines.assgin(strlist);

[此贴子已经被作者于2007-5-12 12:59:45编辑过]