I have the following code to re-create an image
the program fails due to lack of memory even though I have 2gb memory
How can I use disk space instead of memory which fails at this line:
Dim BitMapObject As IntPtr = TargetBitMap.GetHbitmap
is there another variable I can use instead of intptr?
thanks for any help
frmText.Text = "Creating New Image"
Dim FinalRectangle As New Rectangle(0, 0, S.Width, S.Height)
Dim TargetBitMap As New Bitmap(Original_Image, S.Width, S.Height)
TargetBitMap.SetResolution(ImageDPI, ImageDPI)
frmMain.Text = "Setting Image properties"
fails on next line "out of memory"
Dim BitMapObject As IntPtr = TargetBitMap.GetHbitmap
frmMain.Text = "Building New Image"
Dim NewGraphics As Graphics = Graphics.FromImage(TargetBitMap.FromHbitmap(BitMapObject))
NewGraphics.DrawImage(Original_Image, FinalRectangle)
frmText.Text = "Saving New Image"
TargetBitMap.Save(Image2Resize2, Imaging.ImageFormat.Jpeg)
Dim TargetBitMap As New Bitmap(Original_Image, S.Width, S.Height)
Dim BitMapObject As IntPtr = TargetBitMap.GetHbitmap
Dim NewGraphics As Graphics = Graphics.FromImage(TargetB
Why not just do?
Dim TargetBitMap As New Bitmap(Original_Image, S.Width, S.Height)
Dim NewGraphics As Graphics = Graphics.FromImage(TargetB
...