radiobutton

[Bon'ka]

Помогите, плиз. Я пишу тест на Delphi, нифига не врубяюсь!) Как мне проверить, правильно ли тестируемый выбрал ответ в radiobutton?

[Kotofff]

Свойство Checked если true - значит выбран этот radiobutton
Например, если ответов два :

  if RadioButton1.Checked then ShowMessage('Выбран ответ № 1');
  if RadioButton2.Checked then ShowMessage('Выбран ответ № 2');

Если ответов больше или их количество меняется, то лучше использовать RadioGroup - выбранный элемент (ответ) будет в ItemIndex (нумерация с нуля, т.е. 1-й элемент будет с индексом 0)

[Bon'ka]

А можете прописать код как это будет выглядеть?
Вопрос для теста содержит 3 варианта ответа, пользователь выбирает один и нажимает проверка, ему в лейбл должно вывестись правильно или нет!
как я понимаю, что-то типа If radiobutton1.Enabled=true then label1.Caption:='правильно' else
label1.Caption:='не правильно' ;

Или в данном случае радиобаттоны нельзя использовать?

[DomiNick]

Лучше всё-таки делать с помощью RadioGroup...

Чтобы задать варианты ответа:

RadioGroup1.Items.Text:=''; //Стираем старые варианты
RadioGroup1.Items.Add('Вариант ответа №1');
RadioGroup1.Items.Add('Вариант ответа №2');
RadioGroup1.Items.Add('Вариант ответа №3');

Чтобы проверить правильность ответа:

If RadioGroup1.ItemIndex+1=N Then   // в переменной N номер правильного ответа
      Label1.Caption:='Правильно'
Else
      Label1.Caption:='Не правильно';

[Bon'ka]

спасибо, я попробую!