Vla-getreal

提供: GizmoLabs - だいたい CAD LISP なサイト
移動先: 案内検索
構文
(vla-getreal util [mes])


機能
実数(倍精度浮動小数点)を取得する。


引数
  • util … utility のVLAオブジェクト
  • mes … 数値取得時のメッセージ


戻り値
取得した数値


サンプル

(defun ax-getreal ()
(vl-load-com)
(setq util (vla-get-utility 
                   (vla-get-activedocument 
                        (vlax-get-acad-object))))
(setq real1 (vla-getreal util "\n半径 : "))
(princ real1)
(princ)
);defun


関連事項