Rebol 编程/deflag-face
外观
< Rebol 编程
DEFLAG-FACE face 'flag
清除 VID 面中的标志。
DEFLAG-FACE 是一个函数值。
- face -- (类型:对象)
- flag -- (类型:任何)
deflag-face: func [
"Clears a flag in a VID face."
face [object!]
'flag
][
if none? face/flags [exit]
if not find face/flags 'flags [face/flags: copy face/flags insert face/flags 'flags]
remove find face/flags flag
]