Asignas a todos el mismo evento click y pones el siguiente código
Código Delphi
[-]
function OnClick(sender: TObject);
var
oSeleccionado : TdbgRadiogroup;
begin
oSeleccionado := (sender as TdbgRadiogroup);
showMessage(oSeleccionado.name);
end;
saludos