Ai dim cen

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(ai_dim_cen)


機能
直前の選択セットにある寸法の寸法値位置合わせ-中心にする。


引数
  • なし


戻り値
nil


サンプル


関数の定義は以下のとおり
(defun ai_dim_cen (/ ai_sysvar ai_dim_ss)
  (setq ai_sysvar (getvar "cmdecho"))
  (setvar "cmdecho" 0)
  (cond
    ((setq ai_dim_ss (ssget  "_P" '((0 . "DIMENSION"))))
      (command "_.dimoverride" "_dimjust" 0 "" ai_dim_ss "" "_.dimtedit" ai_dim_ss "_h")
    )
    (T nil)
  )
  (setvar "cmdecho" ai_sysvar)
  (princ)
)



関連事項

  • [[]]
  • [[]]