Форум: "Основная";
Текущий архив: 2002.06.17;
Скачать: [xml.tar.bz2];

Вниз

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

← →
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-Редактор. Их есть у меня, да и у многих других тоже!

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.06.17;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.005 c