dkirk
04-22-2004, 02:47 PM
Can this be done? How
Convert .ptm to .jpgdkirk 04-22-2004, 02:47 PM Can this be done? How Syd 04-23-2004, 09:46 AM You can do it with e.g. the Lead Tool Control. hound 03-01-2005, 08:26 AM Hi Syn, I am trying to find a way to convert Map Point's .ptm file into a jpg or perhaps a .png file. I picked up this old thread were you mentioned it was possible with a "Lead Tool Control". Can you tell me what this is and such informtion please? Cheers John Meyer 03-01-2005, 10:39 AM No need to convert a ptm really. use the "SaveAs method" (use geoFormatHTMLMap) to save as a web page. It will generate a .gif of the map. hound 03-01-2005, 02:04 PM Thanks! However, saving it as an html page, then saving this html image as a gif, only produces a 'screen shot' of the image, thus any zoom-in functionality becomes redundent. John Meyer 03-01-2005, 02:32 PM Your not saving it as an html page, then saving this html image as a gif. I have no idea what you mean by "thus any zoom-in functionality becomes redundent" If you create a jpg or a gif of a map in mappoint there will not be any zooming, it will be a static graphic. I'm sure you know that so I dont know what you are saying? Try this, save as a webpage interactivly using mappoint (from the file menu click save as webpage) The gif file will be in the subfolder that is created based on the filename you provide. When you open the dialog to save as webpage you will see you can specify the size of the image. or if you were doing it in code it might look like this: Dim objApp As New MapPoint.Application Dim objMap As MapPoint.Map Dim objRoute As MapPoint.Route Dim objSW As MapPoint.SavedWebPage 'Set up the application Set objMap = objApp.ActiveMap Set objRoute = objMap.ActiveRoute objApp.Visible = True objApp.UserControl = True 'Create a route objRoute.Waypoints.Add objMap.FindResults("Seattle, WA").Item(1) objRoute.Waypoints.Add objMap.FindResults("Redmond, WA").Item(1) objRoute.Calculate 'Use SavedWebPages property to create a saved Web page Set objSW = objMap.SavedWebPages.Add("SavedWeb", _ objRoute.Waypoints.Item(1).Location, "New Title", _ True, False, True, 760, 570, False, True, False, True) objSW.Save hound 03-03-2005, 06:10 AM Got little confused in my description there. What I was trying to get was a close-up image (with detail) of an extent, of a large area, say an area of a major city, which would result in a rather large file. Hence, I wished to learn how to convert the original map file to antoher format. Thanks anyway. | ||