Vla-zoomscaled

提供:GizmoLabs - だいたい CAD LISP なサイト
2013年3月20日 (水) 23:57時点におけるGizmon (トーク | 投稿記録)による版
構文
(vla-zoomscaled vla-object scale scaletype))


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


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


戻り値
nil


サンプル
(vl-load-com)
(setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object)))
(setq util (vla-get-utility *ActDoc*))
(setq SC (vla-getreal util "\nズームの係数を入力して Enter : "))

(vla-ZoomScaled (vlax-get-Acad-Object) SC acZoomScaledRelative)


関連事項