mgsoft wrote:Antonio,
The colour of the buttons:
http://img651.imageshack.us/img651/3971/noway.png
In left one, the mouse is over it. The right colour is the normal colour, but FW does not look the same.
Thanks
#include "fivewin.ch"
#include "ribbon.ch"
FUNCTION Main()
LOCAL oWnd
LOCAL oBtn1, oBtn2, oBtn3, oBtn4
DEFINE WINDOW oWnd
@ 30, 30 RBBTN oBtn1 PROMPT "&Aceptar" OF oWnd BORDER SIZE 100, 30 ROUND CENTER LINECOLORS RGB( 255,255,255 ), RGB( 118, 146, 184 )
@ 30, 140 RBBTN oBtn2 PROMPT "&Cancelar" OF oWnd BORDER SIZE 100, 30 ROUND CENTER
@ 70, 30 BTNBMP oBtn3 PROMPT "&Aceptar" OF oWnd 2007 SIZE 100,30 CENTER
oBtn3:bClrGrad := { | lInvert | If( lInvert, ;
{ { 1/2, nRGB( 255, 255, 251 ), nRGB( 255, 237, 178 ) }, ;
{ 1/2, nRGB( 255, 218, 103 ), nRGB( 255, 233, 162 ) } ;
}, ;
{ { 1/2, nRGB( 232, 241, 252 ), nRGB( 232, 241, 252 ) }, ;
{ 1/2, nRGB( 210, 225, 244 ), nRGB( 235, 243, 253 ) } ;
} ) }
oBtn3:lBoxSelect = .F.
@ 70, 140 BTNBMP oBtn4 PROMPT "&Cancelar" OF oWnd 2007 SIZE 100,30 CENTER
oBtn4:bClrGrad := { | lInvert | If( lInvert, ;
{ { 1/2, nRGB( 255, 255, 251 ), nRGB( 255, 237, 178 ) }, ;
{ 1/2, nRGB( 255, 218, 103 ), nRGB( 255, 233, 162 ) } ;
}, ;
{ { 1/2, nRGB( 232, 241, 252 ), nRGB( 232, 241, 252 ) }, ;
{ 1/2, nRGB( 210, 225, 244 ), nRGB( 235, 243, 253 ) } ;
} ) }
oBtn4:lBoxSelect = .F.
ACTIVATE WINDOW oWnd
RETURN NIL
with fivewin you always will find support, we are a good developers team, and a excelent manager, teacher and friend (antonio)
SkinButtons()
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot], Silvio.Falconi and 105 guests