FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour BTNBMP COLOR GRAD
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
BTNBMP COLOR GRAD
Posted: Wed Mar 25, 2015 09:32 PM

for the version 2007 I made this type of gradient

Local bClrGrad := { | lPressed | If( ! lPressed,;
{ { 1, nRGB( 253, 254, 255 ), nRGB( 179, 217, 255 ) } },;
{ { 1, nRGB( 179, 217, 255 ), nRGB( 253, 254, 255 ) } } ) }

but now I wish have a 2010 effect ...how I can modify the clrgrad ?

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: BTNBMP COLOR GRAD
Posted: Thu Mar 26, 2015 03:33 PM
Try this: (following your code)
Code (fw): Select all Collapse
Local bClrGrad := { | lPressed | If( ! lPressed,;
            { { 1, nRGB( 255, 255, 255 ), nRGB( 229, 233, 238 ) } },;
            { { 1, nRGB( 229, 233, 238 ), nRGB( 255, 255, 255 ) } } ) }
Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
Re: BTNBMP COLOR GRAD
Posted: Fri Mar 27, 2015 08:52 AM

thanks run ok

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com

Continue the discussion