FiveTech Software tech support forums

Gustavo,

In your code please rename __dbgBuildMenu() as BuildMenu() and try it again, thanks

... teniendo un problema extrañísimo, sé como hacer una chapuza para que funcione, pero no sé de donde viene. Si escribo esto: DEFINE WINDOW oWnd MENU buildmenu() ACTIVATE WINDOW oWnd MAXIMIZED Y desde una opción del menú, llamo a: DEFINE DIALOG oDlg RESOURCE "MIDLG" ACTIVATE DIALOG oDlg ...

... function Main() local oBar, oCursorHand DEFINE WINDOW oWnd ; TITLE "Testing FiveWin Report-Engine and Print-Preview" ; MENU BuildMenu() DEFINE BUTTONBAR oBar _3D SIZE 26, 27 OF oWnd DEFINE BUTTON OF oBar FLAT TOOLTIP "Generate report" ; ACTION DoReport() RESOURCE ...

Another idea : DATA oMenuListPanel from 688 line of METHOD BuildMenu() SEPARATOR MENUITEM ::oMenuListPanel PROMPT FWString( "&Show listpanel" ) ; ACTION (IIF(::lListViewHide=.F.,.T.,.F.)) ; MESSAGE FWString( "Show List panel" ) ...

... ON SetHandleCount(99) REQUEST DBFCDX RddSetDefault("DBFCDX") DEFINE WINDOW oWnd FROM 1, 5 TO 20, 75; TITLE "Prueba" MENU BuildMenu() ACTIVATE WINDOW oWnd MAXIMIZED return nil //-------------------------------------------------------------------------------------------- ...

... oBIvap PROMPT fwstring("+ Iva") OF oDlg ; SIZE 63,25 ; ACTION when I change the language on another function I made : oDlg:SetMenu( BuildMenu() ) aEval(oDlg:aControls,{|oC|iif(oC:ClassName()="TBUTTON",oC:SetText( oC:cCaption ),)}) aEval(oDlg:aControls,{|oC|iif(oC:ClassName()="TBUTTON",oC:refresh(),)}) ...

... DIALOGBOX : 0 in Module: TDIALOG:ACTIVATE : 277 in Module: .\source\classes\DIALOG.PRG _POVIEW : 464 in Module: POVIEW.PRG (b)BUILDMENU : 450 in Module: Main.prg TMENU:COMMAND : 467 in Module: .\source\classes\MENU.PRG TWINDOW:COMMAND : 1,062 in Module: .\source\classes\WINDOW.PRG ...

... STYLE TILED // FiveWin new predefined Brushes DEFINE WINDOW oWnd FROM 4, 4 TO 25, 75 ; TITLE FWVERSION + " - Browsing power" ; MENU BuildMenu() ; BRUSH oBrush DEFINE BUTTONBAR oBar OF oWnd DEFINE BUTTON FILENAME "..\bitmaps\Exit.bmp" OF oBar ; ACTION If( MsgYesNo( "Do ...

... oWnd FROM 0,0 TO 29,78 TITLE "Hematologie Pr Y Beguin:"+xxdroit+" "+mtmp+ ; "=>"+msfx ; BRUSH oBrush ; MENU BuildMenu() SET MESSAGE OF oWnd ; TO "Dossier Hémato 2013-10 ~ (DMI.EXE 27~10~2013) "+FWVERSION ; CENTERED DATE KEYBOARD 2007 DEFINE TIMER ...

... Called from: => TXBROWSE:CREATEFROMCODE( 790 ) Called from: => TGESANA:ACTIVATE( 150 ) Called from: => GESANA( 79 ) Called from: => (b)BUILDMENU( 448 ) Called from: => TMENU:COMMAND( 461 ) Called from: => TWINDOW:COMMAND( 1037 ) Called from: => TMDIFRAME:COMMAND( 247 ) Called ...

... from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 270 ) Called from: WNOMIPQ.prg => GRABAR( 178 ) Called from: WNOMIPQ.prg => (b)BUILDMENU( 237 ) METHOD PaintData( nRow, nCol, nHeight, lHighLite, lSelected, nOrder, nPaintRow ) CLASS TXBrwColumn   local oCol, n, nDataHeight  ...

... Called from: source\rtl\win32ole.prg => CREATEOBJECT(78) Called from: MM204.PRG => MD204(14) Called from: MODULO.PRG => (b)BUILDMENU(219) Called from: .\source\classes\MENU.PRG => TMENU:COMMAND(484) Called from: .\source\classes\WINDOW.PRG => TWINDOW:COMMAND(1048) ...

... from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 274 ) Called from: ODWINX.prg => ODVR11( 1770 ) Called from: ODWINX.prg => (b)BUILDMENU( 33 ) Called from: .\source\classes\MENU.PRG => TMENU:COMMAND( 463 ) Called from: .\source\classes\WINDOW.PRG => TWINDOW:COMMAND( 1050 ...

... procedure must change the language on all the application. for a sample I can change the main menu with //refresh the Menu ::oWndMain:SetMenu( ::BuildMenu() ) If I insert a button on only one xbrowse as you sad the user have tha lnguage changed for that xbrowse but not for all xbrowses of application. ...

... PRIN TITLE EMPRESAS[1]+" "+alltrim(EMPRESAS[2])+" (Usuario "+USUARIO[1]+" "+alltrim(USUARIO[2])+")"; MENU BUILDMENU(nLICENCIA) icon oIco MDI //COLOR "W+/RB" prueba y comenta, saludos... :shock: