[RESOLVED] Graphic bug

When I use this line to draw lines on a picture:

Code:

---

Dim MyPen as new Pen with {.width=1}
Dim MyGraphics As Graphics = Graphics.FromImage(BMP)
MyGraphics.DrawLines(MyPen, MyDots.ToArray)

---

I get this image:
http://i46.tinypic.com/1eassh.png

but if I use MyPen.Width = 2, then I get the right image:

http://i49.tinypic.com/ei5j0p.png

I don't understand what I are doing wrong.

Could you post a sample project that we can use to reproduce the error?

Intriguing. It’s one of those problems that make no sense.

Now, this is just guesswork, but try playing with the SmoothingMode, InterpolationMode, PixelOffsetMode, CompositingMode & CompositingQuality properties of the Graphics class.
Is your image resized after you draw to it? This might be the cause.

Quote:

---

Originally Posted by Craig Gemmill

Could you post a sample project that we can use to reproduce the error?

---

Ok. Graphic data is too large to enter on this post, so I attach a txt file with the code.

map is drawed by double clicking the picturebox control

each double click switches pen width

Quote:

---

Originally Posted by TheGreatCthulhu

Intriguing. It’s one of those problems that make no sense.

Now, this is just guesswork, but try playing with the SmoothingMode, InterpolationMode, PixelOffsetMode, CompositingMode & CompositingQuality properties of the Graphics class.
Is your image resized after you draw to it? This might be the cause.

---

Great!

That was.

Adding those lines:

Code:

---

MyGraphics.PixelOffsetMode = Drawing2D.PixelOffsetMode.HighQuality
MyGraphics.SmoothingMode = Drawing2D.SmoothingMode.HighQuality

---

solves it.

Thanks TheGreatCthulhu :D

Here is a bit of Latin rock for you!:
http://www.youtube.com/watch?v=K_ZWc5nBWys

Thanks. Glad I was able to help.