Rebol 编程/resize-face
外观
< Rebol 编程
RESIZE-FACE face size /x /y /no-show
调整人脸大小。
RESIZE-FACE 是一个函数值。
- face -- (类型:任何)
- size -- (类型:数字对)
- /x -- 只调整宽度
- /y -- 只调整高度
- /no-show -- 暂时不显示更改
resize-face: func [
"Resize a face."
face
size [number! pair!]
/x "Resize only width"
/y "Resize only height"
/no-show "Do not show change yet"
/local access
][
if all [
access: get in face 'access
in access 'resize-face*
] [
access/resize-face* face size x y
]
if not no-show [show face]
face
]