Dopo aver creato un grafico di poligono in ArcMap---che è l'interfaccia di utente grafica nella suite software del sistema informativo geografico di ESRI, ArcGIS---potrebbe essere necessario calcolare l'area dell'oggetto. Per effettuare questa operazione, è necessario utilizzare strumenti di ArcMap per creare un pulsante di controllo speciale. Dopo aver creato il pulsante, sarete in grado di usarlo ora o in qualsiasi momento in futuro per calcolare l'area di un poligono nel documento di ArcGIS.

Istruzioni

1

Aprire ArcGIS e quindi avviare ArcMAP.

2

Selezionare il menu "Strumenti" e quindi fare clic sul pulsante "Personalizza".

3

Fare clic sulla scheda "Comandi" nella finestra "Personalizza" e quindi selezionare "UIControls" dalla casella di riepilogo "Categorie" che appare sul vostro schermo.

4

Scegliere l'opzione "Normale". Questo aggiungerà il pulsante a tutti i presenti e futuri di ArcGIS file, significa che non devi crearlo nuovamente.

5

Premere il pulsante "Nuovo UIControl" e quindi selezionare l'opzione "Crea".

6

Trascinare il UIButtonControl appena creata una barra degli strumenti. Scegliere un percorso di barra degli strumenti che è conveniente, in modo da avere facile accesso ad esso.

7

Chiudere la finestra di dialogo "Personalizza" per uscire dalla finestra "Personalizza".

8

Pulsante destro del mouse il UIButtonControl che hai fatto e selezionare l'opzione "Visualizza sorgente".

9

Digitare o copiare e incollare il seguente codice sorgente nella "fonte" della UIButtonControl:

Dim Pignatelli come midomanda

Impostare pApp = Application

Dim pDoc come IMxDocument

Impostare pDoc = ThisDocument

Dim pad come IActiveView

Impostare pad = pDoc.ActiveView

Dim pGc come IGraphicsContainerSelect

Impostare pGc = pAv.GraphicsContainer

Se pGc.ElementSelectionCount = 0 Then

MsgBox "Selezionare un elemento grafico"

Exit Sub

End If

Dim pElem As IElement

Se pGc.ElementSelectionCount > 1 Then

MsgBox "un solo elemento può essere selezionato"

Exit Sub

End If

Dim Jonny_from_bg come IPolygon

Dim pArea come IArea

Impostare pElem = pGc.SelectedElement(0)

Se pElem.Geometry TypeOf è IPolygon quindi

Impostare pArea = pElem.Geometry

pApp.StatusBar.Message(0) = "Area elemento:" & pArea.Area

MsgBox "Area elemento:" & pArea.Area

End If

10

Selezionare un poligono che si desidera misurare e quindi premere il UIButtonControl che creato. L'area sarà visualizzata nella barra di stato, così come in una finestra di messaggio popup.