Nadat u een veelhoek afbeeldingen kunt maken in ArcMap---dat is de grafische gebruikersinterface van ESRI van geografische informatie systeem softwaresuite, ArcGIS---moet u wellicht de oppervlakte van het object te berekenen. Om dit te doen, moet u ArcMap de hulpprogramma's gebruiken voor het maken van een speciale knop. Nadat u de knop hebt gemaakt, kun je het nu of op elk gewenst moment in de toekomst gebruiken om te berekenen van de oppervlakte van een veelhoek in uw document ArcGIS.
ArcGIS open en start ArcMAP.
Selecteer het menu "Extra" en klik op de knop "Aanpassen".
Klik op het tabblad van de "Opdrachten" van het "Aanpassen" en selecteer "UIControls" in de "Categorieën" keuzelijst die op uw scherm verschijnt.
Kies de optie "Normal". Dit zal de knop toevoegen aan al uw huidige en toekomstige ArcGIS bestanden, wat inhoudt dat u niet het opnieuw maken.
Druk op de knop "Nieuwe UIControl" en selecteer vervolgens de optie "Create".
Sleep de gemaakte UIButtonControl naar een werkbalk. Kies de locatie van een werkbalk die is handig, zodat u gemakkelijk toegang hebben tot het.
Sluit het dialoogvenster "Aanpassen" om af te sluiten van het "Aanpassen".
Met de rechtermuisknop op de UIButtonControl die u hebt gemaakt en selecteer de "View Source" optie.
Typ of kopieer en plak de volgende broncode in de "bron" van de UIButtonControl:
Dim pApp als IApplication
Instellen van pApp = toepassing
Dim pDoc als IMxDocument
Set pDoc = ThisDocument
Dim pAv als IActiveView
Instellen van de pAv = pDoc.ActiveView
Dim pGc als IGraphicsContainerSelect
Instellen van de pGc = pAv.GraphicsContainer
Als pGc.ElementSelectionCount = 0 Then
MsgBox "Selecteer een grafisch element"
Exit Sub
End If
Dim pElem als IElement
Als pGc.ElementSelectionCount > 1 dan
MsgBox "slechts één element kan worden geselecteerd"
Exit Sub
End If
Dim pPoly als IPolygon
Dim pArea als IArea
Set pElem = pGc.SelectedElement(0)
Als TypeOf pElem.Geometry IPolygon vervolgens
Set pArea = pElem.Geometry
pApp.StatusBar.Message(0) = "Element gebied:" & pArea.Area
MsgBox "Element gebied:" & pArea.Area
End If
Selecteer een veelhoek die u wilt meten en druk vervolgens op de UIButtonControl die u hebt gemaakt. Het gebied wordt weergegeven op de statusbalk, alsmede in een pop-berichtvenster weergegeven.