如何在delphi里打开一个txt文件

Question

如何在delphi里打开一个txt文件

Answer 1

uses shellapi;
ShellExecute( handle,'open',pchar('c:\aa.txt'),nil,nil,sw_shownormal);

Answer 2

var
f1:textfile
a:string;
begin
  assignfile(f1,'aa.txt');
try 
 reset(f1);
 readln(f1,a);//读第一行
　shwomessage(a);
except
  shwomessage('打开文件错误');
  exit;
end;

Answer 3

同意：  如果是读文件就要fileopen 
filewrite等

Answer 4

还可以用Tstringlist;
var ss:Tstringlist;
begin
ss:=Tstringlist.Create;
ss.LoadFile('你的路径/xx.txt');