Commanders (Source Code)

Link to: header | other interface directory

Comments

CTCS_Commander

This class manages action commanders for the
Goldenseal small business accounting software,
project management software, construction accounting software
and construction software.

It is a mix-in class for an object that responds to menu commands and keystrokes.

This is a parent for many Goldenseal objects-- including tables, editors,
record viewers,

SUPERCLASS = LCommander

Source Code

/*********************************************************************************

SendToActiveCommander

send the given command msg and param to the active commander
*********************************************************************************/
void CTCS_Commander::SendToActiveCommander(CommandT inCommand, void *ioParam)
{
LCommander *target = LCommander::GetTarget();
if (target != nil)
target->ProcessCommand(inCommand, ioParam);
}/*********************************************************************************

ObeyCommand

process a command. This is overriden to implement our tab-selection
behaviour, which all of our commanders need to support
*********************************************************************************/
Boolean CTCS_Commander::ObeyCommand(CommandT inCommand, void *ioParam)
{
gStopShowingErrors = false; // reset the multiple-error-warning suppresor
gShowOnlyOneError = false; // rev TCS 7/22/03

switch (inCommand)
{
case msg_TabSelect:
// commanders that can handle the tab key should
// override and return true to this command.
return false; // TCS rev 1/17/03
break;

default:
return THE_SUPERCLASS::ObeyCommand(inCommand, ioParam);
break;
}
}