TVision
view release on metacpan or search on metacpan
tvision.git/source/tvision/tdesktop.cpp view on Meta::CPAN
/*------------------------------------------------------------*/
/* filename - tdesktop.cpp */
/* */
/* function(s) */
/* TDeskTop member functions */
/*------------------------------------------------------------*/
/*
* Turbo Vision - Version 2.0
*
* Copyright (c) 1994 by Borland International
* All Rights Reserved.
*
*/
#define Uses_TDeskTop
#define Uses_TRect
#define Uses_TPoint
#define Uses_TEvent
#define Uses_TBackground
#define Uses_opstream
#define Uses_ipstream
#include <tvision/tv.h>
#if !defined( __STDLIB_H )
#include <stdlib.h>
#endif // __STDLIB_H
TDeskInit::TDeskInit( TBackground *(*cBackground)( TRect ) ) noexcept :
createBackground( cBackground )
{
}
TDeskTop::TDeskTop( const TRect& bounds ) noexcept :
TDeskInit( &TDeskTop::initBackground ),
TGroup(bounds)
{
growMode = gfGrowHiX | gfGrowHiY;
tileColumnsFirst = False;
if( createBackground != 0 && (background = createBackground( getExtent() )) != 0 )
insert( background );
}
void TDeskTop::shutDown()
{
background = 0;
TGroup::shutDown();
}
inline Boolean Tileable( TView *p )
{
return Boolean( (p->options & ofTileable) != 0 && (p->state & sfVisible) != 0 );
}
static short cascadeNum;
static TView *lastView;
void doCount( TView* p, void * )
{
if( Tileable( p ) )
{
cascadeNum++;
( run in 1.290 second using v1.01-cache-2.11-cpan-5623c5533a1 )