- Code: Select all Expand view
//...
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
Me coge la imagen, el texto, pero el tipo de letra no se corresponde a oFont1
Que hago mal???
Gracias.