Цитата:
|
Сообщение от chainik
задача как-то неясно поставлена.
Начать можно например с чтения файла в структуру
Например так
Код:
type
TMyStruct=record
<здесь описание структуры>
end;
var
z:TMyStruct; //сюда копируется файл
procedure ReadMyStruct(fnam:string);
var
F:file of TMyStruct;
begin
assignfile(F,Fnam);reset(F);
read(F,z);
CloseFile(F);
end;
а еще рекомендую почитать описание функций BlockRead, BlockWrite,
работа с типированными и нетипированными файлами. |
Берем книгу Льва Толстого и ставим в холодильник.
Зачем читать файл в некую структуру? Файл произвольных двоичных данных.
Вообще достаточно вычитывать по 16 байт за проход цикла, в array of byte к примеру, после чего в конечный файл записывать эти данные, обработав ф-ей IntToHex.