如何删除文本文件的第一行 ( 积分: 200 )

  • 主题发起人 主题发起人 eagleblue
  • 开始时间 开始时间
E

eagleblue

Unregistered / Unconfirmed
GUEST, unregistred user!
因为文件巨大 不想用TSTRINGLIST
如何删除文本文件的第一行数据?
 
因为文件巨大 不想用TSTRINGLIST
如何删除文本文件的第一行数据?
 
重写文件
先将原来的文件改名,进行复制,忽略第一行即可

如果对这个答案不满意,就没有其它更好的答案了
 
自己手动删除最方便了,要不就是楼上的方法
 
好象没有什么好的方法 关注
 
你直接deletefile(i)就可以了啊!
 
先用一个TMemo加载你这个文件,再用TMemo对象.Lines.Delete(0)不就OK了
 
To:eagleblue你可以采用這種方式:
var
F:TextFile;
begin
AssignFile(F,FileName);
Reset(F)
//定位首行
Writeln(F,'');
CloseFile(F);
end;
 
delphisuccess的方法挺有想法的哈哈,不过多出来一个空行怎么办
 
用流(TStream)吧,用一个流载入,找到第一个#13#10,然后将其后所有数据写入另一个流保存即可。
 
因为文件比较大,不论是复制文件,还是用STREAM stringlist LOAD进来 再SAVE都比较费时,而且操作比较频繁,不得不考虑异常情况,比如在SAVE的时候计算机突然掉电,这些数据就可能丢失一批,所以不可行。
看来是不能用文本文件了。
 
使用文件映射解决了
 
多人接受答案了。
 
后退
顶部