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

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

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

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