Civil:style-create-symbolstyle

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

構文: (civil:style-create-symbolstyle name )

機能: name のスタイルがまだ存在しない場合、新しいCivil Symbol Styleオブジェクトを作成する。

引数

name : シンボル・スタイル・オブジェクトを、スタイル・オブジェクト名の文字列

戻り値: 成功なら ENAME、そうでなければ nil

メモ

名前を持つCivil Symbol Styleオブジェクトが既に存在する場合、既存のスタイルの ENAMEが返される。

サンプル

(vl-load-civil)
T

(setq symbolStyleNames (civil:style-get-symbolstyles T))
("Default Point XXX" "Default" "Default Point2" "Default Point3")

(setq symbolStyleIds (civil:style-get-symbolstyles nil))
(<Entity name: 32003d50> <Entity name: 32003f90> <Entity name: 320045d0> <Entity name: 32004690>)

(setq symbolId (civil:style-create-symbolstyle "NewSymbolStyle"))
<Entity name: 6d258340>

(setq symbolStyleNames (civil:style-get-symbolstyles T))
("Default Point XXX" "Default"  "Default Point2" "Default Point3" "NewSymbolStyle")

(setq symbolId (civil:style-create-symbolstyle "Default Point3"))
<Entity name: 320045d0>