Hi Frank,

> here's some code that I used to generate my gradients:

Thank you, Frank, your code is a great example in helping me think through my design.

I assume that ...

1. your CreateGradient8() function creates a temp image file with a single pixel row(?) of gradient pixels with a width equivalent to the width of the active form or _SCREEN?

2. your RotateFlip flips your single row image into a single column image which you then stretch the width of your form as a toolbar like gradient?

Malcolm

>lnEndR = 255
>lnEndG = 255
>lnEndB = 255
>
>lnColor = GetSysColor(COLOR_HIGHLIGHT)
>lcRGB = x7colortorgbstring(m.lnColor) && VMP function
>
>lnStartR = VAL(STREXTRACT(lcRGB,"(", ","))
>lnStartG = VAL(STREXTRACT(lcRGB,",", ","))
>lnStartB = VAL(STREXTRACT(lcRGB,",", ")",2))
>
>this.imggradient.Picture = CreateGradient8( lnStartR, lnSTartG, lnSTartB, lnEndR, lnEndG, lnEndB)
>this.imggradient.RotateFlip = 1
>
>this.imggradient.Move( 0, 0, thisform.Width, 25 )
>this.imggradient.Stretch = 2