RadioGroup1.ItemIndex

[[FGarcia]]

Saludos!
la pregunta es ¿que falla aqui?

este codigo funciona OK!

Código Delphi [-]
procedure TForm2.Label1Click(Sender: TObject);
begin
Label1.Caption := inttostr(radiogroup1.ItemIndex );
end;

pero este NO!!

Código Delphi [-]
Procedure Tform2.ConsultaNumeroOrden;
var
NumOrden, basSel : integer;
begin
NumOrden := StrToInt(NumeroOrden);
Label1.Caption := inttostr(RadioGroup1.ItemIndex);
end;

a lo que me refiero en ambos codigos es a Label1.Caption. Cuando ejecuto el segundo codigo aparece:

"Error access violation en module xxxxxxxx de adress yyyyy"

he visto varios hilos en el foro y en todos el codigo es similar, por lo que no entiendo que pasa. Uso Delphi 7.

Gracias por la ayuda!