Компонент TRadioGroup – группа зависимых переключателей

Компонент класса TRadioGroup представляет собой специальный контейнер, предназначенный для размещения зависимых переключателей класса TRadioButton. Каждый размещаемый в нем переключатель помещается в специальный список Items и доступен по индексу, что упрощает обслуживание группы.

Данный компонент находится на вкладке Standard и выбирается щелчком мыши по кнопке .

У данного компонента может быть заголовок, текст которого хранится в свойстве Caption.

property Caption: TCaption;

Свойство компонента Columns определяет количество столбцов переключателей.

property Columns: Integer;

Свойство ItemIndex содержит индекс установленного переключателя.

property ItemIndex: Integer;

Если переключатель не выбран, то свойство содержит -1. Если выбран первый перключатель, то свойство равно 0, второй – равно 1 и т.д.

Свойство Items содержит список заголовков элементов (Добавление/удаление элементов осуществляется добавлением / удалением строк списка Items).

property Items: TStrings;

После размещения компонента на форме он пуст. Для создания хотя бы одного переключателя следует раскрыть редактор списка Items в инспекторе объектов и ввести хотя бы одну строку (рис. 17).

 

 

Рис. 17. Редактор списка Items компонента RadioGroup

 

Строки Items используются как поясняющие надписи справа от переключателей, а их количество определяет количество переключателей в группе.

Также можно задать число и названия переключателей программно с помощью метода Add.

function Add(const S: string): Integer;

В качестве параметра S выступает надпись, связанная с элементом.

Пример. Создать список из 3-х переключателей и сделать первый активным.

procedure TForml.FormCreate(Sender: TObject);

Begin

RadioGroup1.Items.Clear;

RadioGroup1.Items.Add('Item1');

RadioGroupl.Items.Add('Item2');

RadioGroupl.Items.Add('Item3');

RadioGroup1.ItemIndex:=0;

end;

Метод Clear, вызванный в самом начале процедуры, очищает элементы группы переключателей, если они там были. В противном случае, создаваемые переключатели добавятся к уже существующим.

После создания компонента ItemIndex равен -1, то есть ни один из компонентов не выбран. Можно изменить это свойство программно или в инспекторе объектов (не следует забывать, что нумерация начинается с 0). Также свойство ItemIndex позволяет осуществить анализ выбора пользователя, например:

case RadioGroup1.ItemIndex of

0: …; //Выбран 1-й переключатель

1: …; //Выбран 2-й переключатель

…

Else

… //Не выбран ни один переключатель

end;

На рис. 18 приведен пример компонента TRadioGroup.

 

Рис. 18. Пример компонента TRadioGroup