creating bitmap wih more colors than 16?

[Lars Netzel]

Hi

I have the following code (never mind the actually logic in this, I know it
sucks) which is very basic and a first try to create some kind of graph but
I'm stuck on the quality it seems like the gradient brush only uses 16
colors and it's not looking good at all.

How Can I make the gradient really smooth?

------------------------------------

Dim height As Integer = 10

Dim bmpImage As New Bitmap(500, 500)

Dim MyGraphics As Graphics

MyGraphics = Graphics.FromIm age(bmpImage)

MyGraphics.Clea r(Color.White)

Dim myBrush As LinearGradientB rush = New LinearGradientB rush(New
Rectangle(0, 0, 100, 10), Color.White, Color.Red,
LinearGradientM ode.Horizontal)

For I As Integer = 0 To height Step 1

MyGraphics.Fill Rectangle(myBru sh, New Rectangle(5 + height, (I * height) +
height, 100 + (I * 2), 5))

MyGraphics.Draw Rectangle(New Pen(Color.Black ), New Rectangle(5 + height, (I
* height) + height, 100 + (I * 2), 5))

Next

MyGraphics.Flus h()

Response.Conten tType = "image/jpeg"

bmpImage.Save(R esponse.OutputS tream, ImageFormat.Jpe g)

------------------------------------------------------------------------------------

best regards/

Lars