Create  Edit  Diff  FrontPage  Index  Search  Changes  History  Source  RSS  wikifarm  Login

pointObj.distanceToPoint - History

!!pointObj.distanceToPoint メソッド 
!!!説明
引数で与えられたpointObjまでの距離を返す。座標変換機能はないので、与える点をあらかじめ欲しい座標単位に変換しておく必要がある。
 public double distanceToPoint(
    pointObj point
 );

 Public Function distanceToPoint(ByVal point As pointObj) As Double
!!!サンプル
!!!!コード
 Dim _map As mapObj = New mapObj("")
 Dim _layer As New layerObj(_map)
 Dim _pt1 As New pointObj(-142, 41, 0, 0)
 Dim _tempshape As New shapeObj(MS_LAYER_TYPE.MS_LAYER_POLYGON) 
 
 _layer.open()
 _layer.whichShapes(_map.extent)
 _tempshape = _layer.nextShape
 
 Debug.WriteLine(_tempshape.distanceToPoint(_pt1).ToString)
 _layer.close()
 
 →結果 65.6058201731943 単位は,与えられた点の座標と同じ
!!!!マップファイル

!!!参照

[[pointObj メンバ]] | [[(global) 名前空間|http://wiki.fdiary.net/MapScriptJa]]
Last modified:2019/04/18 21:38:51
Keyword(s):
References: