Delphi тест рандом вопросов

[vavanos]

Делаю тест и надо сделать чтобы вопросы и ответы випадали рандомом.Расскажите пожалуйста как ето сделать.Файл теста вложил

[RUSt88]

Mtest[1,1,1]:='?e? i?eno?i? a?aiinyouny ai i?enoi??a aeaaaaiiy?';
Mtest[1,1,2]:='2';
Mtest[1,2,1]:='Eeaa?aoo?a';
Mtest[1,3,1]:='Eieiiee';
Mtest[1,4,1]:='I?eioa?';
Mtest[1,2,2]:='0';
Mtest[1,3,2]:='1';
Mtest[1,4,2]:='1';
Image1.Picture.LoadFromFile('io.bmp ');

Mtest[2,1,1]:='?e? i?eno?i? a?aiinyouny ai i?enoi??a aaaaaiiy?';
Mtest[2,1,2]:='2';
Mtest[2,2,1]:='Neaia?';
Mtest[2,3,1]:='Iii?oi?';
Mtest[2,4,1]:='Iai?ioeyoi? ieoa';
Mtest[2,2,2]:='1';
Mtest[2,3,2]:='0';
Mtest[2,4,2]:='1';

у меня вот что открылось

[Tayfun]

kurs2.rar
Давно писал Будут вопросы в личку или в АСЮ

[vavanos]

я перезалью

[President_USA]

Спасибо всем участникам