Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
|
|
@ -0,0 +1,21 @@
|
|||
import gui
|
||||
$include "guih.icn"
|
||||
|
||||
class WindowApp : Dialog ()
|
||||
|
||||
# -- automatically called when the dialog is created
|
||||
method component_setup ()
|
||||
# add 'hello world' label
|
||||
label := Label("label=Hello world","pos=0,0")
|
||||
add (label)
|
||||
|
||||
# make sure we respond to close event
|
||||
connect(self, "dispose", CLOSE_BUTTON_EVENT)
|
||||
end
|
||||
end
|
||||
|
||||
# create and show the window
|
||||
procedure main ()
|
||||
w := WindowApp ()
|
||||
w.show_modal ()
|
||||
end
|
||||
Loading…
Add table
Add a link
Reference in a new issue