handle-gesture

GENERIC: handle-gesture ( gesture gadget -- ? )

Im Listener lässt sich mit

IN: scratchpad M\ object handle-gesture see

die voreingestellte Definition der Methode handle-gesture anzeigen ( Kommentare von mir ) :

M: object handle-gesture
    [                               ! gesture gadget
        nip ]                       ! gadget
    [                               ! gesture gadget
        get-gesture-handler ]       ! quot/f
    2bi                             ! gadget quot/f
    dup                             ! gadget quot/f quot/f
    [                               ! gadget quot
        ( gadget -- ) call-effect   !
        f ]                         ! f = handled
    [                               ! gadget f
        2drop                       !
        t ]                         ! t = not handled
    if ;                            ! handled-flag

Die Methode handle-gesture sucht in der Klasse und ihren Oberklassen nach dem ersten gesture-handler für die Eingabe gesture.

Für Klassen mit einer Definition für handle-gesture sollte auch handles-gesture? definiert werden. Diese Methode wird vom Mac benötigt ( Factor Documentation ).