I been playing around with the TGradient Component so far I like it but I found a problem using the CopyPatternTo procedure. This procedure won't fill the whole bitmap with some of the styles.
This is my code, MyBitmap is a TImage Component:
Mybitmap.Stretch := false
Gradient1.Style := gsLinearV;
The problem only happen with the styles gsLinearV, gsReflectedH, gsReflectedV, gsDiagonalLF
Tank's for any help.
BTW: I could use the Stretch property of the TImage Component but I have to copy the Bitmap to another component.