Page 1 of 1
Ocultar un folder o algunos objetos
Posted: Tue Jun 04, 2013 5:08 pm
by Laurel
Hola a todos!
Tengo un programa en el que uso un folder de 4 pestañas para capturar datos pero necesito que dependiendo del usuario muestre o no algunas pestañas y en _ las 4 pero con _ ocultos.
¿cómo puedo hacer esto?
Saludos
Laurel
Re: Ocultar un folder o algunos objetos
Posted: Tue Jun 04, 2013 5:54 pm
by karinha
Code: Select all
FUNCTION MYFUNCTION( oFld )
IF EsEsto()
oFld:aEnable := { .T., .T., .T. }
ELSE
oFld:aEnable := { .T., .F., .F. }
ENDIF
RETURN( .T. )
Re: Ocultar un folder o algunos objetos
Posted: Tue Jun 04, 2013 7:12 pm
by joseluisysturiz
Para _ puedes condiconar con ON INIT cuando activas el oDlg para que muestre o no un objeto, saludos...
oTuObjeto:Hide() // ocultar
oTuObjeto:Show() // mostrar
oDlg:REFRESH()
Re: Ocultar un folder o algunos objetos
Posted: Wed Jun 05, 2013 11:27 pm
by Laurel
Mil Gracias!!
Me funcionó perfecto lo de ocultar _!!
Sólo lo de ocultar el folder no lo logré echar a andar con la instrucción que me indicaron, tengo esto
DEFINE DIALOG oDlg RESOURCE "KARDEX"
REDEFINE FOLDER oFld ID 101 OF oDlg ;
PROMPT "&Empresa" ,"&Trabajador", "&Salario" ,"&Pagos";
DIALOGS "KARDEX1" ,"KARDEX2" ,"KARDEX3" ,"KARDEX4" ;
OPTION 1
y la pestaña que deseo ocultar esta definida asi:
*-- PESTA¥A 3 Salario
REDEFINE SAY oMT_SALADIA VAR cMT_SALADIA ID 101 OF oFld:aDialogs[ 3 ] PICTURE '999,999,999.99' UPDATE
REDEFINE SAY oMT_SALAMEN VAR cMT_SALAMEN ID 102 OF oFld:aDialogs[ 3 ] PICTURE '999,999,999.99' UPDATE
REDEFINE SAY oMT_INTEG_A VAR cMT_INTEG_A ID 103 OF oFld:aDialogs[ 3 ] PICTURE '999,999,999.99' UPDATE
REDEFINE SAY oMT_COMPDIA VAR cMT_COMPDIA ID 104 OF oFld:aDialogs[ 3 ] PICTURE '999,999,999.99' UPDATE
REDEFINE SAY oMT_FECHAUM VAR cMT_FECHAUM ID 105 OF oFld:aDialogs[ 3 ] PICTURE '@D' UPDATE
REDEFINE SAY oMT_IMPAUME VAR cMT_IMPAUME ID 106 OF oFld:aDialogs[ 3 ] PICTURE '999,999,999.99' UPDATE
REDEFINE SAY oMT_SDOANTE VAR cMT_SDOANTE ID 107 OF oFld:aDialogs[ 3 ] PICTURE '999,999,999.99' UPDATE
REDEFINE SAY oMT_INTE_AN VAR cMT_INTE_AN ID 108 OF oFld:aDialogs[ 3 ] PICTURE '999,999,999.99' UPDATE
REDEFINE SAY oMT_COMPANT VAR cMT_COMPANT ID 109 OF oFld:aDialogs[ 3 ] PICTURE '999,999,999.99' UPDATE
REDEFINE GET oMT_VARIMSS VAR cMT_VARIMSS ID 110 OF oFld:aDialogs[ 3 ] PICTURE "999,999.99" UPDATE
Entonces ¿ cómo podría ocultar solo la pestaña 3 : oFld:aDialogs[ 3 ] completa sin tener que ocultar campo por campo ?
Gracias
Re: Ocultar un folder o algunos objetos
Posted: Tue Jun 11, 2013 4:19 pm
by karinha