Antonio buenas tardes... listo ya compilamos la aplicación con las nuevas libs que nos enviaste, se soluciono el inconveniente de los botones. Pero.... se genero otro en los diálogos dibujados por código, específicamente en los GETS, adjunto una imagen.
En los GETS que viene definidos con Button, sale la palabra DIALOG.
Código como los tenemos definidos
Y tampoco permite completar el proceso de validación del GET, nunca sale de el.
- Code: Select all Expand view
DEFINE DIALOG oDlgFct SIZE 825, 670 PIXEL TRUEPIXEL RESIZABLE ICON "#8001"
....
@ 40, 45 GET oGdoc VAR oFac:hOtros["documento"] SIZE 90, 30 PIXEL OF oDlgFct UPDATE BITMAP "Bbusc" PICTURE "@N";
FONT oFont2 ACTION EVAL(cbDocum,.T.) VALID (EVAL(cbDocum,.F.,oFac:hOtros["documento"]),vlGdoc)
@ 40, 45 GET oGndo VAR oFac:hOtros["nombredocumento"] SIZE 120, 30 PIXEL OF oDlgFct UPDATE FONT oFont2
@ 40, 45 GET oGnro VAR oFac:hEncabezado["numero"] SIZE 100, 30 PIXEL OF oDlgFct UPDATE FONT oFont2 RIGHT PASSWORD
....
@ 40, 45 SAY oSNit VAR cSNit SIZE 76, 22 PIXEL OF oDlgFct UPDATE FONT oFont1
@ 40, 45 GET oGnit VAR oFac:hEncabezado["nit"] SIZE 120, 22 PIXEL OF oDlgFct UPDATE FONT oFont1 PICTURE cPicTer ;
BITMAP "Bbusc" ACTION EVAL(cbTerce,.T.) VALID (EVAL(cbTerce,.F.,oFac:hEncabezado["nit"]),vlGnit)
@ 40, 45 GET oGdig VAR oFac:hTercero["dv"] SIZE 22, 22 PIXEL OF oDlgFct UPDATE FONT oFont1 PICTURE "@N"
...
@ 62, 8 GROUP oGrpVe OF oDlgFct PIXEL size 350,75 FONT oFont1 PROMPT "Datos Vendedor" TRANSPARENT
@ 40, 45 SAY oSVen VAR cSVen SIZE 70, 22 PIXEL OF oDlgFct UPDATE FONT oFont1
@ 40, 45 GET oGven VAR oFac:hEncabezado["idvendedor"] SIZE 120, 22 PIXEL OF oDlgFct UPDATE FONT oFont1 PICTURE cPicTer ;
BITMAP "Bbusc" ACTION EVAL(cbVende,.T.) VALID (EVAL(cbVende,.F.,oFac:hEncabezado["idvendedor"]),vlGven)
ACTIVATE DIALOG oDlgFct CENTER VALID (MemoWrit( "facstate.txt", oDlgFct:SaveState() ),MemoWrit( "facstate_xbr.txt", oBrwItem:SaveState() ),.T.)