Simple windowed application: Difference between revisions
Content added Content deleted
Line 825: | Line 825: | ||
# Main loop. |
# Main loop. |
||
Gtk->main;</lang> |
Gtk->main;</lang> |
||
{{libheader|XUL::Gui}} |
|||
<lang perl>use XUL::Gui; |
|||
display |
|||
TextBox( id=>'txt', value=>'there have been no clicks yet' ), |
|||
Button( label=>'click me', oncommand=>sub{ |
|||
$ID{txt}->value = ++$clicks |
|||
}); |
|||
</lang> |
|||
=={{header|Python}}== |
=={{header|Python}}== |