тестирование в делфи

[мала]

Ребят, такой вопрос. Сделала тесты, но не пойму, как сделать вывод результатов (количество правильных ответов/оценку).

if RadioButton2.Checked= true then //выбираем правильный вариант ответа
ball:= ball+1
else
ball:= ball;

Label1.Caption:='...............'; //текст вопроса
RadioButton1.Caption:= '....'; //первый вариант ответа
RadioButton2.Caption:= '....'; //второй вариант ответа
RadioButton3.Caption:= '....'; //третий вариант ответа

[s-andriano]

inc(ball, byte(RadioButton2.Checked));

[мала]

сделала программу,а оно не считает.кто-то может глянуть?