5 lines
107 B
Racket
5 lines
107 B
Racket
|
#lang racket/gui
|
||
|
|
(define-values [point _] (get-current-mouse-state))
|
||
|
|
(send point get-x)
|
||
|
|
(send point get-y)
|