This example shows how to create a toolbar in all forms by using
the default initialization function and the
om.DomNode class:
CALL ui.Form.setDefaultInitializer("myinit")
OPEN FORM f1 FROM "form1"
DISPLAY FORM f1
...
FUNCTION myinit(form)
DEFINE form ui.Form
DEFINE f om.DomNode
LET f = form.getNode()
...
END FUNCTION
After getting the DOM node of the form, create a node with the
"
ToolBar" tag name:
DEFINE tb om.DomNode
LET tb = f.createChild("ToolBar")
For each toolbar button, create a sub-node with the "
ToolBarItem"
tag name and set the attributes to define the button:
DEFINE tbi om.DomNode
LET tbi = tb.createChild("ToolBarItem")
CALL tbi.setAttribute("name","update")
CALL tbi.setAttribute("text","Modify")
CALL tbi.setAttribute("comment","Modify the current record")
CALL tbi.setAttribute("image","change")
If needed, you can create a "
ToolBarSeparator"
node to separate toolbar buttons:
DEFINE tbs om.DomNode
LET tbs = tb.createChild("ToolBarSeparator")