Folderex - Problema con disable/update [SOLUCIONADO]
Posted: Wed May 20, 2015 2:22 am
Estimados;
estoy usando, por primera vez, esta clase.
Uso: FWH 12.04 + xHarbour 1.2.1
Inicialmente tengo el siguiente Folderex codificado desde recursos
Luego de hacer clic en el primer checkbox, deshabilita el siguiente ("Usa Controlador Fiscal") y todos los recursos dependientes (gets y combos).
Ahora bien luego de aplicar Disable+Update a dichos recursos se visualiza asi:
Este es el código que aplico:
que estoy haciendo mal?
En otro orden, aunque menor por ahora, intento agregar BITMAPS, pero los mismos no se visuallizan (probados inclusive en los samples)
gracias!
estoy usando, por primera vez, esta clase.
Uso: FWH 12.04 + xHarbour 1.2.1
Inicialmente tengo el siguiente Folderex codificado desde recursos
Luego de hacer clic en el primer checkbox, deshabilita el siguiente ("Usa Controlador Fiscal") y todos los recursos dependientes (gets y combos).
Ahora bien luego de aplicar Disable+Update a dichos recursos se visualiza asi:
Este es el código que aplico:
- Code: Select all Expand view
- REDEFINE FOLDEREX aO[_Fld] ID 301 OF oDlg ;
PROMPT "Datos Particulares", "Impuestos", "Salidas impresas" ;
DIALOGS "get_DatosPart", "get_Porcent", "get_ToPrint" ;
ALIGN AL_RIGHT, AL_RIGHT, AL_RIGHT, AL_RIGHT ;
ROUND 5 ANIMATE SPEED 10
...
// To Print - Fac.Electronica
REDEFINE CHECKBOX aO[_ChkFE] VAR aCampos[_FFACELE] ID 101 OF aO[_Fld]:aDialogs[3] UPDATE ;
ON CHANGE ( if( aCampos[_FFACELE], aEval( aO, {|o| o:Disable() }, _ChkFC, 2 ), ; // Tambien inclui, aca, o:Refresh() con el mismo resultado
aEval( aO, {|o| o:Enable() }, _ChkFC, 2 ) ), ;
aO[_Fld]:aDialogs[3]:Update() )
REDEFINE GET hDatos["PtoVtaFE"] ID 102 OF aO[_Fld]:aDialogs[3] UPDATE
REDEFINE GET hDatos["RutaLog" ] ID 103 OF aO[_Fld]:aDialogs[3] UPDATE
// To Print - Fac.Fiscal
REDEFINE HLINE ID 201 OF aO[_Fld]:aDialogs[3] COLORS CLR_WHITE, CLR_BACKBLUE3, CLR_BLUE UPDATE
REDEFINE CHECKBOX aO[_ChkFC] VAR aCampos[_FFACFIS] ID 104 OF aO[_Fld]:aDialogs[3] UPDATE
REDEFINE COMBOBOX aO[_CmbCF1] VAR cMarca ITEMS aMarcas ID 105 OF aO[_Fld]:aDialogs[3] UPDATE ;
ON CHANGE oSelf:aIFParam[_Marca]:= aO[_CmbCF1]:nAt
REDEFINE COMBOBOX aO[_CmbCF2] VAR cModelo ITEMS aModelos ID 106 OF aO[_Fld]:aDialogs[3] UPDATE ;
ON CHANGE oSelf:aIFParam[_FISCAL]:= aO[_CmbCF2]:nAt
REDEFINE COMBOBOX aO[_CmbCF3] VAR cConex ITEMS aConex ID 107 OF aO[_Fld]:aDialogs[3] UPDATE ;
ON CHANGE ( oSelf:aIFParam[_IFSERVER]:= if( aO[_CmbCF3]:nAt == 1, "", "0" ), ;
oSelf:aIFParam[_IFSOCKET]:= if( aO[_CmbCF3]:nAt == 1, "", "localhost:2000" ), ;
oSelf:aIFParam[_IFEMUL ]:= if( aO[_CmbCF3]:nAt == 1, "NO", "SI" ) )
REDEFINE COMBOBOX aO[_CmbCF4] VAR cPuerto ITEMS aPuertos ID 108 OF aO[_Fld]:aDialogs[3] UPDATE ;
ON CHANGE oSelf:aIFParam[_IFPORT]:= Str( aO[_CmbCF4]:nAt, 1 )
REDEFINE GET aO[_GetFC1] VAR nSucurCF ID 109 OF aO[_Fld]:aDialogs[3] UPDATE
REDEFINE GET aO[_GetFC2] VAR aCampos[_FDIRLOG] ID 110 OF aO[_Fld]:aDialogs[3] UPDATE
// To Print - Tickeadora
REDEFINE HLINE ID 202 OF aO[_Fld]:aDialogs[3] COLORS CLR_WHITE, CLR_BACKBLUE3, CLR_BLUE UPDATE
REDEFINE CHECKBOX aO[_ChkTK] VAR aCampos[_FPTICKT] ID 111 OF aO[_Fld]:aDialogs[3] UPDATE
REDEFINE GET aO[_GetTK1] VAR aCampos[_FPRINTT] ID 113 OF aO[_Fld]:aDialogs[3] UPDATE
// To Print - Multi impresoras (preimpresos)
REDEFINE HLINE ID 203 OF aO[_Fld]:aDialogs[3] COLORS CLR_WHITE, CLR_BACKBLUE3, CLR_BLUE UPDATE
REDEFINE CHECKBOX aO[_ChkMP] VAR aCampos[_FMULPRN] ID 114 OF aO[_Fld]:aDialogs[3] UPDATE
REDEFINE GET aO[_GetMP1] VAR aCampos[_FPRINTA] ID 115 OF aO[_Fld]:aDialogs[3] UPDATE
REDEFINE GET aO[_GetMP2] VAR aCampos[_FPRINTB] ID 116 OF aO[_Fld]:aDialogs[3] UPDATE
REDEFINE GET aO[_GetMP3] VAR aCampos[_FPRINTX] ID 117 OF aO[_Fld]:aDialogs[3] UPDATE
que estoy haciendo mal?
En otro orden, aunque menor por ahora, intento agregar BITMAPS, pero los mismos no se visuallizan (probados inclusive en los samples)
gracias!