ok, it worked: (define (mouse-event-handler cw x y me) (cond [(string=? me “button-down”) x] [else cw])) thanks again for help,