Запись в бинарный файл
Народ, такая проблема. Как в двоичном (бинарном) файле поменять символ, стоящий на определенной позиции?
Например, если сделать так:
procedure AddStrToFile(S:string;const FileName:string);
var
f:TFileStream;
begin
f.Position:=605;
f.Write(pointer(s)^,length(s));
f.Destroy;
end;
- то символ (строка) S записываецца в файл на эту позицию (605), а надо штобы заменялась.
Но не обязательно таким образом (TFileStream), может есть ищо какойнть способ...
Заранее спасибо!
|