Saving image created with System.Drawing.Graphics [resolved]

[Ultimasnake]

I am currently combining 2 images with each other with an System.Drawing.Graphics object.... but once i have done that i want to save the image but i cant seem to get an image from the .image or .backgroundimage property :s


this is my code

Dim g As System.Drawing.Graphics = PictureBox3.CreateGraphics
        g.DrawImage(PictureBox2.Image, 0, 0)
        g.DrawImage(PictureBox1.Image, 0, 0)
        g.Save()
        g.Dispose()
        PictureBox4.Image = PictureBox3.Image ' nothing happens here

putting it on another image is just a test to see if it worked.. ofcourse i know that i should save through the bitmap object

any help would be nice

[MasterBlaster]

--> g.Dispose()<--

[Ultimasnake]

what about it :S...

[dynamic_sysop]

when you create the PictureBox3.Image using graphics from the first 2 pictureboxes, the image is a " Virtual " image and not actually PictureBox3.Image ( if you tried saving PictureBox3.Image , you would probably find it saved a blank image, not the picture you see in the box )
you would be best first creating the Image as an Image / Bitmap , then doing something like PictureBox3.Image = image

[Ultimasnake]

uhm ok but the image/bitmap property doesnt have a creategrapics option... so how and where to use it precisely :S

[dynamic_sysop]

like this ...

[color=blue]Dim[/color] img [color=blue]As[/color] Image = Image.FromFile("C:\tester.bmp")
        [color=blue]Dim[/color] grp [color=blue]As[/color] Graphics = Graphics.FromImage(img)
        [color=blue]With[/color] grp
            .DrawString("some string of text", [color=blue]New[/color] Font("Tahoma", 10, FontStyle.Bold), [color=blue]New[/color] SolidBrush(Color.Blue), 20, 20)
        [color=blue]End With[/color]
        PictureBox1.Image = img
        PictureBox1.Image.Save("C:\a_Bitmap.bmp")

[Ultimasnake]

Dim img As Image = Image.FromFile("C:\tester.bmp")
/\

how can i do this with a blank image only?

[dynamic_sysop]

if you want to start with a blank image...

[COLOR=blue]Dim[/COLOR] bmp [COLOR=blue]As New[/COLOR] Bitmap(200,200) [COLOR=green]'/// where 200 is the size , your size goes there.[/color]
[COLOR=blue]Dim[/color] grp [COLOR=blue]As[/color] Graphics = Graphics.FromImage(bmp)

[Ultimasnake]

works like a glove... only 1 problem

the height and width should be taken from set variables... and this doesnt seem to work :

Dim bmp As New System.Drawing.Bitmap(x_width, x_height)

so how the . can i do that? tried to set .height and .width afterwards but that doesnt seem to work

[Ultimasnake]

nevermind found it out ...

Dim bmp As System.Drawing.Bitmap = New System.Drawing.Bitmap(Width, Height)

thanks for the help dynamic_sysop

[dynamic_sysop]

no problem , geode middag

[Ultimasnake]

nederlands? :P


(translation)
dutch? :P

[dynamic_sysop]

ja maar ik heeft in engeland gewoonde voor 27 jaar, so mij nederlandse is niet goede
i originally come from a place called Almelo in holland.