Toolbar (Source Code)

Link to: header | other interface directory

Comments

CToolbar

This class manages the optional toolbar in the
Goldenseal small business accounting software,
project management software, construction accounting software
and construction software.

The palette-like floating tool bar, with buttons that initiate commands.
Currently not used anywhere.

Superclasses: None

Constructor

/******************************************************************************
Default constructor v1.0, 03-05-97
******************************************************************************/
CToolbar::CToolbar()
{
TCS_ASSERTMsg(sToolbarWindow == nil, TCS_GetErrString(errID_BadWindow));
}

Source Code

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

ShowToolbar

Forces the toolbar to be visible v1.0.2, 03-05-97, 07-31-97

******************************************************************************/
void CToolbar::ShowToolbar()
{
if (!TCS_WindowExistsMsg(cToolbarWindID)) // TCS 9/8/99
return;

// sanity check
TCS_FailNILMsg(gApplication, TCS_GetErrString(errID_BadApplication));
#if TCS_FOR_WINDOWS
// added this branch for Windows mfs_sa 7may2k2
LWindow *wind = LMDIChildWnd::MakeWindow(cToolbarWindID, gApplication);
#else
LWindow *wind = LWindow::MakeWindow(cToolbarWindID, gApplication);
#endif
TCS_FailNILMsg(wind, TCS_GetErrString(errID_BadWindow));
wind->Show();
// wind->UpdatePort();
// TCS_SetForeColor(gBlackColor);
// TCS_SetBackColor(gWhiteColor);
}/******************************************************************************

HideToolbar

Hides the toolbar v1.0, 03-05-97

******************************************************************************/
void CToolbar::HideToolbar()
{
TCS_Forget(sToolbarWindow);
}/******************************************************************************

ToolbarDied

The toolbar has been destroyed, v1.1, 03-05-97, 07-18-97
The toolbar window class calls this from its destructor

******************************************************************************/
void CToolbar::ToolbarDied()
{
sToolbarWindow = nil;
// if (LMenuBar::GetCurrentMenuBar() != nil)
TCS_SetMenuCmdName(cmd_ShowTransactionBar, "Show Toolbar");
}/******************************************************************************

ToolbarCreated

The toolbar has been created, v1.1, 03-05-97, 07-18-97
The toolbar window class calls this from its constructor

******************************************************************************/
void CToolbar::ToolbarCreated(CTCS_Window *inToolbar)
{
sToolbarWindow = inToolbar;
// if (LMenuBar::GetCurrentMenuBar() != nil)
TCS_SetMenuCmdName(cmd_ShowTransactionBar, "Hide Toolbar");
}
#if CAN_USE_MARK
#pragma mark -
#endif
/******************************************************************************
CToolbarWindow Default constructor v1.0, 03-05-97
******************************************************************************/
CToolbarWindow::CToolbarWindow(LStream *inStream) : CTCS_Window(inStream)
{
CToolbar::ToolbarCreated(this);
Deactivate();
}
/******************************************************************************
Destructor v1.0, 03-05-97
******************************************************************************/
CToolbarWindow::~CToolbarWindow()
{
CToolbar::ToolbarDied();
}/******************************************************************************

DeactivateSelf

Deactivates the window v1.0, 08-25-97

******************************************************************************/
void CToolbarWindow::DeactivateSelf()
{
#if TCS_CANUSE_QUICKTIME
TCS_HiliteWindow(mMacWindowP, false);
DrawSizeBox();

TStColorPenState penSaver; // TCS 2/20/04
penSaver.Normalize();
TCS_SetForegroundColor(CTCS_RGBColor::GetBlackColor());
TCS_SetBackgroundColor(CTCS_RGBColor::GetWhiteColor());
#elif TCS_FOR_WINDOWS
// %%% Do we need to do anything?
#endif
}