Cordial saludo.
Tengo un formulario principal(frmCaptura) con 3 textbox y
un pageframe con 4 fichas:Basicos,grupos,Beneficiarios y
adicionales.
En frmCaptura cree un metodo para deshabilitar o
habilitar los controles del form y en Init de este
formulario llamo este metodo; en las fichas
grupos,Beneficiarios y adicionales agregue un boton
Adicionar para llamar a la forma respectiva.
Ej: Cuando doy click en el boton Adicionar de la ficha
grupos llamo a la forma frmGrupos y oculto la forma
(frmCaptura) para ingresar los datos de grupo eso todo
bien; agregue un boton Volver para cerrar esta forma y
llamar frmCaptura; todo bien PERO cuando vuleve mi
formulario frmCaptura me deshabilita todos los controles
y vuelve a 0 el textbox de cedula, se que eso se debe a
que ejecuta el Init; esto no me sirve pues si esa persona
va a ingresar beneficiarios y adicionales tiene que
volver a digitar la cedula y al usuario no le va a gustar
repetir el proceso de digitarlo.
hice lo siguiente en el metodo click de volver en
frmGrupos escribi
local lnCaptura
lnCaptura=1
thisform.release
do form frmCaptura with lnCaptura
thisform.visible = .T.
y en frmCaptura en Init escribo
LPARAMETERS lnCaptura
if lnCaptura <> 1
thisform.refreshforma(.F.)-->metodo para deshabilitar
endif
Cuando lo ejecuto por primera vez logico que va a salir
error porque no tiene parametros; asi que escribi:
LPARAMETERS lnCaptura
if lnCaptura = .F.
thisform.refreshforma(.F.)-->metodo para deshabilitar
else
if lnCaptura <> 1
thisform.refreshforma(.F.)-->metodo para deshabilitar
endif
endif
Al ejecutar por primera vez todo bien pero cuando le doy
click en volver de frmGrupos me sale error.
Alguien pude darme soluciones.
Agradezco la ayuda y sugerencias que me puedan brindar
Leer las respuestas