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 )