Código Delphi [-]if consulta.recordcount = 0 them DBRadioGroup.ItemIndex = 1 else DBRadioGroup.ItemIndex = 0;
if consulta.recordcount = 0 them DBRadioGroup.ItemIndex = 1 else DBRadioGroup.ItemIndex = 0;