Ver Mensaje Individual
  #2  
Antiguo 31-10-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola lunicirus.

No podes asignar los valores del arreglo de ese modo, como si estuvieses definiendo valores enumerativos.

Un ejemplo de como podrías hacer lo que buscas:
Código Delphi [-]
...
var
  ...
  Rgroups: array[0..3] of TRadioGroup;

implementation  

(* Asignar elementos al arreglo *)
procedure TForm1.FormCreate(Sender: TObject);
begin
  RGroups[0]:= RgVectorInicial;
  RGroups[1]:= RgEcuacionHidraulica;
  RGroups[2]:= RgProbabilidades;
  RGroups[3]:= RgRecombinacion;
  Randomize;
end;

(* Seleccionar items al azar en los 4 RadioGroups *)
procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  for i:= 0 to 3 do
    RGroups[i].ItemIndex:= Random(RGroups[i].Items.Count);
end;
...

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita