An IVIB Primer - Unicon

$include "guih.icn"
#
# maindialog is the class created by Ivib in the file main.icn
#
class maindialog : Dialog(MsgBox)
...
method on_ListBtn(ev)
end
method on_about(ev)
end
method on_exit(ev)
end
method on_help(ev)
end
...
end # dialog class
Find the main() procedure and change it if needed so it looks as shown below. This will cause the main screen to
be displayed when the program starts up.
procedure main()
local d
d := maindialog()
d.show_modal()
end
Add code so the About Canvas is displayed when the About Menu item is selected. Add the following code to
on_about():
method on_about(ev)
aboutdialog().show_modal()
end
Add code so the Help Canvas is displayed when the Help Menu item is selected. Add the following code to
on_help():
method on_help(ev)
helpdialog().show_modal()
end
We also need to add code to terminate the application when the Exit menu item is selected. Add the dispose()
function to on_exit().
method on_exit(ev)
dispose()
end
Save this file as main.icn. Make sure you save it in the directory you made for this application.
Makefile
The following instructions mainly apply to Linux/UNIX users. Now we need to create a makefile to compile and
14