Código Delphi
[-]procedure TForm1.Label1Click(Sender: TObject);
begin
Label1.Caption := inttostr(radiogroup1.ItemIndex );
end;
procedure TForm1.Button1Click(Sender: TObject);
var
NumOrden, basSel : integer;
begin
Label1.Caption := inttostr(RadioGroup1.ItemIndex);
end;
El código lo he probado y funciona sin ningún problema en D7, he tenido que anular la línea de
NumOrdern ya que
numeroOrden no existe y no sé donde la tendrás declarada.
Un Saludo.