Shape.DistanceFromPoint プロパティ (Visio)
図形から点までの距離を返します。 読み取り専用です。
構文
式。 DistanceFromPoint
( _x_
, _y_
, _Flags_
, _[pvPathIndex]_
, _[pvCurveIndex]_
, _[pvt]_
)
式: Shape オブジェクトを表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
x | 必須 | 倍精度浮動小数点型 (Double) | x 座標を指定します。 |
y | 必須 | 倍精度浮動小数点型 (Double) | y 座標を指定します。 |
Flags | 必須 | Integer | 結果として返されるエントリの種類を制御するフラグです。 |
pvPathIndex | 省略可能 | バリアント型 (Variant) | pvCurveIndex と pvt を使用して図形上の点を識別します。 |
pvCurveIndex | 省略可能 | バリアント型 (Variant) | pvPathIndex と pvt を使用して図形上の点を識別します。 |
Pvt | 省略可能 | バリアント型 (Variant) | pvPathIndex と pvCurveIndex を使用して図形上の点を識別します。 |
戻り値
倍精度浮動小数点数
注釈
( x,y) ポイントは、ThisShape を直ちに含むシートによって定義された座標空間に対して、内部描画単位 (図面内のインチ) で表されます。
引数 pvPathIndex、pvCurveIndex、および pvt はオプションであり、返された距離の測定の始点を示す値を返します。 そのポイント ( xOnThis,yOnThis) を呼び出します。 この点は、ThisShape の p 番目のパスに属する c 番目の曲線上にあり、次の方法で指定されます。
ThisShape.Paths(*pvPathIndex).Item(*pvCurveIndex).Point(*pvt,&xOnThis ,&yOnthis)
曲線に沿って位置 t で 1 番目と 2 番目の導関数を検索する場合は、Point メソッドの代わりに PointAndDerivatives メソッドを使用します。
pvPathIndex または pvCurveIndex が Null でない場合、整数型 (Integer) 変数 (VT_I4 型) が返されます。 pvt が Null でない場合、DistanceFromPoint は倍精度浮動小数点型 (Double) 変数 (VT_R8 型) を返します。
DistanceFromPoint プロパティは、ガイドの拡張性を考慮します。また、図形の塗りつぶされた領域とパスも考慮します。
引数 Flags には、次の表で定義された定数を組み合わせて指定できます。 これらの定数は、Microsoft Visio タイプ ライブラリの VisSpatialRelationFlags でも定義されています。
定数 | 値 | 説明 |
---|---|---|
visSpatialIncludeDataGraphics | &H40 | データ グラフィックの引き出し図形とそのサブ図形を含めます。 既定では、データ グラフィックの引き出し図形とそのサブ図形は含まれません。 親図形自体がデータ グラフィックの引き出し図形である場合、フラグを設定しなくても、親図形の座標と引き出し以外の図形の間で検索が実行されます。 |
visSpatialIncludeHidden | &H10 | 非表示の [Geometry] セクションを考慮します。 既定では、非表示の Geometry セクションは結果に影響しません。 |
visSpatialIgnoreVisible | &H20 | 表示されている [Geometry] セクションを考慮しません。 既定では、表示されている [Geometry] セクションは結果に影響を与えません。 |
[Geometry] セクションが表示されているか、非表示かを判断するには、[NoShow] セルを使用します。 [NoShow] セルの値は、[Geometry] セクションが非表示の場合は True、表示されている場合は False になります。
親オブジェクトに座標がない場合、または Flags がすべての図形の座標を考慮しない場合には、DistanceFromPoint プロパティは無限の値として解釈される数値 (1E+30) を返します。
DistanceFromPoint プロパティは、結果を計算するときに、図形の線、影、線の端点、コントロール ポイント、および接続ポイントの幅を考慮しません。
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。