Vla-zoomscaled

提供:GizmoLabs - だいたい CAD LISP なサイト
2013年3月20日 (水) 23:55時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (vla-zoomscaled ''vla-object'' ''scale'' ''scaletype'')) ; 機能 : pt1、pt2の範囲でズームする。 ; 引数 :* vla-object … VLA...」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(vla-zoomscaled vla-object scale scaletype))


機能
pt1、pt2の範囲でズームする。


引数
  • vla-object … VLAオブジェクト
  • scale … 倍率の値
  • scaletype … ズームのタイプを表す下記の定数
  • acZoomScaledAbsolute : 表示倍率値
  • acZoomScaledRelative : 現在のビューからの相対値
  • acZoomScaledRelativePSpace : ペーパー空間の単位空の相対値


戻り値
nil


サンプル
(vl-load-com)
(setq acadapplic (vlax-get-acad-object))
(setq util (vla-get-utility (vla-get-activedocument acadapplic)))
(setq SC (vla-getreal util "\nズームの係数を入力して Enter : "))

(vla-ZoomScaled acadapplic SC acZoomScaledRelative)


関連事項