Civil:style-remove-labelstyle

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(civil:style-create-labelstyle nameOrEname styleCategory )


機能
nameOrEname で指定された Civil Label Style オブジェクトを styleCategory カテゴリから削除する。


引数
  • nameOrEname: 削除したいラベルスタイルオブジェクト名の文字列または ename。
  • styleCategory: ECivil3dLabelStyleCategory の値の組み合わせ


戻り値
成功なら T、それ以外は nil

いずれの場合も、(civil:style-remove-labelstyle) を呼び出した後、nameOrEname で指定されたCivil Labelスタイルは、もはや図面に存在しない。


メモ


サンプル
(vl-load-civil)
T

(setq labelStyleNames (civil:style-get-labelstyles bcCivilPointLabel T))
("Default" "pointstyle1" "pointstyle2")

(setq labelStyleIds (civil:style-get-labelstyles bcCivilPointLabel NIL))
(<Entity name: 320044d0> <Entity name: 32004110> <Entity name: 32004b50>)

(setq labelId  (civil:style-create-labelstyle  "NewLabelStyle" bcCivilPointLabel))
<Entity name: 54d58f40>

(setq labelStyleNames (civil:style-get-labelstyles bcCivilPointLabel T))
("Default" "pointstyle1" "pointstyle2" "NewLabelStyle")

(civil:style-remove-labelstyle "NewLabelStyle" bcCivilPointLabel)
T

(setq labelStyleNames (civil:style-get-labelstyles bcCivilPointLabel T))
("Default" "pointstyle1" "pointstyle2")

(civil:style-remove-labelstyle "Default" bcCivilPointLabel)
T

(setq labelStyleNames (civil:style-get-labelstyles bcCivilPointLabel T))
("pointstyle1" "pointstyle2")


関連事項