[dec]

Hola,

Código Delphi [-]
procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
  case RadioGroup1.ItemIndex of
    0: ShowMessage('Pulsaste el radio-botón 0');
    1: ShowMessage('Pulsaste el radio-botón 1');
  end;
end;