读写日志文件txt

[haijun1130]

通过串口不断获取数据.然后将这些数据保存在txt文件中.不通过类似Memo保存.
即是像ini文件一样去保存

[喝口水]

uses
inifiles;
.....
var
ini:Tinifile;
begin
dbgrideh1.Columns[0].Width:=24;
ini:=Tinifile.Create('d:\日志.ini');
ini.WriteString(保存区,保存地方1,数据1);
end;

[voyan]

sLst:TStringList;

sLst:=TStringList.create;
循环开始
sList.add(通过串口不断获取数据);
循环结束
sList.savetofile('d:\日志.txt');
sList.free;

[liangpei2008]

用TStringList

[haijun1130]

function logWrite(filename:string;content:string):Boolean;
var
TextFile:Text;
begin
try
Assignfile(textfile,filename);
try
Append(textFile);
except
Rewrite(textFile);
end;
writeln(textFile,content);
CloseFile(textfile);
except
logwrite:=false;
Exit;
end;
logwrite:=true;
end;