Question Resize image

MondeoST24

Member
Joined
Mar 9, 2006
Messages
16
Programming Experience
Beginner
I have a bitmap object which is 1024x768 pixels. I need to make it 210x100. This is what I have so far

Code:
Dim newBMP As New Bitmap(CInt(133), CInt(100))
Dim gt_dest As Graphics = Graphics.FromImage(newBMP)
gt_dest.DrawImage(oldBMP, 0, 0, newBMP.Width + 1, newBMP.Height + 1)

This scales it down by a factor of 7.68 which gives me by 100 height, now I need to make it 210 wide by drawing white space (38 pixels) to each side of the graphic.

Not got a clue how to do this, can anyone help?

Thanks
 
Do gt_dest.Clear(Color.White) first.

To make 210x100 image specify this as bounds (and clear it), then you can use your scale to draw the original into that.
 
Back
Top