阅读:993回复:0
在Mapcontrol中如何使用?
<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" /> |
|