civil:style-create-labelstyle
(civil:style-create-labelstyle name
styleCategory)
Creates a new Civil Label Style object
in styleCategory category using name, if such style does not
exist yet.;
|
Arguments
|
name (string) specifies the name of the Label Style
object to be created
styleCategory (integer bit flag) combination of
ECivil3dLabelStyleCategory values
|
|
Return
|
ENAME of new (or existing)
Label Style, or NIL
|
|
Example
|
(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")
|
|
Remarks
|
if the Civil Label Style
object with name already exists, the ENAME of the existing style is
returned;
styleCategory :
see ECivil3dLabelStyleCategory bit values
|