Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject); var NumOrden, basSel : integer; begin //NumOrden := StrToInt(NumeroOrden); Form2.Label1.Caption := inttostr(Form2.RadioGroup1.ItemIndex); end;
procedure TForm1.Button1Click(Sender: TObject); var NumOrden, basSel : integer; begin //NumOrden := StrToInt(NumeroOrden); Form2.Label1.Caption := inttostr(Form2.RadioGroup1.ItemIndex); end;