[Kailon]

Вы хотите сделать так, чтоб в последнем Edit'e вводить номер правильного ответа. Так как судя по вашему примеру ответ с единичкой в начале это верный. Или вы сразу определяете верный ответ. Судя по вопросу надо 6 полей ввода, а судя по строкам в файле 5. Если требуется передать просто содержимое полей ввода в файл, то это просто:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  F: TextFile;
begin
  AssignFile(F, 'd:\test.txt');
  Rewrite(F); // если создать файл
  // Append(F); // если необходимо дописать в файл
  Writeln(F, Edit1.Text);
  Writeln(F, Edit2.Text);
  Writeln(F, Edit3.Text);
  Writeln(F, Edit4.Text);
  Writeln(F, Edit5.Text);
  CloseFile(F);
end;