FoxPro/Visual FoxPro - Como se maneja el Opcion Group

Quetal como estan quisiera saber como se maneja el Opcion Group.

Lo que quiero hace es, colocar 3 opciones, y cada una de ellas tenga una asignacion como ser.
opcion1=A
opcion2=B
opcion3=C
cuando seleccione uno de ellos, la opcion digamos selecciono opcion1, y luego hacer clic en el Boton Guardar a mi base de datos, el dato (A), y que tengo que escrivir en el codigo: para Guardar y como tengo que realizar los Opcion Groups para que esten los datos A,B, C.

Hummmm!!
Haber para ke tengas 3 opciones modifica la propiedad BottunCount a 3 del objeto OptionGroup.
Ahora para ke tengas los 3 valores tienes ke modificar el OptionGroup para esto dale clic derecho sobre el mismo y lego escoges la opcion MODIFICAR; y luego as clic en cualkiera de las 3 opciones y luego modifica las propiedades CAPTION de cada opcion.
Ahora para ke obtengas los valores A, B, C tengo un codigo pekeño.

Local xDato &&Variable a Grabar en tu tabla.
Do Case
Case ThisForm.Optiongroup1.Option1.Value = 1
xDato = 'A'
Case ThisForm.Optiongroup1.Option2.Value = 1
xDato = 'B'
Case ThisForm.Optiongroup1.Option3.Value = 1
xDato = 'C'
EndCase
***** Ahora simplemente grabas la variable en tu tabla.
Select Tabla
Append Blank
Go Botton
Replace Tabla.campo With xDato
***** Listo man

Nota: El codigo corre perfectamento bajo laz version 6.0.

Hummmm!!
Haber para ke tengas 3 opciones modifica la propiedad BottunCount a 3 del objeto OptionGroup.
Ahora para ke tengas los 3 valores tienes ke modificar el OptionGroup para esto dale clic derecho sobre el mismo y lego escoges la opcion MODIFICAR; y luego as clic en cualkiera de las 3 opciones y luego modifica las propiedades CAPTION de cada opcion.
Ahora para ke obtengas los valores A, B, C tengo un codigo pekeño.

Local xDato &&Variable a Grabar en tu tabla.
Do Case
Case ThisForm.Optiongroup1.Option1.Value = 1
xDato = 'A'
Case ThisForm.Optiongroup1.Option2.Value = 1
xDato = 'B'
Case ThisForm.Optiongroup1.Option3.Value = 1
xDato = 'C'
EndCase
***** Ahora simplemente grabas la variable en tu tabla.
Select Tabla
Append Blank
Go Botton
Replace Tabla.campo With xDato
***** Listo man

Nota: El codigo corre perfectamento bajo laz version 6.0.

Debe funcionar tambien para Version 9 de vfp....buen codigo felicidades.

Buen Dia

holaaa.. si alguien por ahi puede ayudarme... )= tengo el optiongroup en mi form dos veces y tengo que guardar los datos tipo femenino masculino.. una 'F' cuando femenino y una 'M' cuando masculino.. ok hago todo el procedimiento.. pero a la hora de guardar me da un error "no coincide los tipos de datos" y me señala en el insert.. ya no se que hacer busque por todos los medios pero no me sale...