Как прочитать файл в буфер , мне нужно файл с прошивкой

← →
af (2002-06-05 18:10) [0]

для программатора считать ,немножко изменить формат, и записать в другой файл. какой нибудь пример бы ..

← →
Romkin © (2002-06-05 18:48) [1]

Ну что-то вроде
i: integer; AStream := TFileStream.Create(<FileName>); i:= 10; try AStream.Position := 0; AStream2 := TFileStream.Create(<NewFileName>); try AStream2.CopyFrom(AStream, AStream.Size); AStream2.Seek(10, soFromBeginning); AStream2.Write(i, SizeOf(Integer)); finally AStream2.Free; end; finally AStream.Free; end;

← →
ah © (2002-06-05 20:28) [2]

ну ладно, вроде понятно , ну а если предварительно мне нужно изменить формат, т.е. не сразу скопировать , а с изменениями ..

← →
cyborg © (2002-06-05 23:41) [3]

Var Buf : Pointer; Size : Integer; Begin Size:=Размер файла; GetMem(Buf,Size); try Читаем файл в память по адресу P^. Изменяем в P^ что угодно. Пишем в файл из P^ колво Size. finally FreeMem(Buf,Size); End;

Только смотри что-бы памяти хватило :-)

← →
Aleks1 (2002-06-06 02:47) [4]

Ты глючишь. Считал, изменил, записал в файл. Ну а дальше тут что? И причем здесь программатор? Кстати вещь вообще НЕ ДЕШЕВАЯ?

Имхо, по-моему ты ищешь HEX-Редактор. Их есть у меня, да и у многих других тоже!

Как прочитать файл в буфер , мне нужно файл с прошивкой Найти похожие ветки