delphi 下的读写文件

Question

pascal的读写文件命令（write，read）好像只能在delphi中的控制台程序中使用，如果是Applation程序要读写文件，该怎么做？

Answer 1

var
  t: textfile;
  s: string[100];
begin
  Assignfile(T, 'example.txt');
  Reset(t);
  readln(t, s);
  showMessage(s);
  closeFile(t);
end;

Answer 2

书上介绍的和楼上说的一样的不过我习惯用TStringList的LoadFromFile和SaveToFile方法

Answer 3

var
    TxtFile: TextFile;
    StrTemp: string;  AssignFile(TxtFile,'D:\YU\Yu.Yu');
  Reset(TxtFile);
  Readln(TxtFile, StrTemp);
  CloseFile(TxtFile);
  AssignFile(TxtFile,'D:\YU\Yu.Yu');
  Rewrite(TxtFile);
  Writeln(TxtFile, StrTemp);
  CloseFile(TxtFile);

Answer 4

var 
Filel:Tstringsbegin
  Filel:=Tstringlist.create;
  Filel.loadFromFile('c:\text.txt');
  
  showmessage(File.strings[0]);
  
  Filel.savetoFile('*****.txt');
  
  Filel.Free;
end;