请教AO导出地图为JPG的问题（加问导出为SVG等矢量格式的方法）

楼主^#

更多发布于：2005-08-08 10:17

我在使用C＃＋AO 开发的过程中，将一个从SDE中读取的featureclass实例导出成JPG图像时，出了问题。错误提示必须产生一个ArcMap的MxDocument实例，通过它的IActiveview接口获取Envelope，然后才能输出一个Jpg图像。
请教各位大虾，有没有什么办法可以在软件逻辑中生成一个类似ARCMAP的地图容器，而不用MAP控件显示地图出来的办法呢？
———————————————————————————————————————
我还想问问怎么导出为PDF、SVG等矢量格式呀？请问各位大虾有范例可以参考吗？

[此贴子已经被作者于2005-8-8 17:00:17编辑过]

喜欢0 评分0

举报回复

gis

管理员

注册日期2003-07-16
发帖数15951
QQ
铜币25345枚
威望15368点
贡献值0点
银元0个

加关注写私信

1楼^#

发布于：2005-08-08 14:49

没办法生成，arcmap就是arcmap
但是你使用mapcontrol或者picture等显示地图，都可以自己定义iactiveview和imap，获取你需要的envelop
下面是vba程序，你只需要把arcmap的定义，改到你目前的环境中
Public Sub ExportActiveView() Dim pMxDoc As IMxDocument Set pMxDoc = ThisDocument Dim pActiveView As IActiveView Set pActiveView = pMxDoc.ActiveView 'Create an ExportJPEG object and QI the pExport interface pointer onto it. ' To export to a format other than JPEG, simply create a different CoClass here ' and change the file extension of the ExportFileName. Dim pExport As IExport Set pExport = New ExportJPEG pExport.ExportFileName = "C:\ExportTest1.jpg"
 'Set the export object resolution to 96 dpi. The default screen resolution for ' MS Windows is usually 96dpi, and this value is also the default resolution for all ' of the ArcGIS image format exporters. The vector format exporters (PDF, AI, etc.) ' default to 300 dpi, so we should explicitly set resolution here to be certain we ' are working with a resolution of 96. pExport.Resolution = 96 'For both PageLayout and Map objects, the ExportFrame property always holds a tagRECT ' structure appropriate for exporting. The values in the tagRECT correspond to the width ' and height to export, measured in pixels with an origin in the top left corner. Dim exportRECT As tagRECT exportRECT = pActiveView.ExportFrame 'Create a new envelope object and populate it with the values from exportRECT. ' We need to do this because the exporter object requires an envelope object ' instead of a tagRECT structure. Dim pPixelBoundsEnv As IEnvelope Set pPixelBoundsEnv = New Envelope pPixelBoundsEnv.PutCoords exportRECT.Left, exportRECT.Top, exportRECT.Right, exportRECT.bottom 'Assign the envelope object to the exporter object's PixelBounds property. The exporter object ' will use these dimensions when allocating memory for the export file. pExport.PixelBounds = pPixelBoundsEnv
 'Initialize the exporter object and store it's device context in the hDC variable. At this method ' call, the exporter object will create an empty file and allocate memory based on resolution, ' bit depth, and pixel bounds. Dim hDC As Long hDC = pExport.StartExporting 'Redraw the active view, rendering it to the exporter object device context instead of the app display. 'We pass the following values: ' * hDC is the device context of the exporter object. ' * pExport.Resolution is 96, the default resolution value for all image export formats. Default screen ' resolution for MS Windows is usually 96dpi. ' * exportRECT is the tagRECT structure that describes the dimensions of the view that will be rendered. ' The values in exportRECT should match those held in the exporter object's PixelBounds property. pActiveView.Output hDC, pExport.Resolution, exportRECT, Nothing, Nothing 'Finish writing the export file and cleanup any intermediate files. pExport.FinishExporting pExport.Cleanup End Sub
 Public Sub ExportActiveView2() Dim pMxDoc As IMxDocument Dim pActiveView As IActiveView Dim pExport As IExport Dim pPixelBoundsEnv As IEnvelope Dim exportRECT As tagRECT Dim iOutputResolution As Integer Dim iScreenResolution As Integer Dim hDC As Long
 Set pMxDoc = Application.Document Set pActiveView = pMxDoc.ActiveView Set pExport = New ExportJPEG
 pExport.ExportFileName = "C:\ExportTest2." ; Right(pExport.Filter, 3)
 'Because we are exporting to a resolution that differs from screen resolution, we should ' assign the two values to variables for use in our sizing calculations iScreenResolution = 96 'default screen resolution is usually 96dpi iOutputResolution = 300 pExport.Resolution = iOutputResolution 'The ExportFrame property gives us the dimensions appropriate for an export at screen resolution. ' Because we are exporting at a higher resolution (more pixels), we must multiply each dimesion ' by the ratio of OutputResolution to ScreenResolution. Instead of assigning the entire ' ExportFrame directly to the exportRECT, let's bring the values across one at a time and multiply ' the dimensions. With exportRECT .Left = 0 .Top = 0 .Right = pActiveView.ExportFrame.Right * (iOutputResolution / iScreenResolution) .bottom = pActiveView.ExportFrame.bottom * (iOutputResolution / iScreenResolution) End With 'Set up the PixelBounds envelope to match the exportRECT Set pPixelBoundsEnv = New Envelope pPixelBoundsEnv.PutCoords exportRECT.Left, exportRECT.Top, exportRECT.Right, exportRECT.bottom pExport.PixelBounds = pPixelBoundsEnv hDC = pExport.StartExporting pActiveView.Output hDC, pExport.Resolution, exportRECT, Nothing, Nothing pExport.FinishExporting pExport.Cleanup End Sub

GIS麦田守望者，期待与您交流。

举报回复喜欢评分

foxiang

路人甲

注册日期2005-01-05
发帖数4
QQ
铜币104枚
威望0点
贡献值0点
银元0个

加关注写私信

2楼^#

发布于：2005-08-08 16:06

感谢GIS大虾的帮助。我也找到了一个用C#实现的办法，不借助显示控件，用Carto中的Map类做容器，IMap和IActiveView接口进行访问。代码如下：
using ESRI.ArcGIS.DataSourcesGDB; using ESRI.ArcGIS.Geodatabase; using ESRI.ArcGIS.Output; using ESRI.ArcGIS.Display; using ESRI.ArcGIS.esriSystem; using ESRI.ArcGIS.Carto;
namespace Map { public class GetMap { private string GetJpg() { IWorkspace iWs = openSDEWorkspace("XIANGHUA","esri_sde","sde","sde","sde","SDE.DEFAULT"); IFeatureWorkspace iFtWs = (IFeatureWorkspace)iWs; IFeatureClass iFtc = iFtWs.OpenFeatureClass("sde.SDE.county"); IMap iMap = new MapClass(); IFeatureLayer iFL = new FeatureLayerClass(); iFL.FeatureClass = iFtc; iMap.AddLayer((ILayer)iFL); IActiveView iAV = (IActiveView)iMap;
 IExportJPEG iEpJpg = new ExportJPEGClass(); iEpJpg.ProgressiveMode = false; iEpJpg.Quality=100;
 IExportImage iEpimg = (IExportImage) iEpJpg; iEpimg.ImageType = ESRI.ArcGIS.Output.esriExportImageType.esriExportImageTypeTrueColor; iEpimg.Width = 800; iEpimg.Height = 600; IRgbColor iColor = new RgbColorClass(); iColor.Red = 255; iColor.Blue = 255; iColor.Green = 255; iEpimg.BackgroundColor = iColor; IWorldFileSettings iWFS = (IWorldFileSettings)iEpimg; iWFS.OutputWorldFile=false; IExport iEp = (IExport)iWFS; iEp.Resolution = 96; //iAV.ScreenDisplay.DisplayTransformation.Resolution; 
 tagRECT userRECT; userRECT.top = 0; userRECT.left = 0; userRECT.right = ConvertRWToPixels(iAV.Extent.Width,iAV);//地理坐标向MAP容器坐标的转化 userRECT.bottom = ConvertRWToPixels(iAV.Extent.Height,iAV);//地理坐标向MAP容器坐标的转化
 iEp.ExportFileName = Server.MapPath(".\\jpg\\Out.jpg"); int hDc; hDc = iEp.StartExporting(); //由MAP容器向图片文件输出 iAV.Output(hDc,96,ref userRECT,iAV.Extent,null); iEp.FinishExporting(); return iFtc.AliasName; } 
 private int ConvertRWToPixels(double RWUnits,IActiveView iAV) { double realWorldDisplayExtent; long pixelExtent; double sizeOfOnePixel; tagRECT deviceRECT;
 IDisplayTransformation pDT = iAV.ScreenDisplay.DisplayTransformation; deviceRECT = pDT.get_DeviceFrame(); pixelExtent = deviceRECT.right - deviceRECT.left; IEnvelope pEnv = pDT.VisibleBounds;
 realWorldDisplayExtent = pEnv.Width; sizeOfOnePixel = realWorldDisplayExtent / pixelExtent; return (int)(RWUnits / sizeOfOnePixel); } }

[此贴子已经被作者于2005-8-8 17:22:54编辑过]

举报回复喜欢评分

foxiang 路人甲注册日期2005-01-05 发帖数4 QQ 铜币104枚威望0点贡献值0点银元0个加关注写私信	3楼^# 发布于：2005-08-08 17:05 我还想问问怎么导出为PDF、SVG等矢量格式呀？请问各位大虾有范例可以参考吗？
	举报回复(0) 喜欢(0) 评分

gis

管理员

注册日期2003-07-16
发帖数15951
QQ
铜币25345枚
威望15368点
贡献值0点
银元0个

加关注写私信

4楼^#

发布于：2005-08-09 14:24

看看帮助里：

<TABLE cellSpacing=4 cols=2 cellPadding=4>

<TR vAlign=top>
<TD class=t width="35%"><a href="mk:@MSITStore:C:\Program%20Files\ArcGIS\DeveloperKit\Help\COM\VB\esriOutput.chm::/ExportAI.htm" target="_blank" >ExportAI</A></TD>
<TD class=t width="65%">Class used to export maps to AI (Adobe Illustrator) format.</TD></TR>
<TR vAlign=top>
<TD class=t width="35%"><a href="mk:@MSITStore:C:\Program%20Files\ArcGIS\DeveloperKit\Help\COM\VB\esriOutput.chm::/ExportBMP.htm" target="_blank" >ExportBMP</A></TD>
<TD class=t width="65%">Class used to export maps to BMP (Windows Bitmap) format.</TD></TR>
<TR vAlign=top>
<TD class=t width="35%"><a href="mk:@MSITStore:C:\Program%20Files\ArcGIS\DeveloperKit\Help\COM\VB\esriOutput.chm::/ExportEMF.htm" target="_blank" >ExportEMF</A></TD>
<TD class=t width="65%">Class used to export maps to EMF (Windows Enhanced Metafile) format.</TD></TR>
<TR vAlign=top>
<TD class=t width="35%"><a href="mk:@MSITStore:C:\Program%20Files\ArcGIS\DeveloperKit\Help\COM\VB\esriOutput.chm::/ExportGIF.htm" target="_blank" >ExportGIF</A></TD>
<TD class=t width="65%">Class used to export maps to GIF (Graphics Interchange Format).</TD></TR>
<TR vAlign=top>
<TD class=t width="35%"><a href="mk:@MSITStore:C:\Program%20Files\ArcGIS\DeveloperKit\Help\COM\VB\esriOutput.chm::/ExportJPEG.htm" target="_blank" >ExportJPEG</A></TD>
<TD class=t width="65%">Class used to export maps to JPEG (Joint Photographic Experts Group) format.</TD></TR>
<TR vAlign=top>
<TD class=t width="35%"><a href="mk:@MSITStore:C:\Program%20Files\ArcGIS\DeveloperKit\Help\COM\VB\esriOutput.chm::/ExportPDF.htm" target="_blank" >ExportPDF</A></TD>
<TD class=t width="65%">Class used to export maps to PDF (Portable Document Format) format.</TD></TR>
<TR vAlign=top>
<TD class=t width="35%"><a href="mk:@MSITStore:C:\Program%20Files\ArcGIS\DeveloperKit\Help\COM\VB\esriOutput.chm::/ExportPNG.htm" target="_blank" >ExportPNG</A></TD>
<TD class=t width="65%">Class used to export maps to PNG (Portable Network Graphics) format.</TD></TR>
<TR vAlign=top>
<TD class=t width="35%"><a href="mk:@MSITStore:C:\Program%20Files\ArcGIS\DeveloperKit\Help\COM\VB\esriOutput.chm::/ExportPS.htm" target="_blank" >ExportPS</A></TD>
<TD class=t width="65%">Class used to export maps to PS (PostScript) and EPS (Encapsulated PostScript) format.</TD></TR>
<TR vAlign=top>
<TD class=t width="35%"><a href="mk:@MSITStore:C:\Program%20Files\ArcGIS\DeveloperKit\Help\COM\VB\esriOutput.chm::/ExportSVG.htm" target="_blank" >ExportSVG</A></TD>
<TD class=t width="65%">Class used to export maps to SVG (Scalable Vector Graphics) format.</TD></TR>
<TR vAlign=top>
<TD class=t width="35%"><a href="mk:@MSITStore:C:\Program%20Files\ArcGIS\DeveloperKit\Help\COM\VB\esriOutput.chm::/ExportTIFF.htm" target="_blank" >ExportTIFF</A></TD>
<TD class=t width="65%">Class used to export maps to TIFF (Tagged Image File Format).</TD></TR></TABLE>

GIS麦田守望者，期待与您交流。

举报回复喜欢评分

zyr987503101

路人甲

注册日期2012-11-22
发帖数9
QQ
铜币131枚
威望0点
贡献值0点
银元0个

加关注写私信

5楼^#

发布于：2012-11-26 15:02

求解

如何你行你一定要，如果你要你一定行！

举报回复喜欢评分

您需要登录后才可以回帖，登录或者注册

请教AO导出地图为JPG的问题（加问导出为SVG等矢量格式的方法）

最新喜欢：