Rebol 程式設計/scroll-face

用法

SCROLL-FACE face offset /x /y /no-show 

描述

滾動一個面。預設是垂直的。

SCROLL-FACE 是一個函式值。

引數

• face -- (型別：任何)
• offset -- (型別：數字)

細化

• /x -- 在寬度方向滾動
• /y -- 在高度方向滾動
• /no-show -- 暫時不顯示更改

原始碼

scroll-face: func [
    "Scroll a face. Default is vertical." 
    face 
    offset [number!] 
    /x "Scroll in width direction" 
    /y "Scroll in height direction" 
    /no-show "Do not show change yet" 
    /local access
][
    if all [
        access: get in face 'access 
        in access 'scroll-face*
    ] [
        access/scroll-face* face offset x y
    ] 
    if not no-show [show face] 
    face
]