PC Toledo

Enviado: **04 Jan 2019 21:22**

@ <x>,<y> GROUPBOX [ <oGroup> CAPTION ] <caption>
[ OF <oWnd> ];
[ ID <nId> ]
[ SIZE <width>, <height> ]
[ COLOR <tcolor> ]
[ BACKCOLOR <bcolor> ]
[ ON INIT <bInit> ]
[ ON SIZE <bSize> ]
[ ON PAINT <bDraw> ]
[ STYLE <nStyle> ]
[ FONT <oFont> ]

estou usando da seguinte forma:
LOCAL oFontGroup := HFont():Add( 'Arial',0,-13,400,,,)

@ 15,197 GROUPBOX oGroup1 CAPTION "Itens da nota fiscal" SIZE 1015,462 COLOR 16711680 FONT oFontGroup

mas COLOR não funciona, gostaria de saber como colocar cor no CAPTION do GROUPBOX
SEGUE FONTE DA CLASSE

Código: Selecionar todos

//- HGroup

CLASS HGroup INHERIT HControl

   CLASS VAR winclass   INIT "BUTTON"

   METHOD New( oWndParent, nId, nStyle, nLeft, nTop, nWidth, nHeight, ;
               cCaption, oFont, bInit, bSize, bPaint, tcolor, bColor )
   METHOD Activate()

ENDCLASS

METHOD New( oWndParent, nId, nStyle, nLeft, nTop, nWidth, nHeight, cCaption, ;
            oFont, bInit, bSize, bPaint, tcolor, bColor ) CLASS HGroup

   nStyle := Hwg_BitOr( IIF( nStyle == NIL, 0, nStyle ), BS_GROUPBOX )
   ::Super:New( oWndParent, nId, nStyle, nLeft, nTop, nWidth, nHeight, ;
              oFont, bInit, bSize, bPaint,, tcolor, bColor )

   ::title   := cCaption
   ::Activate()

RETURN Self

METHOD Activate CLASS HGroup
   IF !Empty( ::oParent:handle )
      ::handle := hwg_Createbutton( ::oParent:handle, ::id, ::style, ;
                                ::nLeft, ::nTop, ::nWidth, ::nHeight, ;
                                ::title )
      ::Init()
   ENDIF
RETURN NIL

ESTOU USANDO A HWGUI 2.22 BUILD 1

Enviado: **23 Jan 2019 20:12**

RESOLVI este problema da cor do CAPTION modificando o arquivo WIDGETS.XML incluindo as tags correspondentes e o DESIGNER passou a funcionar com a CAPTION do GROUPBOX com cor , resolvido , se quiserem eu mando o novo arquivo

)

PC Toledo

COMO COLOCAR COR NO CAPTION DO GROUPBOX ???

COMO COLOCAR COR NO CAPTION DO GROUPBOX ???

COMO COLOCAR COR NO CAPTION DO GROUPBOX ???