[Лунтик-Некрофил]

Добрый вечер, товарищи программисты.
Пишу программулину, включающую в себя небольшое тестирование. Тесты находятся в бд. Заступорился на защите от запоминания - рандомная загрузка вопросов и , соответственно, вопросов к ним.

Код:

for i:=1 to 4 do begin
radiobutton1.caption:=table1.fields[random(i)].asstring;
radiobutton2.caption:=table1.fields[random(i)].asstring;
radiobutton3.caption:=table1.fields[random(i)].asstring;
radiobutton4.caption:=table1.fields[random(i)].asstring;
end;

Проблема:
Видимо то ли цикл работает не правильно, то ли ему здесь вообще не место, т.к. часто вижу значения нулевого поля (fields[0]), которым здесь не место. Как это исправить?
Вопрос:
Как написать защиту от повторений? Т.к. сейчас постоянно встречаются несколько значений одного поля.

Заранее благодарен, с ув. Лунтик-Некрофил.