FiveTech Software tech support forums

... , MENU 2015 MENUITEM "Agentes" SEPARATOR MENUITEM "Formas de Pago" CHARICON 57624 MENUITEM "Entidades Bancarias" ENDMENU He visto en los ejemplos que salen unos numeros como 57624 ,57621, etc. pero me gustaria saber que significa cada código y donde puedo estudiar ...

... SELECT 3D ; LOGO oDp:cBmpMacros ; LOGOCOLOR oDp:nMenuMainClrText oDp:oItemMacro:lActive:=!EMPTY(aMenuMac[1]) .AND. lHorario hacermenu(aMENUMAC) C5ENDMENU STATIC FUNCTION HACERMENU(aMenu,oMenu) LOCAL I:=1,lacceso:=.T.,lutilizo:=.F.,oItem,nIni:=0 lMenuXp:=.T. IF EMPTY(aMenu) .OR. EMPTY(aMenu[1]) ...

... GetSysFont() SIZE 0,-14 BOLD DEFINE FONT oFont3 NAME GetSysFont() SIZE 0,-20 BOLD MENU oMenu 2007 MENUITEM "E&xit" ACTION oWnd:End() ENDMENU DEFINE WINDOW oWnd FROM 0, 0 TO nSysH, nSysW PIXEL ; MENU oMenu TITLE PA[04] + " - ID: " + PA[10] + " - " + ALLTRIM( PA[11] ...

... "fivewin.ch" #include "gif.ch" function main() local oWnd local oMenu menu oMenu menuitem "Prueba" action prueba() endmenu define window oWnd menu oMenu activate window oWnd return nil function prueba() local oDlg,oAnimate local oGif local n := 0 local oSay local ...

Silvio,

Please check that there are no extra or missings ENDMENU clauses

... function with menupopup type Function Stampa_Mov(oGrid,oCont,oBar) Local oMenuStampa MENU oMenuStampa POPUP MENUITEM "Elenco Movimenti" ENDMENU return oMenuStampa https://s14.postimg.org/fgdtwgeq9/testv.jpg Note : with Explorerbar I cannot link a popupmenu and all menuitem ...

... Rebuts/Enviats en la sesió" RESOURCE "sendbmp" MENUITEM "Fitxer de Dossiers Exportats" RESOURCE "servicebmp" ENDMENU ACTIVATE POPUP oMenu AT nTop,0 OF oWnd RETURN NIL //------------------------------------------------------------------------// FUNCTION menu2007( ...

... SEPARATOR MENUITEM "Exit" ACTION WndMain():End()// HSYSBITMAP 5 lo comento porque se vuelve 'pesado' en menu 2007/2013/2015 ENDMENU MENUITEM "Two" MENU oMnu2 MENUITEM "Sunday"// HSYSBITMAP 9 lo comento porque se vuelve 'pesado' en menu 2007/2013/2015 SEPARATOR ...

... NIL MENU MENUITEM "Abrir chamado" ACTION NIL MENUITEM "Sugestões " ACTION NIL MENUITEM "Reclamações " ACTION NIL ENDMENU SEPARATOR MENUITEM "Agenda " ACTION NIL MENUITEM "&Recibos " ACTION NIL MENUITEM "&Backup " ACTION NIL ...

... of our menu     Example: MENU oMenu MENUITEM "First" MENU MENUITEM "My Test" BOLD MENUITEM "My Menu" ITALIC ENDMENU ENDMENU In this case, the BOLD and ITALIC clauses are ignored     But, if the menu is defined as: MENU oMenu COLORS All clauses are active, ...

... CODEBAR_PDF417, "PDF17" ) ) menuitem "DATAMATRIX" action( BuildCode( CODEBAR_DATAMATRIX, "DataMatrix :)") ) endmenu endmenu return oMenu function BuildCode( nCode, cCode, nFlags ) * local hDC := oWndP:GetDC() default nFlags := 0 oCode:Reset() if nCode < ...

... as MENU POPUP AddEdit( aColors, cFile, cRes, lPop ) Sample: Function MyEditMnu( nR, nC, nF, oDlg ) local oMnu MENU oMnu POPUP oMnu:AddEdit(,,,.T.) ENDMENU ACTIVATE MENU oMnu OF oDlg AT nR, nC Return oMnu * COMBOBOX: Applies to comboboxes created from Source and Resources: - New clause ITEMHEIGHT ...

... MNUSELECT.PRG MENUITEM Upper( "FieldNames_" ) + Alias( 1 ) MENU SELECT ( Alias( 1 ) )->( DbStruct() ) LIMIT -1 COLUMNS 2, 1, 3 //, 4 ENDMENU MENUITEM Upper( "FieldNames_" ) + Alias( 1 ) + "_EXPAND" MENU SELECT ( Alias( 1 ) )->( DbStruct() ) LIMIT -1 COLUMNS ...

... ) MENUITEM "Changed&2" ACTION MSGINFO( "2" ) MENUITEM "Changed&3" ACTION MSGINFO( "3" ) ENDMENU DEFINE WINDOW oWnd MDICHILD OF oMdi; TITLE "MDI Child Test"; MENU oMenu NOSYSMENU ACTIVATE WINDOW oWnd; VALID !GETKEYSTATE( VK_ESCAPE ...

... mais o mouse não funciona. A window fica como se estivesse congelada. METHOD New() CLASS SampleCalex local oMenu local oSelf := Self MENU oMenu ENDMENU ::dDateStart := Date() ::dDateEnd := Date() ::lOnPreNext := .F. ::nIDPonto := RetornaIDDoPonto() DEFINE WINDOW ::oWndAC mdichild of M->oWnd ...