Как лучше построить код для Radiobutton

[Inbox]

В одной группе содержится 3 Radiobutton, в другой 2 Radiobutton.
Всего насчитывается 12 комбинаций.
Начал мутить с операторами If, Then, Else.
И описывать все 12 комбинаций. Честно говоря запутался в конец.
Может посоветуете как лучше енто дело построить?
(В зависимости от положения (Chek) машина производит разное вычисление (+,-,*,) )
Спасибо.

[Umen]

Хм, я насчитал только 6 комбинаций...
лучше использовать конструкцию CASE.
Например:
для RadioButton-ов поставь следующие таги
для RadioButton-ов из первой группы назначь событие
RadioButton1OnCLick
из 2-й - RadioButton4OnCLick

var c: integer;
//1-st Group
//RadioButton1.tag = 4 //10b    1-Gr 1-Rb
//RadioButton2.tag = 8 //100b   1-Gr 2-Rb
//RadioButton3.tag = 16 //1000b 1-Gr 3-Rb
//2-nd Grpupt         
//RadioButton4.tag = 1 //1b     2-Gr 1-Rb
//RadioButton5.tag = 2 //10b    2-Gr 2-Rb 
 
procedure TForm1.RadioButton1OnCLick(Sender:TObject); //1-stGroup
begin
  c := c and 3;
  c := c and (Sender as TRadioButton).Tag 
end;
 
procedure TForm1.RadioButton4OnCLick(Sender:TObject); //1-stGroup
begin
  c := c and 28;
  c := c and (Sender as TRadioButton).Tag 
end;
 
procedure TForm1.SomeCheck;
begin
  case c of
 5: <insert code here>  //101b 1-Gr 1-Rb; 2-Gr 1-Rb
 9: <insert code here>  //1001b 1-Gr 2-Rb; 2-Gr 1-Rb
 17:<insert code here>  //10001b 1-Gr 3-Rb; 2-Gr 1-Rb
        6: <insert code here>  //110b 1-Gr 1-Rb; 2-Gr 2-Rb
 10:<insert code here>  //1010b 1-Gr 2-Rb; 2-Gr 2-Rb
 18:<insert code here>  //10010b 1-Gr 3-Rb; 2-Gr 2-Rb 
  end;
end;

[Albenous]

Хм, я насчитал только 6 комбинаций...

Их и может быть только 6 различных. Никак не больше.
И что-то я не понял - 10010b - это что? (С case - идея хорошая)

[Virtson]

Сообщение от Albenous

И что-то я не понял - 10010b - это что? (С case - идея хорошая)

это 16 + 2 в двоичном виде

[Inbox]

Спасибо за совет! Буду разбираться.
Забыл сказать, что вторая группа, где два батона, может отключаться сhekbox-ом. И того насчитывается 9 комбинаций. (Не пойму откуда я 12 взял.....??.....)