Tengo un Folderex con 4 Paginas, pero la barra de botones de Footer, necesito que se pueda desactivar, no mostrar el la pagina 4 cuando esta tome el Focus, que solo sea común para las paginas del 1 al 3.
Muchos saludos.
Antonio.
Código Definición de Folderex:
- Code: Select all Expand view
DEFINE DIALOG oDlg SIZE 1230,640 PIXEL TRUEPIXEL FONT oFont6 STYLE nOr( WS_POPUP, WS_VISIBLE, WS_DLGFRAME )
oDlg:lTransparent := .F.
@ 05, 05 FOLDEREX oFld SIZE 1220,568 OF oDlg PIXEL ROUND 5 ;
PROMPT "&FIC. MEDICA", "Evaluación &1er Parte", "Evaluación &2da Parte" , "&Administración";
TAB HEIGHT 40 FONT oFont8
oFld:aDialogs[1]:lTransparent := .F.
oFld:aDialogs[2]:lTransparent := .F.
oFld:aDialogs[3]:lTransparent := .F.
oFld:aDialogs[4]:lTransparent := .F.
Código barra de Botones Footer:
- Code: Select all Expand view
********** BARRA DE FOOTER ********************
@ 575,20 GROUP oGroup6 TO 635,750 PIXEL OF oDlg // 615 - 555 = 60
@ 585,200 BTNBMP SIZE 55,50 PROMPT "BUSCAR" OF oDlg 2007 Resource "#8044" FONT oFont6 oGroup FLAT;
ToolTip "BUSCAR EVALUACIONES ANTERIORES"
// ACTION Busca_Evalua()
@ 585,330 BTNBMP SIZE 55,50 PROMPT "GRABA" OF oDlg 2007 Resource "#8029" FONT oFont6 oGroup FLAT;
ToolTip "GRABA DATOS"
// ACTION IF(!Graba_Agrega_Eva(),(MsgStop(Mensa),.F.),.t.)
@ 585,500 BTNBMP oBtn3 SIZE 55,47 PROMPT "VOLVER" OF oDlg PIXEL 2007 Resource "#8053" FONT oFont6 oGroup FLAT;
ToolTip "VOLVER A MENU ANTERIOR";
ACTION oDlg:End()
// ACTION IF(!Aviso_Salir(),(.f.,.F.),oDlg:End())
@ 585,40 BTNBMP SIZE 70,48 PROMPT "VER RECETA" OF oDlg 2007 Resource "#8044" FONT oFont6 oGroup FLAT;
ToolTip "VER RECETA DE APLICACION"
// ACTION Muestra_Receta()
