请问delphi 写 *.txt 文件的语句是什么？谢谢！

Question

请问delphi 写 *.txt 文件的语句是什么？谢谢！

Answer 1

var
  str: TStringList;
begin
  str := TStringList.Create;
  str.Text := 'Hello';
  str.SaveToFile('c:\test.txt');
  str.Free;
end;

Answer 2

var
  text:textfile;
begin
  assignfile(text);
  append(text);
  writeln(text);
  closefile(text);

Answer 3

TextFile
TStringList
都可以

Answer 4

你还是用tstringlist吧,保险一点.

Answer 5

var
  str: TStringList;
begin
  str := TStringList.Create;
  str.Text := 'Hello';
  str.SaveToFile('c:\test.txt');
  str.Free;
end;

Answer 6

用两种方法：
1、Memo.SavetoFile(FileName)
2、Pascal方法：
   var f : textfile;
     begin
       assignfile(f,filename);
        rewrite(f);
         writeln(f,'要保存的内容');
       closefile(f);
     end.(这个方法能写所有是TextFile格式的文件)