Vla-put-activedimstyle

提供:GizmoLabs - だいたい CAD LISP なサイト
2013年12月13日 (金) 10:52時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (vla-put-activedimstyle ''vla-object'' ''name'') ; 機能 : 現在の寸法スタイルのVLAオブジェクトを返す。 ; 引数 :* vla-ob...」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(vla-put-activedimstyle vla-object name)


機能
現在の寸法スタイルのVLAオブジェクトを返す。


引数
  • vla-object … CAD の VLAオブジェクト
  • DimStyle … AcadDimStyle オブジェクト タイプとして宣言されたユーザ指定の変数


戻り値
nil


サンプル
; 現在の寸法スタイルを STANDARD にする
(setvar "DIMSTYLE" "STANDARD")


; VLAオブジェクトから現在の寸法スタイルを STANDARD にする
(setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object)))
(setq cdst (vlax-get-property (vla-get-activedimstyle *ActDoc*) 'name))




関連事項