[dr. F.I.N.]

пишу на коленке, попробуй:

Код:

type OneRecord = record
  SomeInt: Integer;
  QuestionLength: Byte;
  QuestionStr: String[255];
  Answwer_1_Length: Byte;
  Answer_1_Str: String[255];
  Answwer_2_Length: Byte;
  Answer_2_Str: String[255];
  Answwer_3_Length: Byte;
  Answer_3_Str: String[255];
  Answwer_4_Length: Byte;
  Answer_4_Str: String[255];
  Answwer_5_Length: Byte;
  Answer_5_Str: String[255];
end;

По-моему там 5 вариантов ответов возможно (удалил файл, писал по памяти). Вобщем поковыряй в этом ключе.