关于文件的写入？？在线等。

Question

如何用delphi每10分钟自动生成一个文件，格式为
006，abc,1,系统调用，设备状态，日期（当先），时间（当先）
急急，高手帮帮忙。

Answer 1

用Timer计时，TStringList.SaveToFile来保存文件。

Answer 2

006，abc,1,系统调用，设备状态，日期（当先），时间（当先）
在窗体上放一个MEMO，如果是服务程序，就用TStringList
然后在timer中写
if 需要的时间到达 then
memo1.lines.add(format('%s,%s,%d,%s,%s,%s,%s'),
['006','ab',1,'系统调用','设备状态',formatdatetime('yyyy-mm-dd',date),
formatdatetime(hh:mm:ss,time)])

Answer 3

006，abc,1,系统调用，设备状态，日期（当先），时间（当先）
在窗体上放一个MEMO，如果是服务程序，就用TStringList
然后在timer中写
if 需要的时间到达 then
memo1.lines.add(format('%s,%s,%d,%s,%s,%s,%s'),
['006','ab',1,'系统调用','设备状态',formatdatetime('yyyy-mm-dd',date),
formatdatetime(hh:mm:ss,time)])
memo1.lines.savetofile(formatdatetime('yyyy-mm-dd',date)+'.txt');
end;