Rebol 编程/set-style
外观
< Rebol 编程
SET-STYLE name new-face /styles ss
通过名称设置样式。
SET-STYLE 是一个函数值。
- name -- (类型:字)
- new-face -- (类型:对象)
- /styles
- ss -- 样式表 (类型:任何)
set-style: func [
"Set a style by its name."
name [word!]
new-face [object!]
/styles ss "Stylesheet"
/local here
][
if none? styles [ss: vid-styles]
either here: find ss name [change next here new-face] [repend ss [name new-face]]
]