Вниз
Скачать: CL | DM;

Две независимые группы радиокнопок   Найти похожие ветки 

← →
Anton   (2004-07-15 07:10) [0]

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


← →
ПЛОВ ©   (2004-07-15 15:21) [1]


>  как сделать

CreateWindow


← →
KADAN ©   (2004-07-16 01:09) [2]

может RadioGroup?


← →
Anton   (2004-07-16 10:25) [3]

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


← →
jack128 ©   (2004-07-16 11:25) [4]

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


← →
Anton   (2004-07-16 18:17) [5]

То есть?

И так делаю:

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 20:02) [6]


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

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

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

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.022 c
4-1089444752
Рисование на окне
2004-07-10 11:32
2004.08.29
Proger


3-1091551873
jenbond
2004-08-03 20:51
2004.08.29
Контроль подключения к БД


14-1092235321
Лерик
2004-08-11 18:42
2004.08.29
Delphi


3-1091778976
Pul
2004-08-06 11:56
2004.08.29
Сортировка по BLOB полю Interbase (Firebird)


14-1092026321
Vlad Oshin
2004-08-09 08:38
2004.08.29
Опрос о курении.




   Наверх