delphi如何建立txt文件并且把相应的内容写入txt

来源:百度知道 编辑:UC知道 时间:2024/05/24 00:05:56
给个例子也可以!多谢!~
你给的代码不完全啊!

var
f : TFileStream;
s : String;
begin
f:=TFileStream.Create('a.txt',fmCreate);

s:='abcd1234';

f.Write(Pointer(s)^,Length(s));

f.Free;
end;

非常简单。
...
mytxt : TStringList;
...
mytxt := TStringList.Create;
mytxt.Add('Hello!');
mytxt.SaveToFile('mytxt.txt');
mytxt.Clear;
mytxt.Free;