Getdist

AutoLISP Home - AutoLISP 目次 - DCL - AutoLisp関数互換表 - CAD&CGブログ - オンラインショップ- GizmoTools ヘルプセンター

構文

(getdist [pt] [msg])

機能

ユーザが距離を入力するまで待機(一時停止)する。

ユーザは 2 つの点を指定して距離を指定するが、基点を与えた場合は 2 点目だけを指定する。また、CAD の現在の距離単位形式に従って数値を入力することによっても、距離を指定できる。現在の距離単位形式が、フィート/インチ(建築図面表記)の場合でも、getdist 関数は常に実数で距離を返す。

getdist 関数は、1 番目の点から現在のクロスヘアカーソルの位置にラバー バンドを描き、ユーザが距離を目で確認できるようにする。

getdist 関数の要求に対して、ユーザは別の LISP 式を入力することはできない。

引数

• pt : 現在の UCS で、基点として使用する 2D 点または3D 点。 pt を与えた場合、ユーザは 2 点目を指定するよう要求される。
• msg : ユーザに表示するプロンプト文字列。この文字列を指定しなかった場合、メッセージは表示されない。

戻り値

実数。 3D 点が与えられた場合、3D 距離を返す。initget 関数のビット コードを 64 に設定した場合は、3D 点の Z 座標を無視して 2D 距離を返す。

サンプル

(setq dist (getdist)) 
(setq dist (getdist '(1.0 3.5))) 
(setq dist (getdist "距離は? ")) 
(setq dist (getdist '(1.0 3.5) "距離は?"))

---

関連事項

• initget 関数