「Ai dim cen」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成:「{{AutoLISP}} ; 構文 : (ai_dim_cen) ; 機能 : 直前の選択セットにある寸法の寸法値位置合わせ-中心にする。 ; 引数 :* なし ; 戻り...」)
 
(相違点なし)

2016年6月5日 (日) 22:00時点における最新版

構文
(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)
)



関連事項

  • [[]]
  • [[]]