跳轉到內容

Rebol 程式設計/reset-face

來自華夏公益教科書,開放的書籍,開放的世界
RESET-FACE face /no-show 

重置面的主要值。

RESET-FACE 是一個函式值。

  • face -- (型別:任何)
  • /no-show -- 暫不顯示更改

原始碼

[編輯 | 編輯原始碼]
reset-face: func [
    "Resets the primary value of a face." 
    face 
    /no-show "Do not show change yet" 
    /local access
][
    if all [
        access: get in face 'access 
        in access 'reset-face*
    ] [
        access/reset-face* face
    ] 
    if not no-show [show face] 
    face
]
華夏公益教科書