FiveTech Software tech support forums

Code: Select all

//...
   DEFINE FONT oFont1 NAME "Calibri" SIZE 0, -16
   DEFINE WINDOW oWnd FROM 1, 1 TO 800, 1450 PIXEL
//...

WITH OBJECT TExplorerBar():New( 0, 0, 250, 730, oWnd )
:SetFont( oFont1 )
:AddPanel( "Fitxers", "MenuFitxers" )
:AddPanel( "Assentaments", "MenuAssentaments" )
:Refresh()   //No hace nada
END WITH

   ACTIVATE WINDOW oWnd CENTERED

 

Code: Select all

WITH OBJECT TExplorerBar():New( 0, 0, 250, 730, oWnd )
   :AddPanel( "Fitxers", "MenuFitxers" ):SetFont( oFont1 )
   :AddPanel( "Assentaments", "MenuAssentaments" ):SetFont( oFont1 )
END WITH