ラスター レイヤーから RasterDataset を取得

投稿日:2016/9/1 (木) 更新日:

Dim pDataset As IDataset
Set pDataset = pRasterLayer
 
Dim pRasterWorkspace As IRasterWorkspace
Set pRasterWorkspace = pDataset.Workspace
 
Dim pRasterDataset As IRasterDataset
Set pRasterDataset = pRasterWorkspace.OpenRasterDataset(pDataset.Name)
 
 
'Nameオブジェクトを使用する方法
Dim pRasterLayer As IRasterLayer
Set pRasterLayer = pLayer
 
Dim pDataset As IDataset
Set pDataset = pRasterLayer
 
Dim pName As IName
Set pName = pDataset.FullName
 
Dim pRasterDataset As IRasterDataset
Set pRasterDataset = pName.Open
 
'----------------------
 
Dim pRasterAnalysisProps As IRasterAnalysisProps
Set pRasterAnalysisProps = pRaster
  
Dim pRasterDataset As IRasterDataset
Set pRasterDataset = pRasterAnalysisProps.RasterDataset

関連記事

-プログラミング, ArcGIS
-, ,

Copyright© WINGFIELD since1981 , 2018 All Rights Reserved.