RadioGroup в RAD Studio XE3, FireMonkey

@xakasi · Регистрация: 30.10.2012

Студворк — интернет-сервис помощи студентам

как называется radiogroup в firemonkey
ну или как сделать данную функцию
вообщем помогите плиз чайнику
заранее спасибо

@volvo · 27.05.2013, 19:03

TGroupBox + TRadioButton чем не устраивают?

@xakasi · 27.05.2013, 19:18 **[ТС]**

UI, я просто не понимаю как сделать так что бы он под каждое выведенное значение выводил RadioButton

@volvo · 27.05.2013, 19:40

Кто "он"? Под какое значение, куда выведенное? Про это у тебя в первом посте вообще ничего нет! Больше информации...

@xakasi · 27.05.2013, 19:44 **[ТС]**

делаю тестирование
и вывожу тесты которые можно пройти и вот хочу что бы варианты тестов выводились в радиогрупп и что бы при нажатие на название теста ну или на RadioButton выводился тест

@volvo · 27.05.2013, 21:53

Динамическое создание компонентов не подойдет?

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
type
  TForm1 = class(TForm)
  // ...
  private
    { Private declarations }
    procedure MyRadioButtonClick(Sender: TObject);
  public
    { Public declarations }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.fmx}
 
procedure TForm1.Button1Click(Sender: TObject);
var
  rb : TRadioButton;
  i, pos : Integer;
begin
  pos := 20;
  for i := 1 to 5 do
  begin
    rb := TRadioButton.Create(GroupBox1);
    rb.Text := 'test #' + IntToStr(i); // Ну, или бери названия откуда-то из другого места
    rb.Position.Y := pos;
    rb.Visible := true;
    rb.Tag := i;
    rb.OnClick := MyRadioButtonClick;
    GroupBox1.AddObject(rb);
    inc(pos, 20);
  end;
end;
 
procedure TForm1.MyRadioButtonClick(Sender: TObject);
begin
  ShowMessage(IntToStr((Sender as TRadioButton).Tag)); // Это определение, какой айтем выбран
end;
 
end.

@xakasi · 27.05.2013, 22:12 **[ТС]**

UI, попробую, не знаю что получится эх , диплом штука суровая

главное в срок успеть

@xakasi · 30.05.2013, 21:07 **[ТС]**

UI, ты просто гений

, спасибо большое

и еще можно вопросик
Label1.Text := ADOQuery1.FieldByName('question').AsStri ng;
как перевести данное выражение в стринговое
ну или же сделать связку question и id_quest
они находятся в одной таблице и при выполнение определенного кода вопрос меняется и охото что бы id менялся вместе с вопросом но не выводился

Новые блоги и статьи Все статьи Все блоги /
1С: Контроль уникальности заводского номера Maks 23.03.2026 Алгоритм контроля уникальности заводского (или серийного) номера на примере документа выдачи шин для спецтехники с табличной частью. Данные берутся из регистра сведений, по которому настроено. . .	Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения anaschu 22.03.2026 e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git	1С: Программный отбор элементов справочника по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .
Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	1С: Программный отбор элементов справочника по значению перечисления Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит значение перечислений. / / Событие "НачалоВыбора" реквизита на форме. . .	Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .

@xakasi 0 / 0 / 0 Регистрация: 30.10.2012 Сообщений: 14

	RadioGroup в RAD Studio XE3, FireMonkey 27.05.2013, 18:51. Показов 4644. Ответов 7 Метки нет (Все метки) как называется radiogroup в firemonkey ну или как сделать данную функцию вообщем помогите плиз чайнику заранее спасибо 0

@volvo Супер-модератор 33400 / 21510 / 8236 Регистрация: 22.10.2011 Сообщений: 36,907 Записей в блоге: 12
	27.05.2013, 19:03
	TGroupBox + TRadioButton чем не устраивают? 0

@xakasi 0 / 0 / 0 Регистрация: 30.10.2012 Сообщений: 14
	27.05.2013, 19:18 [ТС]
	UI, я просто не понимаю как сделать так что бы он под каждое выведенное значение выводил RadioButton 0

@volvo Супер-модератор 33400 / 21510 / 8236 Регистрация: 22.10.2011 Сообщений: 36,907 Записей в блоге: 12
	27.05.2013, 19:40
	Кто "он"? Под какое значение, куда выведенное? Про это у тебя в первом посте вообще ничего нет! Больше информации... 0

@xakasi 0 / 0 / 0 Регистрация: 30.10.2012 Сообщений: 14
	27.05.2013, 19:44 [ТС]
	делаю тестирование и вывожу тесты которые можно пройти и вот хочу что бы варианты тестов выводились в радиогрупп и что бы при нажатие на название теста ну или на RadioButton выводился тест 0

@xakasi 0 / 0 / 0 Регистрация: 30.10.2012 Сообщений: 14
	27.05.2013, 22:12 [ТС]
	UI, попробую, не знаю что получится эх , диплом штука суровая главное в срок успеть 0

@xakasi 0 / 0 / 0 Регистрация: 30.10.2012 Сообщений: 14
	30.05.2013, 21:07 [ТС]
	UI, ты просто гений , спасибо большое и еще можно вопросик Label1.Text := ADOQuery1.FieldByName('question').AsStri ng; как перевести данное выражение в стринговое ну или же сделать связку question и id_quest они находятся в одной таблице и при выполнение определенного кода вопрос меняется и охото что бы id менялся вместе с вопросом но не выводился 0