由于做一个销售系统,考虑到写本地数据断电的情况,由于本地库容易损坏,就想把数据同时写到一个文本中。
一下这两种方式那种效率最高,最安全啊。
record1是一个自定义记录类型
第一种
try
sss := TFileStream.Create('11.txt', fmOpenReadWrite or fmCreate);
sss.Seek(0, soFromEnd);//
sss.Write(record1, sizeof(record1)); finally
sss.Free;
end; 第二种
mm:file of record1
assignfile(nn,'b.txt');
rewrite(nn);
write(nn,mm);
closefile(nn);两种方式都可以,哪种速度更快,更安全呢?
一下这两种方式那种效率最高,最安全啊。
record1是一个自定义记录类型
第一种
try
sss := TFileStream.Create('11.txt', fmOpenReadWrite or fmCreate);
sss.Seek(0, soFromEnd);//
sss.Write(record1, sizeof(record1)); finally
sss.Free;
end; 第二种
mm:file of record1
assignfile(nn,'b.txt');
rewrite(nn);
write(nn,mm);
closefile(nn);两种方式都可以,哪种速度更快,更安全呢?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货