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