создание типизированного файла

[3D Hunter]

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

Код:

type a1=record
oc:integer;
fam:string[500 например];
end;

Stilet, боюсь в выделенной строке будет ошибка , т.к. тип String позволяет записывать только 255 символов макс (тип ShortString).
Если нужно болше символов в строке, то делаем массив:

type a1=record
  oc:integer;
  fam:array[0..1023] of AnsiChar;
end;

Вроде так, если не ошибаюсь