Vla-put-activedimstyle

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(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))




関連事項