The CreatePrismMap method creates a prism map. Prism map properties are edited through the returned PrismMap object.
Syntax
object.CreatePrismMap( BoundaryFileName, DataFileName, DataTableName, BoundaryFileOptions, ColorMethod, PIDCol, VarCol, ColorVarCol )
|
Parameter |
Type |
Description |
|
BoundaryFileName |
String |
optional; boundary file name |
|
DataFileName |
String |
optional; data file name |
|
DataTableName |
String |
optional; table name if a database file is used |
|
BoundaryFileOptions |
String |
optional; see Boundary File Options |
|
ColorMethod |
optional; color method |
|
|
PIDCol |
Integer |
optional; primary ID column, column A equals 1 |
|
VarCol |
Integer |
optional; height variable column, column A equals 1 |
|
ColorVarCol |
Integer |
optional; color variable column, column A equals 1 |
Remarks
The prism map is created until the map is invalidated. Invalidation will not happen if the plot window is invisible. Use the Wait command to wait for the prism map to be created during map invalidation. The wait time depends on the computer speed.
Example
This example creates a prism map of Colorado.
Sub main
'Creates an instance of the MapViewer Application
'object and assigns it to the variable named "mvApp"
Set mvApp = CreateObject("MapViewer.Application")
'Makes the application main window visible
mvApp.Visible = True
'Assigns the location of the samples folder
'to the variable "InPath"
InPath$ = mvApp.ApplicationFolder + " samples\"
'Creates a map document object, and assigns it to
'the variable named "Plot"
Set Plot = mvApp.Documents.Add(DocType:=mvDocPlot)
'Creates a prism map object and assigns it to the
'variable named "PrismMap"
Set PrismMap = Plot.CreatePrismMap( BoundaryFileName:=InPath$ + _
"co2010.gsb", DataFileName:=InPath$ + "co2010.dat", _
ColorMethod:= mvPrismColorInterpolated, PIDCol:=1, VarCol:=5)
'Wait for the prism map to be created
Wait(1)
End sub
Used by: PlotDocument object