Показать сообщение отдельно
  #5  
Старый 21.08.2011, 11:13
chainik chainik вне форума
Начинающий
 
Регистрация: 30.06.2008
Сообщения: 140
Репутация: 8882
По умолчанию

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

Код:
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,
работа с типированными и нетипированными файлами.
Ответить с цитированием