An IVIB Primer - Unicon

The About Box. Edit the file about.icn using your favorite editor. Some of the methods in the file about.icn are
shown below
#
# aboutdialog is the class created by Ivib in the file about.icn
#
class aboutdialog : Dialog(AboutTxtLst)
...
method init_dialog()
end
method on_aboutdialog(ev)
end
...
end # aboutdialog
We need to fill the Text List with the About information. We could actually have done this from inside Ivib, but
just for fun let's add code to init_dialog() so the Text List is filled when the canvas is displayed. Edit about.icn
and add the following code to the init_dialog() and on_aboutdialog() methods.
method init_dialog()
local l
l := [
"This is an example application",
"To demonstrate an About Box",
"Also, how to show another form",
"Plus: using Makefiles with",
"Ivib"
]
AboutTxtLst.set_contents(l)
end
method on_aboutdialog(ev)
dispose()
end
The Help Screen. Edit the file help.icn using your favorite editor. Some of the methods in the file help.icn are
shown below.
#
# helpdialog is the class created by Ivib in the file help.icn
#
class helpdialog : Dialog(HelpTxtLst, MsgBox)
...
method init_dialog()
end
method on_CloseBtn(ev)
16