Sr. Antonio, estou com a nova vs do FWH, e não estou conseguindo mudar a cor de fundo do botão. ex:
@ 02,10 btnbmp oBtn prompt "teste" top size 60,64 of oWndc 2007
obtn:setcolor(CLR_WHITE,CLR_RED)
Board index FiveWin para Harbour/xHarbour FWH 9.12 - BTNBMP 2007 Cor de Fundo
Ola SGS
Para alterar a cor Retire o 2007 e se vc. tiver mais de um botão na dialog mude o objeto de cada um tipo assim
Abraços..
Para alterar a cor Retire o 2007 e se vc. tiver mais de um botão na dialog mude o objeto de cada um tipo assim
Local obtn[3]
...obtn[1]
...obtn[2]
...obtn[3]Abraços..
Mais usando o 2007, NÃO É POSSÍVEL ALTERAR A COR DE FUNDO DO BOTÃO?
Aqui tienes un ejemplo de como hacerlo:
Al pasar el ratón por encima del botón:
#include "FiveWin.ch"
function Main()
local oWnd, oBtn
DEFINE WINDOW oWnd
@ 5, 10 BTNBMP oBtn PROMPT "teste" TOP SIZE 60, 64 OF oWnd 2007
oBtn:bClrGrad = { | lMouseOver | If( ! lMouseOver,;
{ { 0.5, RGB( 69, 124, 188 ), RGB( 41, 93, 171 ) }, ;
{ 0.5, RGB( 26, 64, 136 ), RGB( 56, 135, 191 ) } },;
{ { 0.5, RGB( 123, 178, 236 ), RGB( 71, 126, 205 ) }, ;
{ 0.5, RGB( 17, 78, 175 ), RGB( 128, 225, 255 ) } } ) }
ACTIVATE WINDOW oWnd
return nilAl pasar el ratón por encima del botón:
obrigado Sr. Antonio.