gis3996
路人甲
路人甲
  • 注册日期2005-05-09
  • 发帖数2
  • QQ
  • 铜币112枚
  • 威望0点
  • 贡献值0点
  • 银元0个
阅读:993回复:0

在Mapcontrol中如何使用?

楼主#
更多 发布于:2006-07-18 17:14
<P>在Mapcontrol中如何使用?</P>
<P>我的开发方式服务端DLL,客户端Mapcontrol .</P>
<P>private m_pApp as IApplication</P>
<P>Public Sub AddData()<BR>  Dim pDlg As IAddDataDialog<BR>  Dim bOK As Boolean<BR>  Dim pMxDoc As IMxDocument<BR>  Set pMxDoc = m_pApp.Document     //出错了<BR>  Set pDlg = New AddDataDialog<BR>  pDlg.Document = pMxDoc<BR>  pDlg.Map = pMxDoc.FocusMap<BR>  pDlg.Show m_pApp.hWnd, bOK<BR>  <BR>  <BR>  pMxDoc.UpdateContents<BR>  <BR>  ' Zoom the display to the full extent of all layers in the map<BR>  Dim pActiveView As IActiveView     'esriCarto<BR>  Set pActiveView = pMxDoc.FocusMap<BR>  <BR>  pActiveView.Extent = pActiveView.FullExtent<BR>  pActiveView.PartialRefresh esriViewGeography, Nothing, Nothing<BR>End Sub</P>

<P>谢谢</P><img src="images/post/smile/dvbbs/em12.gif" />
喜欢0 评分0
游客

返回顶部