forms/source/component/navigationbar.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: navigationbar.cxx,v $
  10  * $Revision: 1.11 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_forms.hxx"
  33 #include "navigationbar.hxx"
  34 #include "frm_module.hxx"
  35
  36 #include <com/sun/star/text/WritingMode2.hpp>
  37
  38 #include <comphelper/streamsection.hxx>
  39 #include <comphelper/basicio.hxx>
  40
  41 //--------------------------------------------------------------------------
  42 extern "C" void SAL_CALL createRegistryInfo_ONavigationBarModel()
  43 {
  44     static ::frm::OMultiInstanceAutoRegistration< ::frm::ONavigationBarModel > aAutoRegistration;
  45 }
  46
  47 //.........................................................................
  48 namespace frm
  49 {
  50 //.........................................................................
  51
  52     using namespace ::com::sun::star::uno;
  53     using namespace ::com::sun::star::beans;
  54     using namespace ::com::sun::star::form;
  55     using namespace ::com::sun::star::awt;
  56     using namespace ::com::sun::star::io;
  57     using namespace ::com::sun::star::lang;
  58     using namespace ::com::sun::star::util;
  59     using namespace ::com::sun::star::container;
  60     using namespace ::comphelper;
  61
  62     namespace WritingMode2 = ::com::sun::star::text::WritingMode2;
  63
  64 #define REGISTER_VOID_PROP( prop, memberAny, type ) \
  65     registerMayBeVoidProperty( PROPERTY_##prop, PROPERTY_ID_##prop, PropertyAttribute::BOUND | PropertyAttribute::MAYBEDEFAULT | PropertyAttribute::MAYBEVOID, \
  66         &memberAny, ::getCppuType( static_cast< type* >( NULL ) ) );
  67
  68     //==================================================================
  69     // ONavigationBarModel
  70     //==================================================================
  71     DBG_NAME( ONavigationBarModel )
  72     //------------------------------------------------------------------
  73     ONavigationBarModel::ONavigationBarModel( const Reference< XMultiServiceFactory >& _rxFactory )
  74         :OControlModel( _rxFactory, ::rtl::OUString() )
  75         ,FontControlModel( true )
  76     {
  77         DBG_CTOR( ONavigationBarModel, NULL );
  78
  79         m_nClassId = FormComponentType::NAVIGATIONBAR;
  80         implInitPropertyContainer();
  81
  82         getPropertyDefaultByHandle( PROPERTY_ID_DEFAULTCONTROL          ) >>= m_sDefaultControl;
  83         getPropertyDefaultByHandle( PROPERTY_ID_ICONSIZE                ) >>= m_nIconSize;
  84         getPropertyDefaultByHandle( PROPERTY_ID_BORDER                  ) >>= m_nBorder;
  85         getPropertyDefaultByHandle( PROPERTY_ID_DELAY                   ) >>= m_nDelay;
  86         getPropertyDefaultByHandle( PROPERTY_ID_ENABLED                 ) >>= m_bEnabled;
  87         getPropertyDefaultByHandle( PROPERTY_ID_ENABLEVISIBLE           ) >>= m_bEnableVisible;
  88         getPropertyDefaultByHandle( PROPERTY_ID_SHOW_POSITION           ) >>= m_bShowPosition;
  89         getPropertyDefaultByHandle( PROPERTY_ID_SHOW_NAVIGATION         ) >>= m_bShowNavigation;
  90         getPropertyDefaultByHandle( PROPERTY_ID_SHOW_RECORDACTIONS      ) >>= m_bShowActions;
  91         getPropertyDefaultByHandle( PROPERTY_ID_SHOW_FILTERSORT         ) >>= m_bShowFilterSort;
  92         getPropertyDefaultByHandle( PROPERTY_ID_WRITING_MODE            ) >>= m_nWritingMode;
  93         getPropertyDefaultByHandle( PROPERTY_ID_CONTEXT_WRITING_MODE    ) >>= m_nContextWritingMode;
  94     }
  95
  96     //------------------------------------------------------------------
  97     ONavigationBarModel::ONavigationBarModel( const ONavigationBarModel* _pOriginal, const Reference< XMultiServiceFactory >& _rxFactory )
  98         :OControlModel( _pOriginal, _rxFactory )
  99         ,FontControlModel( _pOriginal )
 100     {
 101         DBG_CTOR( ONavigationBarModel, NULL );
 102
 103         implInitPropertyContainer();
 104
 105         m_aTabStop              = _pOriginal->m_aTabStop;
 106         m_aBackgroundColor      = _pOriginal->m_aBackgroundColor;
 107         m_sDefaultControl       = _pOriginal->m_sDefaultControl;
 108         m_sHelpText             = _pOriginal->m_sHelpText;
 109         m_sHelpURL              = _pOriginal->m_sHelpURL;
 110         m_bEnabled              = _pOriginal->m_bEnabled;
 111         m_bEnableVisible        = _pOriginal->m_bEnableVisible;
 112         m_nIconSize             = _pOriginal->m_nIconSize;
 113         m_nBorder               = _pOriginal->m_nBorder;
 114         m_nDelay                = _pOriginal->m_nDelay;
 115         m_bShowPosition         = _pOriginal->m_bShowPosition;
 116         m_bShowNavigation       = _pOriginal->m_bShowNavigation;
 117         m_bShowActions          = _pOriginal->m_bShowActions;
 118         m_bShowFilterSort       = _pOriginal->m_bShowFilterSort;
 119         m_nWritingMode          = _pOriginal->m_nWritingMode;
 120         m_nContextWritingMode   = _pOriginal->m_nContextWritingMode;
 121     }
 122
 123     //------------------------------------------------------------------
 124     void ONavigationBarModel::implInitPropertyContainer()
 125     {
 126         REGISTER_PROP_2( DEFAULTCONTROL,      m_sDefaultControl,        BOUND, MAYBEDEFAULT );
 127         REGISTER_PROP_2( HELPTEXT,            m_sHelpText,              BOUND, MAYBEDEFAULT );
 128         REGISTER_PROP_2( HELPURL,             m_sHelpURL,               BOUND, MAYBEDEFAULT );
 129         REGISTER_PROP_2( ENABLED,             m_bEnabled,               BOUND, MAYBEDEFAULT );
 130         REGISTER_PROP_2( ENABLEVISIBLE,       m_bEnableVisible,         BOUND, MAYBEDEFAULT );
 131         REGISTER_PROP_2( ICONSIZE,            m_nIconSize,              BOUND, MAYBEDEFAULT );
 132         REGISTER_PROP_2( BORDER,              m_nBorder,                BOUND, MAYBEDEFAULT );
 133         REGISTER_PROP_2( DELAY,               m_nDelay,                 BOUND, MAYBEDEFAULT );
 134         REGISTER_PROP_2( SHOW_POSITION,       m_bShowPosition,          BOUND, MAYBEDEFAULT );
 135         REGISTER_PROP_2( SHOW_NAVIGATION,     m_bShowNavigation,        BOUND, MAYBEDEFAULT );
 136         REGISTER_PROP_2( SHOW_RECORDACTIONS,  m_bShowActions,           BOUND, MAYBEDEFAULT );
 137         REGISTER_PROP_2( SHOW_FILTERSORT,     m_bShowFilterSort,        BOUND, MAYBEDEFAULT );
 138         REGISTER_PROP_2( WRITING_MODE,        m_nWritingMode,           BOUND, MAYBEDEFAULT );
 139         REGISTER_PROP_3( CONTEXT_WRITING_MODE,m_nContextWritingMode,    BOUND, MAYBEDEFAULT, TRANSIENT );
 140
 141         REGISTER_VOID_PROP( TABSTOP,         m_aTabStop,         sal_Bool );
 142         REGISTER_VOID_PROP( BACKGROUNDCOLOR, m_aBackgroundColor, sal_Int32 );
 143     }
 144
 145     //------------------------------------------------------------------
 146     ONavigationBarModel::~ONavigationBarModel()
 147     {
 148         if ( !OComponentHelper::rBHelper.bDisposed )
 149         {
 150             acquire();
 151             dispose();
 152         }
 153
 154         DBG_DTOR( ONavigationBarModel, NULL );
 155     }
 156
 157     //------------------------------------------------------------------
 158     Any SAL_CALL ONavigationBarModel::queryAggregation( const Type& _rType ) throw ( RuntimeException )
 159     {
 160         Any aReturn = ONavigationBarModel_BASE::queryInterface( _rType );
 161
 162         if ( !aReturn.hasValue() )
 163             aReturn = OControlModel::queryAggregation( _rType );
 164
 165         return aReturn;
 166     }
 167
 168     //------------------------------------------------------------------
 169     IMPLEMENT_FORWARD_XTYPEPROVIDER2( ONavigationBarModel, OControlModel, ONavigationBarModel_BASE )
 170
 171     //------------------------------------------------------------------------------
 172     IMPLEMENT_DEFAULT_CLONING( ONavigationBarModel )
 173
 174     //------------------------------------------------------------------
 175     ::rtl::OUString     SAL_CALL ONavigationBarModel::getImplementationName()  throw(RuntimeException)
 176     {
 177         return getImplementationName_Static();
 178     }
 179
 180     //------------------------------------------------------------------
 181     Sequence< ::rtl::OUString > SAL_CALL ONavigationBarModel::getSupportedServiceNames()  throw(RuntimeException)
 182     {
 183         return getSupportedServiceNames_Static();
 184     }
 185
 186     //------------------------------------------------------------------
 187     ::rtl::OUString     SAL_CALL ONavigationBarModel::getImplementationName_Static()
 188     {
 189         return ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.comp.form.ONavigationBarModel" ) );
 190     }
 191
 192     //------------------------------------------------------------------
 193     Sequence< ::rtl::OUString > SAL_CALL ONavigationBarModel::getSupportedServiceNames_Static()
 194     {
 195         Sequence< ::rtl::OUString > aSupported = OControlModel::getSupportedServiceNames_Static();
 196         aSupported.realloc( aSupported.getLength() + 2 );
 197
 198         ::rtl::OUString* pArray = aSupported.getArray();
 199         pArray[ aSupported.getLength() - 2 ] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.awt.UnoControlModel" ) );
 200         pArray[ aSupported.getLength() - 1 ] = FRM_SUN_COMPONENT_NAVTOOLBAR;
 201         return aSupported;
 202     }
 203
 204     //------------------------------------------------------------------
 205     Reference< XInterface > SAL_CALL ONavigationBarModel::Create( const Reference< XMultiServiceFactory >& _rxFactory )
 206     {
 207         return *( new ONavigationBarModel( _rxFactory ) );
 208     }
 209
 210     //------------------------------------------------------------------
 211     void SAL_CALL ONavigationBarModel::disposing()
 212     {
 213         OControlModel::disposing( );
 214     }
 215
 216     //------------------------------------------------------------------
 217     ::rtl::OUString SAL_CALL ONavigationBarModel::getServiceName() throw ( RuntimeException )
 218     {
 219         return FRM_SUN_COMPONENT_NAVTOOLBAR;
 220     }
 221
 222     //------------------------------------------------------------------
 223     #define PERSIST_TABSTOP         0x0001
 224     #define PERSIST_BACKGROUND      0x0002
 225     #define PERSIST_TEXTCOLOR       0x0004
 226     #define PERSIST_TEXTLINECOLOR   0x0008
 227
 228     #define PERSIST_ENABLED         0x0001
 229     #define PERSIST_LARGEICONS      0x0002
 230         // leaf a leap here - this will allow for two more icon size values to be stored compatibly
 231     #define PERSIST_SHOW_POSITION   0x0008
 232     #define PERSIST_SHOW_NAVIGATION 0x0010
 233     #define PERSIST_SHOW_ACTIONS    0x0020
 234     #define PERSIST_SHOW_FILTERSORT 0x0040
 235
 236     //------------------------------------------------------------------
 237     void SAL_CALL ONavigationBarModel::write( const Reference< XObjectOutputStream >& _rxOutStream ) throw ( IOException, RuntimeException )
 238     {
 239         // open a section for compatibility - if we later on write additional members,
 240         // then older versions can skip them
 241         Reference< XDataOutputStream > xDataOut( _rxOutStream, UNO_QUERY );
 242         OStreamSection aEnsureBlockCompat( xDataOut );
 243
 244         // base class
 245         OControlModel::write( _rxOutStream );
 246
 247         {
 248             OStreamSection aEnsureCompat( xDataOut );
 249             // determine which properties are not void and need to be written
 250             sal_Int32 nNonVoids = 0;
 251             if ( m_aTabStop.hasValue() )
 252                 nNonVoids |= PERSIST_TABSTOP;
 253             if ( m_aBackgroundColor.hasValue() )
 254                 nNonVoids |= PERSIST_BACKGROUND;
 255             if ( hasTextColor() )
 256                 nNonVoids |= PERSIST_TEXTCOLOR;
 257             if ( hasTextLineColor() )
 258                 nNonVoids |= PERSIST_TEXTLINECOLOR;
 259
 260             _rxOutStream->writeLong( nNonVoids );
 261
 262             // the maybeboid anys
 263             if ( nNonVoids & PERSIST_TABSTOP )
 264             {
 265                 sal_Bool bTabStop( sal_False );
 266                 m_aTabStop >>= bTabStop;
 267                 _rxOutStream->writeBoolean( bTabStop );
 268             }
 269             if ( nNonVoids & PERSIST_BACKGROUND )
 270             {
 271                 sal_Int32 nBackgroundColor = 0;
 272                 m_aBackgroundColor >>= nBackgroundColor;
 273                 _rxOutStream->writeLong( nBackgroundColor );
 274             }
 275             if ( nNonVoids & PERSIST_TEXTCOLOR )
 276             {
 277                _rxOutStream->writeLong( getTextColor() );
 278             }
 279             if ( nNonVoids & PERSIST_TEXTLINECOLOR )
 280             {
 281                 _rxOutStream->writeLong( getTextLineColor() );
 282             }
 283         }
 284
 285         {
 286             OStreamSection aEnsureCompat( xDataOut );
 287             ::comphelper::operator<<( _rxOutStream, getFont() );
 288         }
 289
 290         // our boolean flags
 291         sal_Int32 nFlags = 0;
 292         if ( m_bEnabled        ) nFlags |= PERSIST_ENABLED;
 293         if ( m_nIconSize       ) nFlags |= PERSIST_LARGEICONS;   // at the moment, this is quasi boolean
 294         if ( m_bShowPosition   ) nFlags |= PERSIST_SHOW_POSITION;
 295         if ( m_bShowNavigation ) nFlags |= PERSIST_SHOW_NAVIGATION;
 296         if ( m_bShowActions    ) nFlags |= PERSIST_SHOW_ACTIONS;
 297         if ( m_bShowFilterSort ) nFlags |= PERSIST_SHOW_FILTERSORT;
 298         _rxOutStream->writeLong( nFlags );
 299
 300         // our strings
 301         _rxOutStream->writeUTF( m_sHelpText       );
 302         _rxOutStream->writeUTF( m_sHelpURL        );
 303         _rxOutStream->writeUTF( m_sDefaultControl );
 304
 305         // misc
 306         _rxOutStream->writeShort( m_nBorder );
 307         _rxOutStream->writeLong ( m_nDelay  );
 308     }
 309
 310     //------------------------------------------------------------------
 311     void SAL_CALL ONavigationBarModel::read( const Reference< XObjectInputStream >& _rxInStream ) throw ( IOException, RuntimeException )
 312     {
 313         Reference< XDataInputStream > xDataIn( _rxInStream, UNO_QUERY );
 314         OStreamSection aEnsureBlockCompat( xDataIn );
 315
 316         // base class
 317         OControlModel::read( _rxInStream );
 318
 319         {
 320             OStreamSection aEnsureCompat( xDataIn );
 321             // determine which properties were non-void
 322             sal_Int32 nNonVoids = _rxInStream->readLong( );
 323
 324             // the maybeboid anys
 325             if ( nNonVoids & PERSIST_TABSTOP )
 326                 m_aTabStop = makeAny( _rxInStream->readBoolean() );
 327             else
 328                 m_aTabStop.clear();
 329
 330             if ( nNonVoids & PERSIST_BACKGROUND )
 331                 m_aBackgroundColor = makeAny( _rxInStream->readLong() );
 332             else
 333                 m_aBackgroundColor.clear();
 334
 335             if ( nNonVoids & PERSIST_TEXTCOLOR )
 336                 setTextColor( _rxInStream->readLong() );
 337             else
 338                 clearTextColor();
 339
 340             if ( nNonVoids & PERSIST_TEXTLINECOLOR )
 341                 setTextLineColor( _rxInStream->readLong() );
 342             else
 343                 clearTextLineColor();
 344         }
 345
 346         {
 347             OStreamSection aEnsureCompat( xDataIn );
 348             FontDescriptor aFont;
 349             ::comphelper::operator>>( _rxInStream, aFont );
 350             setFont( aFont );
 351         }
 352
 353         // our boolean flags
 354         sal_Int32 nFlags = _rxInStream->readLong( );
 355         m_bEnabled        = ( nFlags & PERSIST_ENABLED         ) ? sal_True : sal_False;
 356         m_nIconSize       = ( nFlags & PERSIST_LARGEICONS      ) ?        1 :         0;
 357         m_bShowPosition   = ( nFlags & PERSIST_SHOW_POSITION   ) ? sal_True : sal_False;
 358         m_bShowNavigation = ( nFlags & PERSIST_SHOW_NAVIGATION ) ? sal_True : sal_False;
 359         m_bShowActions    = ( nFlags & PERSIST_SHOW_ACTIONS    ) ? sal_True : sal_False;
 360         m_bShowFilterSort = ( nFlags & PERSIST_SHOW_FILTERSORT ) ? sal_True : sal_False;
 361
 362         // our strings
 363         m_sHelpText       = _rxInStream->readUTF( );
 364         m_sHelpURL        = _rxInStream->readUTF( );
 365         m_sDefaultControl = _rxInStream->readUTF( );
 366
 367         // misc
 368         m_nBorder = _rxInStream->readShort();
 369         m_nDelay  = _rxInStream->readLong();
 370     }
 371
 372     //------------------------------------------------------------------
 373     void SAL_CALL ONavigationBarModel::getFastPropertyValue( Any& _rValue, sal_Int32 _nHandle ) const
 374     {
 375         if ( isRegisteredProperty( _nHandle ) )
 376         {
 377             OPropertyContainerHelper::getFastPropertyValue( _rValue, _nHandle );
 378         }
 379         else if ( isFontRelatedProperty( _nHandle ) )
 380         {
 381             FontControlModel::getFastPropertyValue( _rValue, _nHandle );
 382         }
 383         else
 384         {
 385             OControlModel::getFastPropertyValue( _rValue, _nHandle );
 386         }
 387     }
 388
 389     //------------------------------------------------------------------
 390     sal_Bool SAL_CALL ONavigationBarModel::convertFastPropertyValue( Any& _rConvertedValue, Any& _rOldValue,
 391         sal_Int32 _nHandle, const Any& _rValue ) throw( IllegalArgumentException )
 392     {
 393         sal_Bool bModified = sal_False;
 394
 395         if ( isRegisteredProperty( _nHandle ) )
 396         {
 397             bModified = OPropertyContainerHelper::convertFastPropertyValue( _rConvertedValue, _rOldValue, _nHandle, _rValue );
 398         }
 399         else if ( isFontRelatedProperty( _nHandle ) )
 400         {
 401             bModified = FontControlModel::convertFastPropertyValue( _rConvertedValue, _rOldValue, _nHandle, _rValue );
 402         }
 403         else
 404         {
 405             bModified = OControlModel::convertFastPropertyValue( _rConvertedValue, _rOldValue, _nHandle, _rValue );
 406         }
 407
 408         return bModified;
 409     }
 410
 411     //------------------------------------------------------------------
 412     void SAL_CALL ONavigationBarModel::setFastPropertyValue_NoBroadcast( sal_Int32 _nHandle, const Any& _rValue ) throw ( Exception )
 413     {
 414         if ( isRegisteredProperty( _nHandle ) )
 415         {
 416             OPropertyContainerHelper::setFastPropertyValue( _nHandle, _rValue );
 417         }
 418         else if ( isFontRelatedProperty( _nHandle ) )
 419         {
 420             FontDescriptor aOldFont( getFont() );
 421
 422             FontControlModel::setFastPropertyValue_NoBroadcast( _nHandle, _rValue );
 423
 424             if ( isFontAggregateProperty( _nHandle ) )
 425                 firePropertyChange( PROPERTY_ID_FONT, makeAny( getFont() ), makeAny( aOldFont ) );
 426         }
 427         else
 428         {
 429             OControlModel::setFastPropertyValue_NoBroadcast( _nHandle, _rValue );
 430         }
 431     }
 432
 433     //------------------------------------------------------------------
 434     Any ONavigationBarModel::getPropertyDefaultByHandle( sal_Int32 _nHandle ) const
 435     {
 436         Any aDefault;
 437
 438         switch ( _nHandle )
 439         {
 440         case PROPERTY_ID_TABSTOP:
 441         case PROPERTY_ID_BACKGROUNDCOLOR:
 442             /* void */
 443             break;
 444         case PROPERTY_ID_WRITING_MODE:
 445         case PROPERTY_ID_CONTEXT_WRITING_MODE:
 446             aDefault <<= WritingMode2::CONTEXT;
 447             break;
 448
 449         case PROPERTY_ID_ENABLED:
 450         case PROPERTY_ID_ENABLEVISIBLE:
 451         case PROPERTY_ID_SHOW_POSITION:
 452         case PROPERTY_ID_SHOW_NAVIGATION:
 453         case PROPERTY_ID_SHOW_RECORDACTIONS:
 454         case PROPERTY_ID_SHOW_FILTERSORT:
 455             aDefault <<= (sal_Bool)sal_True;
 456             break;
 457
 458         case PROPERTY_ID_ICONSIZE:
 459             aDefault <<= (sal_Int16)0;
 460             break;
 461
 462         case PROPERTY_ID_DEFAULTCONTROL:
 463             aDefault <<= ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.form.control.NavigationToolBar" ) );
 464             break;
 465
 466         case PROPERTY_ID_HELPTEXT:
 467         case PROPERTY_ID_HELPURL:
 468             aDefault <<= ::rtl::OUString();
 469             break;
 470
 471         case PROPERTY_ID_BORDER:
 472             aDefault <<= (sal_Int16)0;
 473             break;
 474
 475         case PROPERTY_ID_DELAY:
 476             aDefault <<= (sal_Int32)20;
 477             break;
 478
 479         default:
 480             if ( isFontRelatedProperty( _nHandle ) )
 481                 aDefault = FontControlModel::getPropertyDefaultByHandle( _nHandle );
 482             else
 483                 aDefault = OControlModel::getPropertyDefaultByHandle( _nHandle );
 484         }
 485         return aDefault;
 486     }
 487
 488     //------------------------------------------------------------------
 489     void ONavigationBarModel::describeFixedProperties( Sequence< Property >& _rProps ) const
 490     {
 491         BEGIN_DESCRIBE_PROPERTIES( 1, OControlModel )
 492             DECL_PROP2( TABINDEX,           sal_Int16,          BOUND, MAYBEDEFAULT );
 493         END_DESCRIBE_PROPERTIES();
 494
 495         // properties which the OPropertyContainerHelper is responsible for
 496         Sequence< Property > aContainedProperties;
 497         describeProperties( aContainedProperties );
 498
 499         // properties which the FontControlModel is responsible for
 500         Sequence< Property > aFontProperties;
 501         describeFontRelatedProperties( aFontProperties );
 502
 503         _rProps = concatSequences(
 504             aContainedProperties,
 505             aFontProperties,
 506             _rProps
 507         );
 508     }
 509
 510 //.........................................................................
 511 }   // namespace frm
 512 //.........................................................................