callback
The command procedure to be executed as the keyboard focus is about to leave panel during window traversal via the tab keys.
This element applies only to panels of types text and combo_box. The window parent of panel and panel itself are passed to the procedure as parameters. When panel belongs to a table window, the row/column index of the panel is passed as a third parameter.
When such a callback is invoked, as long as the procedure is not empty, i.e. contains at least one executable command, the keyboard focus remains with the panel until directed elsewhere by a focus command within the procedure.
Initially, panels have a .after procedure of null.
panel.after (<window>,<panel>{,<row>})
mywin.textinput.after = { args w=window, p=panel if (p.tvalue) { # If the panel contains a non-null value, give the # focus to which ever panel was expecting it next focus p,-n } else { # Otherwise give a warning message # The focus will remain with the panel tell 'Panel must have a value' bell } }