Mouse position: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) m (→{{header|Perl 6}}: Slightly better phrasing) |
|||
| Line 609: | Line 609: | ||
In the above example, the window may not be external. |
In the above example, the window may not be external. |
||
It must in fact be a web browser window, which runs the script. |
It must in fact be a web browser window, which runs the script. |
||
=={{header|Julia}}== |
|||
<lang julia>using Gtk |
|||
const win = GtkWindow("Get Mouse Position", 600, 800) |
|||
const butn = GtkButton("Click Me Somewhere") |
|||
push!(win, butn) |
|||
callback(b, evt) = set_gtk_property!(win, :title, "Mouse Position: X is $(evt.x), Y is $(evt.y)") |
|||
signal_connect(callback, butn, "button-press-event") |
|||
showall(win) |
|||
c = Condition() |
|||
endit(w) = notify(c) |
|||
signal_connect(endit, win, :destroy) |
|||
wait(c) |
|||
</lang> |
|||
=={{header|Kotlin}}== |
=={{header|Kotlin}}== |
||