Civil:style-set-createdby

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

構文: (Civil:style-set-createdby styleId )

機能: Civil スタイルオブジェクト styleId のスタイルの"作者の名前"を設定する。

引数

styleId : 問い合わせる(ラベルまたはシンボル)の ename。
name ：指定されたスタイルオブジェクトの新しい作者名の文字列

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

メモ

サポートされているスタイルオブジェクト： Civil3D Point "のラベルスタイル+シンボルスタイル。

サンプル

(vl-load-civil)
T
(setq c3obj (car entsel))
<Entity name: 70180060>

(Civil:style-get-description c3obj)
"Default Label style"

(Civil:style-set-description c3obj "標準ラベル")
T

(Civil:style-get-name c3obj)
"標準ラベル"

(setq points (civil:pgroup-get-allpoints "_All points"))
(<Entity name: 6c1e30c0> <Entity name: 6c1e2940> <Entity name: 6c1e2980> <Entity name: 6c1e2ac0> <Entity name: 6c1e2a00> <Entity name: 6c1e2b00> <Entity name: 6c1e2700> <Entity name: 6c1e2b40> <Entity name: 6c1e2b80> <Entity name: 6c1e2c40>)

(setq pointename (nth 2 points))
<Entity name: 6c1e2980>

(setq styleId (civil:point-get-symbolid pointename))
<Entity name: 6c1e2a80>

(civil:style-get-createdby styleId)
"andrejm"

(civil:style-set-createdby styleId "海野")
T

(civil:style-get-createdby styleId)
"海野"