21 lines
462 B
Text
21 lines
462 B
Text
|
|
try destroydialog mousePos catch ()
|
||
|
|
|
||
|
|
rollout mousePos "Mouse position" width:200
|
||
|
|
(
|
||
|
|
label mousePosText "Current mouse position:" pos:[0,0]
|
||
|
|
label mousePosX "" pos:[130,0]
|
||
|
|
label mousePosSep "x" pos:[143,0]
|
||
|
|
label mousePosY "" pos:[160,0]
|
||
|
|
|
||
|
|
timer updateTimer interval:50 active:true
|
||
|
|
|
||
|
|
on updateTimer tick do
|
||
|
|
(
|
||
|
|
mousePosX.text = (mouse.screenpos.x as integer) as string
|
||
|
|
mousePosY.text = (mouse.screenpos.y as integer) as string
|
||
|
|
)
|
||
|
|
|
||
|
|
)
|
||
|
|
|
||
|
|
createdialog mousepos
|