[Selicat]

Здравствуйте, я делаю тест в Delphi, вопросы лежат в текстовом файле, структура файла: первая строка-вопрос, 2,3,4 - варианты ответов, 5 - номер правильного ответа. весь файл грузится в мемо, а оттуда по строчкам раскидывается в Label и RadioButton-ы. вопросы должны появляться случайно. Я попыталась что-то сделать......

Код:

procedure TForm6.FormCreate(Sender: TObject);
begin
Memo1.Lines.LoadFromFile('òåñò.txt');
randomize;
for i:= to n do begin
v:=random(n)
label1.Caption:=memo1.Lines[v*5];
Radiobutton1.Caption:=memo1.Lines[v*5+1];
Radiobutton2.Caption:=memo1.Lines[v*5+2];
Radiobutton3.Caption:=memo1.Lines[v*5+3];
NP:=Memo1.Lines[v*5+4];
if Radiobutton1.Checked and NP='1'
or Radiobutton2.Checked and NP='2'
or Radiobutton3.Checked and NP='3'
then ball:=ball+1;
for k:=0 to 4 do
memo1.Lines.Delete(v*5+k);
n:=n-1;
end;
 n:=strtoint(memo1.Lines[memo1.Lines.count-1]);
 end;

Но видимо я совсем не так делаю Помогите, пожалуйста разобраться