プログラミング– category –
-
VARCHAR 型の日付を変換
日付と時刻の表記も国際規格があり、ISO 8601で決められている。最新版は 2004年の ISO 8601:2004。 https://ja.wikipedia.org/wiki/ISO_8601 これを Python のモジュールで変換するには以下のように記述する [python title="Python"] import dateutil.parser dt = dateutil.parser.parse("YYYY-MM-DDTHH:MM:SSZ") [/python] ただ... -
円グラフィックから中心座標と半径を取得
[javascript title="JavaScript"] var graphic = new Graphic(evt.geometry, symbol); var extent = graphic.geometry.getExtent(); //グラフィックからジオメトリの Extent を取得 var center = extent.getCenter(); // Extent から中心（Point）を取得 window.alert("X:" + center.x + ", Y:" + center.y + " ... -
フィーチャ レイヤのフィールド表示の切り替え
[python title="Python"] # Layer オブジェクトからはフィールドの表示・非表示は切り替えられないので # 上書きで新しいフィーチャ レイヤを作成する。ただし他タブの情報は # シンボルしか復元できない mxd = arcpy.mapping.MapDocument("CURRENT") df = arcpy.mapping.ListDataFrames(mxd)[0] layer = arcpy.mapping.ListLa... -
BaseCommand のアイコンを変更する方法
[csharp title="C#"] // BaseCommandのアイコンを変更する方法 System.Drawing.Bitmap newIcon = new System.Drawing.Bitmap(GetType(), "Command2.bmp"); this.UpdateBitmap(newIcon); //Command2.bmp；ビルド アクション：埋め込まれたリソース [/csharp] -
RubberEnvelope で指定した範囲のイメージを画像ファイルに出力する方法
[csharp title="C#"] private void axMapControl1_OnMouseDown(object sender, IMapControlEvents2_OnMouseDownEvent e) { int dpi = 96; //出力解像度（96 で Windows 標準 DPI と一致） double ratio = 1; //出力ピクセルサイズの比率 IEnvelope pEnvelope = axMapControl1.TrackRectangle(); //マウス ドラッグでEn... -
緯度・経度・高さを三次元直交座標系に変換
ArcGISでは地心直交座標系はサポートされていない。ただし、地球半径の割合から求めた3次元直交座標系を持っており、緯度・経度・高さをその直交座標系に変換できる。 ESRI Developer Summit資料 P31を参照 Developer Helpのサンプル IGlobeViewUtil::GeographicToGeocentric 地理座標系・高さを3次元直交座標系に変換 また、「世界測地系と... -
2 点間のライン作成
[vb title="VBA"] Attribute VB_Name = "Module1" Option Explicit Sub test() Dim pMxDoc As IMxDocument Set pMxDoc = ThisDocument '始点ポイント（GPS）（1番目レイヤ） Dim pFLayer0 As IFeatureLayer Set pFLayer0 = pMxDoc.FocusMap.Layer(0) Dim pFClass0 As IFeatureClass Set pFClass0 = pFLayer0.FeatureClass ... -
空間参照情報のテキスト出力
[vb title="VBA"] Public Sub subExportSpatialReference() 'ThisDocumentの取得 Dim pMxDocument As IMxDocument Set pMxDocument = ThisDocument 'アクティブなデータフレームの取得 Dim pMap As IMap Set pMap = pMxDocument.FocusMap 'SpatalReferenceを取得 Dim pESRISpatialReference As ... -
測地線に基づく距離の計測
[vb title="VBA"] Public Sub Test() Dim pSpatialReferenceFactory As ISpatialReferenceFactory2 Set pSpatialReferenceFactory = New SpatialReferenceEnvironment '地理座標系（WGS84）の定義 Dim pSpatialReference As ISpatialReference Set pSpatialReference = pSpatialReferenceFactory.CreateGeographic... -
ITinSelection の使用
[vb title="VBA"] ’ ITinSelectionの使用 Public Sub Test() '現在のドキュメントを取得 Dim pMxDocument As IMxDocument Set pMxDocument = ThisDocument 'アクティブなデータフレームの取得 Dim pMap As IMap Set pMap = pMxDocument.FocusMap 'レイヤを取得 Dim pTinLayer As ITinLayer ...
