グリッド サーフェスを作成する

DEM ファイルからサーフェスを作成する

AeccSurfaces.ImportDEM メソッドを使用すると、DEM ファイルからグリッド サーフェスを生成できます。

注:

ラスター情報とサーフェス間の変換プロセスは処理速度が落ちる場合があります。ユーザにこのことを知らせておく必要があります。

Dim oGridSurface As AeccGridSurface
Dim sFileName As String
sFileName = "C:\My Documents\file.dem"
oGridSurface = oAeccDocument.Surfaces.ImportDEM(sFileName)

AddGridSurface からサーフェスを作成する

AeccSurfaces.AddGridSurface メソッドを使用すると、空のグリッド サーフェスを作成できます。 このメソッドを使用するには、AeccGridCreationData 型のオブジェクトを準備しておく必要があります。このオブジェクトには、作成するサーフェスの性質を記述します。 エラーを回避するため、AeccGridCreationData オブジェクトのすべてのプロパティを指定することが重要です。 XSpacing、YSpacing、および Orientation の単位は、環境設定で指定します。

Dim oGridSurface As AeccGridSurface
Dim oGridCreationData As New AeccGridCreationData
 
oGridData.Name = "Sample Grid Surface"
oGridData.Description = "Grid Surface"
oGridData.BaseLayer = oAeccDocument.Layers.Item(0).Name
oGridData.Layer = oAeccDocument.Layers.Item(0).Name
oGridData.Orientation = 0#
oGridData.XSpacing = 100#
oGridData.YSpacing = 100#
oGridData.Style = oAeccDocument.SurfaceStyles.Item(0).Name
Set oGridSurface = oAeccDocument.Surfaces _
  .AddGridSurface(oGridData)