Gradientfill question

Post Reply
User avatar
Rick Lipkin
Posts: 2668
Joined: Fri Oct 07, 2005 1:50 pm
Location: Columbia, South Carolina USA

Gradientfill question

Post by Rick Lipkin »

To All

Started testing with the GradientFill function :

Code: Select all | Expand


ON PAINT GradientFill( hDC, 0, 0, oDlg:nHeight, oDlg:nWidth, { { 0.50, 16054371, 8388608 } } ) ;
 


The color select is a nice shade of blue .. I take it {0.50, 16054371, 8388608 } is the color combinations 50\50 ?? Just curious what the values 16054371, 8388608 are and how I can get a nice Grey\silver combination ??

Thanks
Rick Lipkin
User avatar
FranciscoA
Posts: 2163
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.

Re: Gradientfill question

Post by FranciscoA »

Hi, Rick
Maybe you want to use KsColorPick.Exe. It is for free.
Regards.
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh-MySql-TMySql
User avatar
ukoenig
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany
Contact:

Re: Gradientfill question

Post by ukoenig »

Hello Rick,

You can use one of my Tools for Gradient-painting.
A color-picker doesn't show a gradient, only 1 color.
If You can wait, today I put the new release of the xBrowse-tools in the forum.
In the meantime, You can use the old release, if You like ( search for xBrowsetools ).
There You can find a section < Dialog > where You can paint gradients.
With the Slider, You can move the 2. Gradient-color for special effect.
Inside the < Backgrondstyle-section > You can select Horizontal or Vertical.
You can create the Gradients Header and Footer for xBrowse and use the same results for the dialog.
The created code, You can copy and past to Your Prg-file.

Image

Best Regards
Uwe :lol:
Last edited by ukoenig on Wed May 20, 2009 1:33 pm, edited 1 time in total.
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
Rick Lipkin
Posts: 2668
Joined: Fri Oct 07, 2005 1:50 pm
Location: Columbia, South Carolina USA

Re: Gradientfill question

Post by Rick Lipkin »

Uwe

I have searched the forum and looked at many of your examples .. I like the beige\pearl gradient on the right side of your example ..

viewtopic.php?f=3&t=15335&p=79485&hilit=gradientfill#p79485

From what I can see .. there is only a light and dark nRGB ( two parameters ) .. but in researching this further .. it appears you can create multiple gradients with 4 parameters ??

What is the gradientfill() parameters you used in the above topic ??

Thanks
Rick Lipkin
User avatar
ukoenig
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany
Contact:

Re: Gradientfill question

Post by ukoenig »

Hello Rick,

Inside the tools there is a gradient-painter-section.
There You can paint a gradient, resize and save the result as a BMP-file.
The saved gradient-BMP you can use as Browser-Brush, include on a Background-image and so on.
I used the saved BMP as a Bar-background on the right side of the Window-background-image.

The result :
--------------
aGrad := { { 1.0, 16777215, 5081712 },{ 1.0, 5081712, 16777215 } }
The value 1 means : color1 = left, color2 = right.
The value 0.50 means : color1 = left, color2 = centered, color1 = right ( move 2. color-position )
How to use a Grad :
GradientFill( hDC, 0, 0, oDlg:nHeight, oDlg:nWidth, aGrad, .F. ) // Vertical
GradientFill( hDC, 0, 0, oDlg:nHeight, oDlg:nWidth, aGrad, .T. ) // Horizontal

Image

Best Regards
Uwe :lol:
Last edited by ukoenig on Wed May 20, 2009 1:51 pm, edited 3 times in total.
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
FranciscoA
Posts: 2163
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.

Re: Gradientfill question

Post by FranciscoA »

Yes, I forgot it. xBrowTools. Excelent tool.
Regards.
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh-MySql-TMySql
User avatar
Rick Lipkin
Posts: 2668
Joined: Fri Oct 07, 2005 1:50 pm
Location: Columbia, South Carolina USA

Re: Gradientfill question

Post by Rick Lipkin »

Uwe

Thank you for the definition of the gradient parameters ..

Code: Select all | Expand


aGrad := { { 1.0, 16777215, 5081712 },{ 1.0, 5081712, 16777215 } }
The value 1 means : color1 = left, color2 = right.
The value 0.50 means : color1 = left, color2 = centered, color1 = right ( move 2. color-position )
How to use a Grad :
GradientFill( hDC, 0, 0, oDlg:nHeight, oDlg:nWidth, aGrad, .F. ) // Vertical
GradientFill( hDC, 0, 0, oDlg:nHeight, oDlg:nWidth, aGrad, .T. ) // Horizontal
 

I am a LOT closer than I was and gettting closer to that 'champagne' color gradient I am looking for. Let me know when you modify your tool .. I want to take a look.

Rick Lipkin
User avatar
FranciscoA
Posts: 2163
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.

Re: Gradientfill question

Post by FranciscoA »

Rick:
Do You can load an image containing the color you want?
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh-MySql-TMySql
User avatar
Rick Lipkin
Posts: 2668
Joined: Fri Oct 07, 2005 1:50 pm
Location: Columbia, South Carolina USA

Re: Gradientfill question

Post by Rick Lipkin »

Francisco

It is not so much loading an IMAGE as just taking a Dialog and painging the GradientFill color .. Like this:

Code: Select all | Expand


aGrad := { { 1.0, 16777215, nRGB(4,53,107) },{ 1.0, nRGB(4,53,107), 16777215 } }

DEFINE DIALOG oDlg RESOURCE "PCAS" ;
       TITLE cTITLE

...
...

ACTIVATE DIALOG oDlg ;
         ON PAINT GradientFill( hDC, 0, 0, oDlg:nHeight, oDlg:nWidth, aGrad, .T. )
 


Rick
User avatar
FranciscoA
Posts: 2163
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.

Re: Gradientfill question

Post by FranciscoA »

Rick:
Sorry for my bad English. I understood that you wanted to find one color gradient, and that is why I asked you to display any image that I could identify the color you want, and see if I could send you the RGBS or equivalence. You speak Spanish?
Greetings
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh-MySql-TMySql
User avatar
Rick Lipkin
Posts: 2668
Joined: Fri Oct 07, 2005 1:50 pm
Location: Columbia, South Carolina USA

Re: Gradientfill question

Post by Rick Lipkin »

Fransisco

I found your "KsColorPick.Exe" and downloaded it and started using it.. Very useful for pointing and clicking on 'something' and the tool telling you what the RGB is ..

I have been playing with it all afternoon .. I must admit .. the more I play with gradientfill .. the more 'trite' ( gauty ) my application becomes.

I am going to Google a search on 'gradientfill color combinations' and see what I find .. it seems all the colors I pick are just not my kinda conservative.

Rick Lipkin
Post Reply