delphi中怎么用TFileStream追加存储文件
答案:2 悬赏:60 手机版
解决时间 2021-02-09 08:03
- 提问者网友：动次大次蹦擦擦
- 2021-02-08 17:08
delphi中怎么用TFileStream追加存储文件
最佳答案
- 五星知识达人网友：旧脸谱
- 2021-02-08 18:34
FWrite.Seek(0, soFromEnd);
或
FWrite.Position := FWrite.Size;
对于FileStream，能够使用Seek的时候尽可能养成使用Seek的习惯，否则，如果一个文件是在增长的，而如果Size有所缓存，则可能导致的
后果是取错了。并且Size也是通过Seek取得的，Position也是通过Seek改变的，所以没有必要做两次操作。
或
FWrite.Position := FWrite.Size;
对于FileStream，能够使用Seek的时候尽可能养成使用Seek的习惯，否则，如果一个文件是在增长的，而如果Size有所缓存，则可能导致的
后果是取错了。并且Size也是通过Seek取得的，Position也是通过Seek改变的，所以没有必要做两次操作。
全部回答
- 1楼网友：孤独的牧羊人
- 2021-02-08 18:56
var
buf: array[0..5] of ansichar;
begin
with tfilestream.create('d:\aaa.txt', fmopenwrite) do
begin
try
seek(0, soend);
strpcopy(buf, '123abc');
writebuffer(buf, sizeof(buf));
finally
free;
end;
end;
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯