小 小飞点 Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-13 #1 请问如何将一个900k左右大小的文件，只想将第49到53字节这5个字节的内容改为0，其他不变。 谢谢
D dey-999 Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-13 #4 可能可以,操作简单: SL:=TStringList.Create; SL.LoadFromFile(FileName); 进行对SL元素的修改 SL.SaveToFile(FileName);
F formality Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-13 #5 var fs:TFileStream; i : Integer; Buff : Byte; begin Buff := 0; fs:=TFileStream.Create('文件路径+文件名',fmOpenWrite); fs.Position:=49; for i:= 0 to 4 do begin fs.Write(Buff,1); fs.Position := fs.Position +1; end; fs.Free; 试试行不行，我没有验证。
var fs:TFileStream; i : Integer; Buff : Byte; begin Buff := 0; fs:=TFileStream.Create('文件路径+文件名',fmOpenWrite); fs.Position:=49; for i:= 0 to 4 do begin fs.Write(Buff,1); fs.Position := fs.Position +1; end; fs.Free; 试试行不行，我没有验证。
