阅读:1547回复:1
在ArcEngine开发中,Scenecontrol里怎样实现保存和另存?
<P>找半天没发现scenecontrol里没有Save方法,也没有类似在Mapcontrol里的Mapdocument东东!</P><P>在这里可以学到不少东西,欢迎大家讨论!</P><P>下面是Mapcontrol的saveAS,供大家参考!</P><P> Public Overrides Sub OnClick()<br> Dim pMapControl As IMapControl3<br> pMapControl = m_pHookHelper.Hook</P><P> Dim pActiveView As IActiveView<br> pActiveView = m_pHookHelper.ActiveView<br> Dim pMap As IMap<br> pMap = pActiveView.FocusMap<br> Dim pMxdC As IMxdContents<br> pMxdC = pMap<br> Dim pMapDocument As New MapDocumentClass<br> Dim pSaveFileDialog As New SaveFileDialog<br> pSaveFileDialog.Title = "另存为文件"<br> pSaveFileDialog.Filter = "文件类型 (*.mxd)|*.mxd"<br> pSaveFileDialog.FileName = pMapControl.DocumentFilename<br> pSaveFileDialog.ShowDialog()</P><P> 'Exit if no map document is selected<br> Dim sFilePath As String<br> sFilePath = pSaveFileDialog.FileName<br> If sFilePath = "" Then Exit Sub<br> pMapDocument.[New](sFilePath)<br> pMapDocument.ReplaceContents(pMxdC)<br> pMapDocument.Save(True, True)<br> End Sub</P>
[此贴子已经被作者于2006-2-28 12:49:53编辑过]
|
|
1楼#
发布于:2006-03-01 11:06
<P>大家怎么不帮忙顶啊!</P>
|
|