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}}== |