MonitorToolButtons,

Buttons,

ViewerTools;

IMPORTS ViewerTools

EXPORTS MonitorToolButtons =

mouseButton: MouseButton ← red, shift, control: BOOL ← FALSE] ;

For menus, the parent field will contain the parent Viewer; for buttons, parent will be the button Viewer itself. Use NARROW to convert a REF ANY to a Viewer. mouseButton indicates how the user invoked the button or menu. shift and control indicate the state of the shift and control keys when the menu or button was invoked.

-- force the selection into the user input field

};

-- force the selection into the user input field

handle: Handle ← NARROW[clientData]; -- get our data

ViewerTools.SetSelection[handle.screenHeight.input]; -- force the selection

};

-- force the selection into the user input field

handle: Handle ← NARROW[clientData]; -- get our data

ViewerTools.SetSelection[handle.refresh.input]; -- force the selection

};

-- force the selection into the user input field

handle: Handle ← NARROW[clientData]; -- get our data

ViewerTools.SetSelection[handle.hBlank.input]; -- force the selection

};

-- force the selection into the user input field

handle: Handle ← NARROW[clientData]; -- get our data

ViewerTools.SetSelection[handle.vBlank.input]; -- force the selection

};

-- force the selection into the user input field

handle: Handle ← NARROW[clientData]; -- get our data

ViewerTools.SetSelection[handle.bpp.input]; -- force the selection

};

-- force the selection into the user input field

handle: Handle ← NARROW[clientData]; -- get our data

ViewerTools.SetSelection[handle.position.input]; -- force the selection

};