IT– category –
-
IPolygon2::QueryExteriorRingsEx-QueryExteriorRings の回避方法
[vb title="Visual Basic"] 'http://resources.arcgis.com/en/help/arcobjects-java/concepts/engine/index.html#//00010000073v000000 '.NET では、ExteriorRingCount メソッドと QueryInteriorRingsEx メソッドは動作しない。 'IPolygon2.QueryInteriorRingsEx Method 'http://resources.arcgis.com/en/help/arcobjects-net/componenth... -
座標系の精度・許容値
[vb title="VBA"] Dim pSpatialReferenceResolution As ISpatialReferenceResolution Dim pSpatialreferenceTolerance As ISpatialReferenceTolerance Dim pControlPrecision As IControlPrecision2 Set pSpatialReferenceResolution = pNodeLayer.FeatureClass.GetFeature(1).Shape.SplReference Set pSpatialreferenceTolerance = pSpatia... -
ポリゴンのバーテックスを取得
[vb title="VBA"] 'ポリゴンの座標値を表示する方法 Sub subGetVertex() Dim pMxDoc As IMxDocument Set pMxDoc = ThisDocument Dim pFlayer As IFeatureLayer Set pFlayer = pMxDoc.FocusMap.Layer(0) Dim pFClass As IFeatureClass Set pFClass = pFlayer.FeatureClass Dim pFeature As IFeature Set pFeature = pFClass.GetFeatur... -
デフォルト ジオデータベースのパス設定
IGxCatalogDefaultDatabase.DefaultDatabaseName IGxCatalogDefaultDatabase.DefaultDatabaseNameNoValidate -
カタログ ウィンドウのホーム フォルダーを設定
[vb title="VBA"] Sub SetHomeFolder() Dim pGxCatalogWorkspace As IGxCatalogWorkspace Set pGxCatalogWorkspace = Application pGxCatalogWorkspace.UseWorkspaceFolder = True pGxCatalogWorkspace.OpenWorkspaceFolder "D:\Workspace\Support\130417-000015" 'カタログ ウィンドウの再描画も... -
MapControl に対してマウス ホイールの回転方向を制御
[vb title="Visual Basic"] 'MapControlは拡大・縮小の回転方向が制御できないのでOnMouseWheelで制御 Protected Overrides Sub OnMouseWheel(ByVal e As System.Windows.Forms.MouseEventA If e.Delta > 0 Then '拡大 axMapControl1.MapScale = axMapControl1.MapScale - 10000 Else '縮小 ax... -
フィーチャ テンプレートの操作
[vb title="VBA"] Public Sub AddFeatureTemplate() Dim pMxDocumenet As IMxDocument Set pMxDocumenet = ThisDocument Dim pFeatureLayer As IFeatureLayer Set pFeatureLayer = pMxDocumenet.SelectedLayer '選択レイヤの取得 Dim pDataset As IDataset Set pDataset = pFeatureLayer.FeatureClass ... -
プログレス ダイアログ（ProgressDialog）の作成
[csharp title="C#"] //呼び出し main m = new main(); m.ShowProgressDialog(ArcMap.Application, 0, 100, "テスト"); //定義 class main { public void ShowProgressDialog(ESRI.ArcGIS.Framework.IApplication application, System.Int32 int32_Minimum, System.Int32 int32_Maximum, System.String string_Message) ... -
回転フィードバック
[csharp title="C#"] #region Overridden Class Methods /// <summary> /// Occurs when this tool is created /// </summary> /// <param name="hook">Instance of the application</param> public override void OnCreate(object hook) { if (m_hookHelper == null) m_hookHelper = new H... -
テーブル結合する方法
[vb title="VBA"] 'フィーチャレイヤにAccessテーブルをテーブル結合 Public Sub JoinTabletoLayer() Dim pMxDocument As IMxDocument Set pMxDocument = ThisDocument Dim pFeatureLayer As IFeatureLayer Set pFeatureLayer = pMxDocument.FocusMap.Layer(0) '最上位レイヤを取得 ' 'レイヤに表示されている属性テーブルの状態を取得する場...
