Civil:style-set-labelstyle-dragparam

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

構文: (civil:style-get-labelstyle-dragparams nameOrEname styleCategory property value )

機能: styleCategory カテゴリ内の名前または Ename で指定された Civil ラベルスタイルオブジェクトの 'Dragged State' スタイルパラメータプロパティに新しい値を割り当てる。

引数

nameOrEname: ラベルスタイルオブジェクト名の文字列または ename。
styleCategory： ECivil3dLabelStyleCategory の値の組み合わせ
property : Dragged State'パラメーターの文字列。
value : property に割り当てる新しい値。（integer | double | string | ename)

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

メモ

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

サンプル

(vl-load-civil)
T

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

(setq style (civil:style-get-labelstyle "Default" bcCivilPointLabel))
<Entity name: 320044d0>

(setq dragparams (civil:style-get-labelstyle-dragparams "Default" bcCivilPointLabel))
(("LeaderArrowHead" . "") ("LeaderArrowHeadSize" . 3.0) ("LeaderVisibility" . "On") ("LeaderType" . 0) ("LeaderColor" . 256) ("LeaderLinetype" . "ByLayer") ("LeaderLineweight" . -3) ("LeaderAttachment" . 2) ("LeaderTextAlignment" . "On") ("LeaderTail" . "Off") ("DisplayMode" . 1) ("BorderVisibility" . "On") ("BorderType" . 0) ("BackgroundMask" . "Off") ("BorderAndLeaderGap" . 1.0) ("TextHeight" . 2.5) ("TagDisplayMode" . "On") ("Color" . 256) ("Linetype" . "ByLayer") ("Lineweight" . -3) ("MaximumTextWidth" . 0.0))

(civil:style-set-labelstyle-dragparam labelId bcCivilPointLabel "LeaderColor" 1)
T

(setq dragparams (civil:style-get-labelstyle-dragparams "Default" bcCivilPointLabel))
(("LeaderArrowHead" . "") ("LeaderArrowHeadSize" . 3.0) ("LeaderVisibility" . "On") ("LeaderType" . 0) ("LeaderColor" . 1) ("LeaderLinetype" . "ByLayer") ("LeaderLineweight" . -3) ("LeaderAttachment" . 2) ("LeaderTextAlignment" . "On") ("LeaderTail" . "Off") ("DisplayMode" . 1) ("BorderVisibility" . "On") ("BorderType" . 0) ("BackgroundMask" . "Off") ("BorderAndLeaderGap" . 1.0) ("TextHeight" . 2.5) ("TagDisplayMode" . "On") ("Color" . 256) ("Linetype" . "ByLayer") ("Lineweight" . -3) ("MaximumTextWidth" . 0.0))