Mouse position: Difference between revisions

Content added Content deleted
m (→‎{{header|Phix}}: IupCloseOnEscape no longer needed)
Line 859: Line 859:
w.setHandler(w.mouseMoved, mouse_moved)
w.setHandler(w.mouseMoved, mouse_moved)
w.show()</lang>
w.show()</lang>

=={{header|Nim}}==
{{libheader|gintro}}
<lang Nim>import gintro/[glib, gobject, gtk, gio]
import gintro/gdk except Window

#---------------------------------------------------------------------------------------------------

proc onButtonPress(window: ApplicationWindow; event: Event; data: pointer): bool =
echo event.getCoords()
result = true

#---------------------------------------------------------------------------------------------------

proc activate(app: Application) =
## Activate the application.

let window = app.newApplicationWindow()
window.setTitle("Mouse position")
window.setSizeRequest(640, 480)

discard window.connect("button-press-event", onButtonPress, pointer(nil))

window.showAll()

#———————————————————————————————————————————————————————————————————————————————————————————————————

let app = newApplication(Application, "Rosetta.MousePosition")
discard app.connect("activate", activate)
discard app.run()</lang>

{{out}}
Sample output:
<pre>(136.631591796875, 91.27691650390625)
(308.6276245117188, 148.8543090820312)
(387.9143676757812, 332.2145385742188)
(191.778076171875, 368.4205932617188)
(76.43170166015625, 418.7800903320312)
(298.4449462890625, 451.6014404296875)
(9.709716796875, 11.10366821289062)
(636.892333984375, 476.888671875)
(4.505615234375, 4.832611083984375)
(631.4815673828125, 5.864105224609375)
(6.33782958984375, 475.9739379882812)</pre>


=={{header|OCaml}}==
=={{header|OCaml}}==