「Civil:style-remove-labelstyle」の版間の差分

2025年4月21日 (月) 07:15時点における最新版

BricsCADのLISP - Tin関数 - Civil関数 - AutoLISP Home - CAD&CGブログ - オンラインショップ- GizmoTools ヘルプセンター

構文: (civil:style-create-labelstyle nameOrEname styleCategory )

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

引数

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

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

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

メモ

styleCategoryは、Civil3d Type 定数 ECivil3dLabelStyleCategory のビット値を参照。

サンプル

(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")