Чтение с Txt файла по метке, Считать строку файла по метке Опции

[Foxett]

Здравствуйте! Вот столкнулся с такой проблемой! Работаю в Делфи 7! Значит задача какова написать тест в который читает из файла вопросы и задает их пользователю из другого файла читает ответы это всё должно делаться случайным образом! Самое главное что всё это должно именно через файлы делаться так как база вопросов и ответов должны обновляться при надобности! Вобщем не могу найти способа читать с файла строку точнее даже вопрос по метке то есть
1: -----------------
2: -----------------
И потом Рандом просто выбирает число от 1 до 50 и выводит вопрос или если у кого есть другие идеи реализации то пожалуйста помогите! Вообще рэндом же по идее может повторить вопрос а мне надо чтоб не повторялись! Жду ответов! Заранее спасибо за помощь!

[volvo]

Что именно непонятно? Как считать вопрос №X?

Var
  f: File Of TQuestion;
  Rec: TQuestion;
...
  Seek(f, Pred(X)); { Отсчет ведется с 0, поэтому Pred }
  Read(f, Rec);

Как записать обновленную базу данных? Пишешь маленькую программку (или процедуру):

Var Rec: TQuestion;

ReWrite(f);
For i := 1 To newN Do Begin { newN - число вопросов в новой базе }
  {
    Заносишь новые вопросы в строку S; кстати, их можно читать и из другого файла.
    Эта процедура нужна только для того, чтобы записать их не в текстовый файл,
    а в File Of TQuestion
  }
  ReadLn(s);
  Rec.s := s;
  Write(f, s);
End;

Это все только стандартными средствами Паскаля... Т.к. я не знаю, чем тебе разрешено пользоваться...