Все намного прозаичнее
PHP код:
procedure TForm1.Button1Click(Sender: TObject);
begin
if RadioGroup1.ItemIndex = -1 then Exit;
TRadioButton(RadioGroup1.Controls[RadioGroup1.ItemIndex]).Color := RGB(Random(255), Random(255), Random(255));
end;
RadioGroup - составной контролл. Так что можно выдернуть его чайлды (Controls) и работать с ними как с обычными TRadioButton. Хоть положение меняйте, хоть цвет, хоть шрифт
