Detectar cuando cambia el itemindex de un radiogroup desde codigo

[ecfisa]

Hola.

Empezado por Anel Hernandez

Hola,

tengo un procedimiento que se activa cuando cambia el itemindex de un radiogroup. Cuando se hace con el mouse todo funciona bien porque se activa el evento onclick. Pero cuando se hace desde codigo no se activa ningún evento.

Como pudiera detectar cuando cambia el itemindex de un radiogroup desde codigo?

A mi no me queda claro que es lo que te está sucediendo, por que si cambias la propiedad ItemIndex desde código, el evento OnClick del TRadioButton se disparará como podes apreciar en este ejemplo simple:

Código Delphi [-]
var
  ix : Integer = -1;

procedure TForm1.FormCreate(Sender: TObject);
begin
  RadioGroup1.Items.CommaText := 'cero,uno,dos,tres,cuatro,cinco';
end;

procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
  ShowMessage('RadioGroup1Click');
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  if ix < RadioGroup1.Items.Count then
    Inc(ix)
  else
    ix := 0;
  RadioGroup1.ItemIndex := ix;
end;

Saludos