Vla-getreal

提供：GizmoLabs - だいたい CAD LISP なサイト
AutoLISP Home - AutoLISP 目次 - DCL - AutoLisp関数互換表 - CAD&CGブログ - オンラインショップ- GizmoTools ヘルプセンター
構文
(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

関連事項

「https://wiki.gz-labs.net/index.php?title=Vla-getreal&oldid=3843」から取得