An IVIB Primer - Unicon

if s := get_pasteable_clipboard(insert_cr) then {
ce := CompoundEdit()
if has_region() then {
ed := EditableTextListDeleteRegionEdit(self)
ed.redo()
ce.add_edit(ed)
}
ed := EditableTextListPasteEdit(self, s)
ed.redo()
ce.add_edit(ed)
undo_manager.add_edit(ce)
changed := 1
}
end_handle(e)
end
#_______________________________________
end # myeditabletextlist class
Now open up edit.icn using Ivib. Right click on the Overlay set and switch to overlay_item_edit. Right click on
the top edit box text_list_instruct to get the dialog box.
On the Name Tab,
Change the Class to myeditabletextList.
(Make sure this is all in lower case to match the class in myeditabletextlist.icn)
Hit Okay
and save edit.icn
This will allow all cut/copy/pastes into editable_text_list_instruct to use our subclass to pick up the windows
clipboard.
unicon –o demo -G main edit myeditabletextlist
Now, when you run demo you should be able to use the instructions edit box (editable_text_list_instruct) to cut,
copy, paste from other documents.
Tab Jumps, Compound Undo/Redos and Table column events
There are a few more things we will add top the demonstration
1) tab jumps
2) compound undos/redos
3) using events on table columns
Tab jumps.
Open up edit.icn using your editor. Be sure to refresh to the changes from Ivib from above.
Add the following code to the init_dialog method:
method init_dialog()
38