Разделение радио кнопок в Firemonkey: создание независимых групп на одной форме

Delphi , Компоненты и Классы , Кнопки

Разделение радио кнопок в Firemonkey: создание независимых групп на одной форме

Радио кнопки являются важным элементом пользовательского интерфейса, позволяющим пользователю выбрать один вариант из ряда предложенных. В VCL для создания групп радио кнопок использовался класс TRadioGroup, который имел свойство Items, доступное для редактирования во время проектирования формы. В Firemonkey же мы имеем дело только с классом TRadioButton.

Проблема, с которой сталкиваются разработчики, заключается в том, что при добавлении объектов типа TRadioButton в качестве дочерних элементов к другим контейнерам (например, TPanel, TGroupBox), эти контейнеры начинают вести себя как объекты TRadioGroup из VCL. Однако радио кнопки в разных контейнерах ведут себя так, как будто они являются детьми одного родителя: при выборе радио кнопки в одной группе, выбранная кнопка в другой группе автоматически сбрасывается.

Решение проблемы заключается в установке свойства GroupName для каждого объекта TRadioButton. Радио кнопки с одинаковым названием группы будут вести себя как отдельная группа, не влияя на выбор в других группах.

Пример кода на Object Pascal (Delphi) для создания независимых групп радио кнопок:

var
  RadioButton1: TRadioButton;
  RadioButton2: TRadioButton;
  Panel1, Panel2: TPanel;

begin
  // Создаем панель Panel1
  Panel1 := TPanel.Create(Self);
  Panel1.Parent := Self;
  Panel1.Align := alClient;
  // Добавляем радио кнопку на Panel1 с GroupName = 'Group1'
  RadioButton1 := TRadioButton.Create(Panel1);
  RadioButton1.Parent := Panel1;
  RadioButton1.Text := 'Радио кнопка 1';
  RadioButton1.GroupName := 'Group1';

  // Создаем вторую панель Panel2
  Panel2 := TPanel.Create(Self);
  Panel2.Parent := Self;
  Panel2.Align := alClient;
  // Добавляем радио кнопку на Panel2 с GroupName = 'Group2'
  RadioButton2 := TRadioButton.Create(Panel2);
  RadioButton2.Parent := Panel2;
  RadioButton2.Text := 'Радио кнопка 2';
  RadioButton2.GroupName := 'Group2';
end;

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

Альтернативный ответ не представлен, так как предложенный метод установки свойства GroupName является прямым и эффективным решением проблемы разделения радио кнопок на независимые группы.

Обратите внимание, что документация по Firemonkey может быть не всегда полной и понятной, но в данном случае конкретное свойство GroupName для класса TRadioButton является ключом к решению задачи.

Создано по материалам из источника по ссылке.

Разработчики Firemonkey сталкиваются с необходимостью создания независимых групп радио кнопок на одной форме, что достигается путем установки свойства `GroupName` для каждого объекта `TRadioButton`.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Кнопки ::