aoconstants.bas

This sample demonstrates the use of the projection objects ProjCoordSys and GeoCoordSys, and the C

Attribute VB_Name = "aoConstants"
'             Environmental Systems Research Institute, Inc.
'Module Name: aoConstants
'Description: Global module used to Intialize the ArcObjects environment. Creates
'             Declares global constants.
'
'   Requires:
'    Methods:
'    History: Glenn Meister - 03/23/97 - Original coding
'             DMA - 4/01/97 - Removed global declarations and combined ae and ap
'                             constants
'===============================================================================

Option Explicit

'lists of constants used by ArcObjects
'Error Contants
Public Const errWriteOnce As Long = 597001
Public Const errEditsNotSaved As Long = 597002
Public Const errDoesNotExist  As Long = 597003
Public Const errDoesExist  As Long = 597004
Public Const errNoEdits As Long = 597005
Public Const errInvalidArgument As Long = 597006
Public Const errInvalidUse As Long = 597007
Public Const errNotNeeded As Long = 597009
Public Const errAEcommand  As Long = 597010
Public Const errARCcommand  As Long = 597011
Public Const errCommand  As Long = 597012
Public Const errBlankArg As Long = 59013

' AoControlType Constants
Public Const aoArcedit As Integer = 0
Public Const aoArcPlot As Integer = 1
Public Const aoGrid As Integer = 2
Public Const aoArcINFO As Integer = 3

'FeatureType Constants
Public Const aoAnnotation As Integer = 0
Public Const aoArc As Integer = 1
Public Const aoGroup As Integer = 2
Public Const aoLabelPoint As Integer = 3
Public Const aoLink As Integer = 4
Public Const aoNode As Integer = 5
Public Const aoPolygon As Integer = 6
Public Const aoRegion As Integer = 7
Public Const aoRoute As Integer = 8
Public Const aoSection As Integer = 9
Public Const aoTic As Integer = 10
Public Const aoAllFeatures As Integer = 11

'ItemType Constants
Public Const aoBinary As Integer = 0
Public Const aoCharacter As Integer = 1
Public Const aoDate As Integer = 2
Public Const aoFloating As Integer = 3
Public Const aoInteger As Integer = 4
Public Const aoNumeric As Integer = 5

'ArcType Constants
Public Const aoArcLine As Integer = 0
Public Const aoArcBox As Integer = 1
Public Const aoArcCircle As Integer = 2
Public Const aoArcCenterline As Integer = 3

'PolyType Constants
Public Const aoPolyIntersect As Integer = 0
Public Const aoPolyDissolve As Integer = 1
Public Const aoPolyLine As Integer = 2

'RelateAccess Constants
Public Const aoReadWriteRelate As Integer = 0
Public Const aoReadOnlyRelate As Integer = 1

'RelateAccess Constants
Public Const aoLinearRelate As Integer = 0
Public Const aoOrderedRelate As Integer = 1
Public Const aoLinkRelate As Integer = 2
Public Const aoTableRelate As Integer = 3

'RegionType Constants
Public Const aoRegionPolygon As Integer = 0
Public Const aoRegionLine As Integer = 1

'Status Constants
Public Const aoOriginal As Integer = 0
Public Const aoAdded As Integer = 1
Public Const aoDeleted As Integer = 2

' SelectQualifier constants
Public Const aoAddTo As Integer = 0
Public Const aoRemoveFrom As Integer = 1
Public Const aoSubset As Integer = 2
Public Const aoNew As Integer = 3

' SelectMethod constants
Public Const aoBox As Integer = 0
Public Const aoPoly As Integer = 1
Public Const aoCircle As Integer = 2
Public Const aoPath As Integer = 3
Public Const aoScreen As Integer = 4
Public Const aoOne As Integer = 5
Public Const aoMany As Integer = 6
Public Const aoAll As Integer = 7

' AoMapElementType Constants
Public Const aoMap As Integer = 0
Public Const aoLegend As Integer = 1
Public Const aoScaleBar As Integer = 2
Public Const aoNorthArrow As Integer = 3
Public Const aoMetaFile As Integer = 4
Public Const aoImage As Integer = 5
Public Const aoPrimitive As Integer = 6

' aoSymbolType constants
Public Const aoLineSymbol As Integer = 0
Public Const aoMarkerSymbol As Integer = 1
Public Const aoShadeSymbol As Integer = 2
Public Const aoTextSymbol As Integer = 3

'aoRendererType constants
Public Const aoSymbolRenderer As Integer = 0
Public Const aoLabelRenderer As Integer = 1
Public Const aoValueMapRenderer As Integer = 2

'aoExportType constants
Public Const aoAI As Integer = 0
Public Const aoCGM As Integer = 1
Public Const aoEMF As Integer = 2
Public Const aoEPS As Integer = 3
Public Const aoGRA As Integer = 4