Me ayudas con un optiongroup! En fox
Hola ..decidi en vez de un container o un marco de pagina usar un option group para cada busqueda q incluye un grupo de controles. Pero no me funciona y es q no me acuerdo la sintaxis, cuando ejecuto y le doy click a las opciones, se me monta todos los controles unos encimas de otros; no desaparecen al seleccionar otra opción..el código es el siguiente ..lo tengo en un metodo TipoBusqueda()en form1
if thisform.optiongroup1.value=1 then
if thisform.optiongroup1.option1.value=1 then
thisform.label4.visible=.T.
thisform.label18.visible=.T.
thisform.label5.visible=.T.
thisform.label6.visible=.T.
thisform.label7.visible=.T.
thisform.text4.visible=.T.
thisform.text3.visible=.T.
thisform.text2.visible=.T.
thisform.edit1.visible=.T.
thisform.command2.visible=.T.
else
thisform.label4.visible=.F.
thisform.label18.visible=.F.
thisform.label5.visible=.F.
thisform.label6.visible=.F.
thisform.label7.visible=.F.
thisform.text4.visible=.F.
thisform.text3.visible=.F.
thisform.text2.visible=.F.
thisform.edit1.visible=.F.
thisform.command2.visible=.F.
endif
if thisform.optiongroup1.option2.value=1 then
thisform.label8.visible=.T.
thisform.label9.visible=.T.
thisform.label10.visible=.T.
thisform.label11.visible=.T.
thisform.label12.visible=.T.
thisform.text5.visible=.T.
thisform.text6.visible=.T.
thisform.combo2.visible=.T.
thisform.list1.visible=.T.
thisform.command4.visible=.T.
else
thisform.label8.visible=.F.
thisform.label9.visible=.F.
thisform.label10.visible=.F.
thisform.label11.visible=.F.
thisform.label12.visible=.f.
thisform.text5.visible=.f.
thisform.text6.visible=.f.
thisform.combo2.visible=.f.
thisform.list1.visible=.f.
thisform.command4.visible=.f.
endif
if thisform.optiongroup1.option3.value=1
thisform.label14.visible=.T.
thisform.label15.visible=.T.
thisform.label16.visible=.T.
thisform.text8.visible=.T.
thisform.edit2.visible=.T.
thisform.command5.visible=.T.
else
thisform.label14.visible=.F.
thisform.label15.visible=.F.
thisform.label16.visible=.F.
thisform.text8.visible=.F.
thisform.edit2.visible=.F.
thisform.command5.visible=.F.
endif
if thisform.optiongroup1.option4.value=1 then
thisform.label19.visible=.T.
thisform.label17.visible=.T.
thisform.text9.visible=.T.
thisform.command6.visible=.T.
else
thisform.label19.visible=.T.
thisform.label17.visible=.T.
thisform.text9.visible=.T.
thisform.command6.visible=.T.
endif
endif
Cualquier sugerencia es bienvenida..gracias
Luisa Fernanda
if thisform.optiongroup1.value=1 then
if thisform.optiongroup1.option1.value=1 then
thisform.label4.visible=.T.
thisform.label18.visible=.T.
thisform.label5.visible=.T.
thisform.label6.visible=.T.
thisform.label7.visible=.T.
thisform.text4.visible=.T.
thisform.text3.visible=.T.
thisform.text2.visible=.T.
thisform.edit1.visible=.T.
thisform.command2.visible=.T.
else
thisform.label4.visible=.F.
thisform.label18.visible=.F.
thisform.label5.visible=.F.
thisform.label6.visible=.F.
thisform.label7.visible=.F.
thisform.text4.visible=.F.
thisform.text3.visible=.F.
thisform.text2.visible=.F.
thisform.edit1.visible=.F.
thisform.command2.visible=.F.
endif
if thisform.optiongroup1.option2.value=1 then
thisform.label8.visible=.T.
thisform.label9.visible=.T.
thisform.label10.visible=.T.
thisform.label11.visible=.T.
thisform.label12.visible=.T.
thisform.text5.visible=.T.
thisform.text6.visible=.T.
thisform.combo2.visible=.T.
thisform.list1.visible=.T.
thisform.command4.visible=.T.
else
thisform.label8.visible=.F.
thisform.label9.visible=.F.
thisform.label10.visible=.F.
thisform.label11.visible=.F.
thisform.label12.visible=.f.
thisform.text5.visible=.f.
thisform.text6.visible=.f.
thisform.combo2.visible=.f.
thisform.list1.visible=.f.
thisform.command4.visible=.f.
endif
if thisform.optiongroup1.option3.value=1
thisform.label14.visible=.T.
thisform.label15.visible=.T.
thisform.label16.visible=.T.
thisform.text8.visible=.T.
thisform.edit2.visible=.T.
thisform.command5.visible=.T.
else
thisform.label14.visible=.F.
thisform.label15.visible=.F.
thisform.label16.visible=.F.
thisform.text8.visible=.F.
thisform.edit2.visible=.F.
thisform.command5.visible=.F.
endif
if thisform.optiongroup1.option4.value=1 then
thisform.label19.visible=.T.
thisform.label17.visible=.T.
thisform.text9.visible=.T.
thisform.command6.visible=.T.
else
thisform.label19.visible=.T.
thisform.label17.visible=.T.
thisform.text9.visible=.T.
thisform.command6.visible=.T.
endif
endif
Cualquier sugerencia es bienvenida..gracias
Luisa Fernanda
1 Respuesta
Respuesta de piraton
1