| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Две независимые группы радиокнопок [D5, WinME]

Anton ©   (2004-07-15 07:10:00) 

Доброго времени суток, Мастера!
Подскажите, плиз, как сделать (не привлекая редактор ресурсов)
две группы радиобаттонов, помещенные в свои групповые контейнеры (стиль баттона - bs_groupbox)и с автоматическим переключением

---

jack128   (2004-07-16 20:02:00) [1]

> [5] Anton   (16.07.04 18:17)
> То есть?

думай. читай хелп. ответ более, чем прозрачен.

> Однако, не получается обособленного переключения радиокнопки
> только в группе, как у дельфийского компонента TRadioGroup.
ну так загляни в исходники этого компонента.

Еще раз повторю, ответа [4] более чем достаточно, для решения твоей проблемы.

---

Anton   (2004-07-16 18:17:00) [2]

То есть?

И так делаю:

Btns[4] := CreateWindowEx(0,'button','bs_groupbox',bs_groupbox or ws_child {or ws_visible},200,10,150,135,MainWindow,GroupBox1,hinstance,nil);

 Btns[5] := CreateWindowEx(0,'button','bs_autoradiobutton 1',bs_autoradiobutton or ws_child or ws_visible,210,20,80,25,MainWindow,RadioBtn1,hinstance,nil);

 Btns[6] := CreateWindowEx(0,'button','bs_autoradiobutton 2',bs_autoradiobutton or ws_child or ws_visible,210,60,80,25,MainWindow,RadioBtn2,hinstance,nil);

 Btns[7] := CreateWindowEx(0,'button','bs_autoradiobutton 3',bs_autoradiobutton or ws_child or ws_visible,210,100,80,25,MainWindow,RadioBtn3,hinstance,nil);

 Btns[8] := CreateWindowEx(0,'button','bs_groupbox',bs_groupbox or ws_child {or ws_visible},200,150,150,135,MainWindow,GroupBox2,hinstance,nil);

 Btns[9] := CreateWindowEx(0,'button','bs_autoradiobutton 4',bs_autoradiobutton or ws_child or ws_visible,210,160,80,25,MainWindow,RadioBtn4,hinstance,nil);

Btns[10] := CreateWindowEx(0,'button','bs_autoradiobutton 5',bs_autoradiobutton or ws_child or ws_visible,210,200,80,25,MainWindow,RadioBtn5,hinstance,nil);

Btns[11] := CreateWindowEx(0,'button','bs_autoradiobutton 6',bs_autoradiobutton or ws_child or ws_visible,210,240,80,25,MainWindow,RadioBtn6,hinstance,nil);

Однако, не получается обособленного переключения радиокнопки только в группе, как у дельфийского компонента TRadioGroup.

---

jack128   (2004-07-16 11:25:00) [3]

используй флаг WS_GROUP для обозначения начала группы радиобаттонов

---

Anton   (2004-07-16 10:25:00) [4]

Да, надо сделать 2 RadioGroup, но средствами API, Без вмешательства VCL и редактора ресурсов.

---

KADAN   (2004-07-16 01:09:00) [5]

может RadioGroup?

---

ПЛОВ   (2004-07-15 15:21:00) [6]

>  как сделать

CreateWindow

---

Наверх