É possivel mudar a cor do tema 2007 da TBar?
Ao inves de azul colocar verde?
Antonio Linares wrote:Anderson,
De momento no hemos publicado el código fuente, pero proporcionaremos unos parámetros para cambiar los colores usados
if hBmp == nil .and. ::l2007
hBmp = MsgBar2007( ::hDC )
endif
Antonio Linares wrote:Anderson,
Para la barra de mensajes necesitas un bitmap y has de cargarlo en el método Paint():
- Code: Select all Expand view RUN
if hBmp == nil .and. ::l2007
hBmp = MsgBar2007( ::hDC )
endif
En vez de llamar a MsgBar2007(), llama a LoadBitmap( GetResources(), <cResName> ) en donde <cResName> es el nombre del bitmap en tu fichero de recursos. El bitmap se estirará ajustándose al tamaño de la barra.
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: Antonio Linares, Google [Bot] and 29 guests