Страница 1 из 1
Перемещение по карте
Добавлено: 06 мар 2008, 16:11
Игорюха
В ArcGIS 9.2 (ArcMap) на карте несколько шейпов, например шейп с регионами России, как мне переместиться например в Московскую облать програмно? (Ну чтоб Московская область была на весь экран)
Добавлено: 13 мар 2008, 04:21
Максим Дубинин
Для зуммирования используется первый слой.
Код: Выделить всё
Public Sub ZoomToLayer()
Dim pMxDoc As IMxDocument
Dim pMap As IMap
Dim pActiveView As IActiveView
Set pMxDoc = Application.Document
Set pMap = pMxDoc.FocusMap
Set pActiveView = pMap
If pMap.Layer(0) Is Nothing Then Exit Sub
pActiveView.Extent = pMap.Layer(0).AreaOfInterest
pActiveView.Refresh
End Sub