FiveTech Software tech support forums

... ; LOGOCOLOR oDp:nMenuMainClrText aMenu:=ACLONE(aMenuTra) oDp:oItemTransaccion:lActive:=!EMPTY(aMENUTRA[1]) .AND. lHorario hacermenu(aMenu) C5ENDMENU      C5MENUITEM oDp:oItemTransaccion PROMPT oDp:cMenu04     C5MENU COLOR    oDp:nMenuItemClrText, ...

... // 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]) ...

... oBtn , x ) return { || dblmenu( nRow, nCol, oBtn ,x ) } funct dblmenu( nRow, nCol, oBtn, x ) Local oMenu C5MENU oMenu POPUP c5menuitem 'prueba' C5ENDMENU ACTIVATE C5MENU oMenu AT nRow, nCol OF oBtn Return Si es lo que me imagino, así debería funcionar: For x := 1 To 620 aforo[x]:bRClicked:={ ...

... oBtn , x ) return { || dblmenu( nRow, nCol, oBtn ,x ) } funct dblmenu( nRow, nCol, oBtn, x ) Local oMenu C5MENU oMenu POPUP c5menuitem 'prueba' C5ENDMENU ACTIVATE C5MENU oMenu AT nRow, nCol OF oBtn Return Pero me genera un error del tipo "Error BASE/1068 Argument error: array access", y creo ...

... aforo[1]:bRClicked:={ |nRow, nCol, nFlags | dblmenu( nRow, nCol ) } funct dblmenu( nRow, nCol) Local oMenu C5MENU oMenu POPUP c5menuitem 'prueba' C5ENDMENU ACTIVATE C5MENU oMenu AT nRow, nCol OF oDialog Return Cambia tu código: aforo[1]:bRClicked:={ |nRow, nCol, nFlags | dblmenu( ...

... |nRow, nCol, nFlags | dblmenu( nRow, nCol ) } Activate Dialog..... funct dblmenu( nRow, nCol) Local oMenu C5MENU oMenu POPUP c5menuitem 'prueba' C5ENDMENU ACTIVATE C5MENU oMenu AT nRow, nCol OF oDialog Return 2) En la clase TSBUTTON del Maestro Manuel Mercado, intento establecer un Tooltip en ...

... |nRow, nCol, nFlags | dblmenu( nRow, nCol ) } Activate Dialog..... funct dblmenu( nRow, nCol) Local oMenu C5MENU oMenu POPUP c5menuitem 'prueba' C5ENDMENU ACTIVATE C5MENU oMenu AT nRow, nCol OF oDialog Return ------------------------- En otra aplicación lo tengo dentro de un Windows (y me funciona) ...