10 lines
230 B
Text
10 lines
230 B
Text
-- demo\rosetta\Window_creation.exw
|
|
include pGUI.e
|
|
|
|
IupOpen()
|
|
Ihandle dlg = IupDialog(IupVbox({IupLabel("hello")},"MARGIN=200x200"))
|
|
IupSetAttribute(dlg,"TITLE","Hello")
|
|
IupCloseOnEscape(dlg)
|
|
IupShow(dlg)
|
|
IupMainLoop()
|
|
IupClose()
|