Quantcast
Viewing all articles
Browse latest Browse all 2341

New Post: Creating Snapshot for Printing

Hi Yankov!
Thank you very much,
that function do the trick!!
Here's the whole Procedure for my printing map/shape

This codes creates a snapshot and save it, then ask the user if he want to open the image

myExtents = MainMap.Extents
myImage = DirectCast(MainMap.SnapShot3(myExtents.xMin, myExtents.xMax, myExtents.yMax, myExtents.yMin, 8000), MapWinGIS.Image)
Dim xName As String
xName = Format(DateTime.Now, "MMddyyyy-hhmmss") & ".bmp"
myImage.Save("C:\SnapShot\" & xName, True, MapWinGIS.ImageType.BITMAP_FILE)
Dim xans As String
xans = MessageBox.Show("Open the Image?", "Open Image", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If xans = vbYes Then
 Shell("C:\windows\system32\mspaint.exe C:\Snapshot\" & xName, vbNormalFocus)
Else
 Exit Sub
End If

Viewing all articles
Browse latest Browse all 2341

Trending Articles