Duda con RadioGroup..

[elbilla]

Tengo varios radiogroups con 8 radiobuttons cada uno, pero no consigo que un boton controle si se queda alguno sin pulsar al pasar a otro panel.

Lo pongo así:

if (RadioGroup1.Items[RadioGroup1.ItemIndex]='1') OR 
		 if (RadioGroup1.Items[RadioGroup1.ItemIndex]='2') OR

Así hasta los 8 buttons q hay. Si está pulsado algun button se mete por ese if, sino q saque un mensaje.
Me da un error out of Index...................Como lo podría hacer ??

Un saludo.

[marcoszorrilla]

El problema es que si tienes 4 items el primero es el 0 y no el uno, por lo tanto el último sería el 3 y no el 4.

De todos modos si pones su propiedad ItemIndex a 0 lo tendrás resuelto sin poner código.

Un Saludo.

[elbilla]

El problema no es ese, ya q el código hace referencia al valor del button (q en el string list editor va del 1 al 8) y no al elemento, q como dices empieza en el 0. Lo de la propiedad Itemindex a 0 ya lo había visto, pero así lo que hace es q marca el elmento 0, y lo q yo quiero es q no marque ninguno por defecto.
No sé si me he explicado bien...
Un saludo..

[marcoszorrilla]

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);
 begin
 if RadioGroup1.itemIndex < 0 then
  ShowMessage('No Marcó ninguna opción.');
 end;

En ese caso la cosa es más simple si el valor es menor que 0 no marcó ninguna opción.

Un Saludo.

[elbilla]

Solucionado....

Gracias..