extensions/source/propctrlr/formcomponenthandler.hxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*************************************************************************
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * Copyright 2000, 2010 Oracle and/or its affiliates.
   7  *
   8  * OpenOffice.org - a multi-platform office productivity suite
   9  *
  10  * This file is part of OpenOffice.org.
  11  *
  12  * OpenOffice.org is free software: you can redistribute it and/or modify
  13  * it under the terms of the GNU Lesser General Public License version 3
  14  * only, as published by the Free Software Foundation.
  15  *
  16  * OpenOffice.org is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU Lesser General Public License version 3 for more details
  20  * (a copy is included in the LICENSE file that accompanied this code).
  21  *
  22  * You should have received a copy of the GNU Lesser General Public License
  23  * version 3 along with OpenOffice.org.  If not, see
  24  * <http://www.openoffice.org/license.html>
  25  * for a copy of the LGPLv3 License.
  26  *
  27  ************************************************************************/
  28
  29 #ifndef EXTENSIONS_SOURCE_PROPCTRLR_FORMCOMPONENTHANDLER_HXX
  30 #define EXTENSIONS_SOURCE_PROPCTRLR_FORMCOMPONENTHANDLER_HXX
  31
  32 #include "propertyhandler.hxx"
  33 #include "sqlcommanddesign.hxx"
  34 #include "pcrcommon.hxx"
  35 #include <comphelper/uno3.hxx>
  36 #include <comphelper/proparrhlp.hxx>
  37 #include <comphelper/propertycontainer.hxx>
  38 /** === begin UNO includes === **/
  39 #include <com/sun/star/frame/XModel.hpp>
  40 #include <com/sun/star/beans/XPropertyState.hpp>
  41 #include <com/sun/star/sdbc/XRowSet.hpp>
  42 #include <com/sun/star/awt/XControlContainer.hpp>
  43 #include <com/sun/star/form/XForm.hpp>
  44 /** === end UNO includes === **/
  45 #include <tools/fldunit.hxx>
  46 #include <vcl/waitobj.hxx>
  47 #include <connectivity/dbtools.hxx>
  48
  49 #include <set>
  50
  51 //........................................................................
  52 namespace pcr
  53 {
  54 //........................................................................
  55
  56     //====================================================================
  57     //= ComponentClassification
  58     //====================================================================
  59     enum ComponentClassification
  60     {
  61         eFormControl,
  62         eDialogControl,
  63         eUnknown
  64     };
  65
  66     //====================================================================
  67     //= FormComponentPropertyHandler
  68     //====================================================================
  69     class FormComponentPropertyHandler;
  70     typedef HandlerComponentBase< FormComponentPropertyHandler > FormComponentPropertyHandler_Base;
  71     typedef ::comphelper::OPropertyArrayUsageHelper<FormComponentPropertyHandler> FormComponentPropertyHandler_PROP;
  72     /** default ->XPropertyHandler for all form components.
  73     */
  74     class FormComponentPropertyHandler :    public FormComponentPropertyHandler_Base,
  75                                             public ::comphelper::OPropertyContainer,
  76                                             public FormComponentPropertyHandler_PROP
  77     {
  78     private:
  79         /// access to property states
  80         ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertyState >             m_xPropertyState;
  81         /// the parent of our component
  82         ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >                   m_xObjectParent;
  83
  84         /// the database connection. Owned by us if and only if we created it ourself.
  85         mutable ::dbtools::SharedConnection                                                     m_xRowSetConnection;
  86         ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XRowSet >                     m_xRowSet;
  87         /** helper component encapsulating the handling for the QueryDesign component for
  88             interactively designing an SQL command
  89         */
  90         ::rtl::Reference< SQLCommandDesigner >                                                  m_xCommandDesigner;
  91         ::com::sun::star::uno::Reference< ::com::sun::star::inspection::XObjectInspectorUI >    m_xBrowserUI;
  92
  93         /// the string indicating a "default" (VOID) value in list-like controls
  94         ::rtl::OUString                 m_sDefaultValueString;
  95         /// all properties to whose control's we added ->m_sDefaultValueString
  96         ::std::set< ::rtl::OUString >   m_aPropertiesWithDefListEntry;
  97         /// type of our component
  98         ComponentClassification         m_eComponentClass;
  99         /// is our component a (database) sub form?
 100         bool                            m_bComponentIsSubForm : 1;
 101         /// our component has a "ListSource" property
 102         bool                            m_bHaveListSource : 1;
 103         /// our component has a "Command" property
 104         bool                            m_bHaveCommand : 1;
 105         /// the class id of the component - if appliable
 106         sal_Int16                       m_nClassId;
 107
 108     public:
 109         FormComponentPropertyHandler(
 110             const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XComponentContext >& _rxContext
 111         );
 112
 113         DECLARE_XINTERFACE( )
 114
 115         // XPropertySet
 116         virtual ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySetInfo > SAL_CALL getPropertySetInfo(  ) throw(::com::sun::star::uno::RuntimeException);
 117
 118         static ::rtl::OUString SAL_CALL getImplementationName_static(  ) throw (::com::sun::star::uno::RuntimeException);
 119         static ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames_static(  ) throw (::com::sun::star::uno::RuntimeException);
 120
 121     protected:
 122         ~FormComponentPropertyHandler();
 123
 124     protected:
 125         virtual ::cppu::IPropertyArrayHelper* createArrayHelper( ) const;
 126         virtual ::cppu::IPropertyArrayHelper& SAL_CALL getInfoHelper();
 127         // XPropertyHandler overridables
 128         virtual ::com::sun::star::uno::Any                          SAL_CALL getPropertyValue( const ::rtl::OUString& _rPropertyName ) throw (::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::uno::RuntimeException);
 129         virtual void                                                SAL_CALL setPropertyValue( const ::rtl::OUString& _rPropertyName, const ::com::sun::star::uno::Any& _rValue ) throw (::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::uno::RuntimeException);
 130         virtual ::com::sun::star::uno::Any                          SAL_CALL convertToPropertyValue( const ::rtl::OUString& _rPropertyName, const ::com::sun::star::uno::Any& _rControlValue ) throw (::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::uno::RuntimeException);
 131         virtual ::com::sun::star::uno::Any                          SAL_CALL convertToControlValue( const ::rtl::OUString& _rPropertyName, const ::com::sun::star::uno::Any& _rPropertyValue, const ::com::sun::star::uno::Type& _rControlValueType ) throw (::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::uno::RuntimeException);
 132         virtual ::com::sun::star::beans::PropertyState              SAL_CALL getPropertyState( const ::rtl::OUString& _rPropertyName ) throw (::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::uno::RuntimeException);
 133         virtual void                                                SAL_CALL addPropertyChangeListener( const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertyChangeListener >& _rxListener ) throw (::com::sun::star::uno::RuntimeException);
 134         virtual void                                                SAL_CALL removePropertyChangeListener( const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertyChangeListener >& _rxListener ) throw (::com::sun::star::uno::RuntimeException);
 135         virtual ::com::sun::star::uno::Sequence< ::rtl::OUString >  SAL_CALL getSupersededProperties() throw (::com::sun::star::uno::RuntimeException);
 136         virtual ::com::sun::star::uno::Sequence< ::rtl::OUString >  SAL_CALL getActuatingProperties() throw (::com::sun::star::uno::RuntimeException);
 137         virtual ::com::sun::star::inspection::LineDescriptor        SAL_CALL describePropertyLine( const ::rtl::OUString& _rPropertyName, const ::com::sun::star::uno::Reference< ::com::sun::star::inspection::XPropertyControlFactory >& _rxControlFactory ) throw (::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::lang::NullPointerException, ::com::sun::star::uno::RuntimeException);
 138         virtual ::com::sun::star::inspection::InteractiveSelectionResult
 139                                                                     SAL_CALL onInteractivePropertySelection( const ::rtl::OUString& _rPropertyName, sal_Bool _bPrimary, ::com::sun::star::uno::Any& _rData, const ::com::sun::star::uno::Reference< ::com::sun::star::inspection::XObjectInspectorUI >& _rxInspectorUI ) throw (::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::lang::NullPointerException, ::com::sun::star::uno::RuntimeException);
 140         virtual void                                                SAL_CALL actuatingPropertyChanged( const ::rtl::OUString& _rActuatingPropertyName, const ::com::sun::star::uno::Any& _rNewValue, const ::com::sun::star::uno::Any& _rOldValue, const ::com::sun::star::uno::Reference< ::com::sun::star::inspection::XObjectInspectorUI >& _rxInspectorUI, sal_Bool _bFirstTimeInit ) throw (::com::sun::star::lang::NullPointerException, ::com::sun::star::uno::RuntimeException);
 141         virtual sal_Bool                                            SAL_CALL suspend( sal_Bool _bSuspend ) throw (::com::sun::star::uno::RuntimeException);
 142
 143         // XComponent
 144         virtual void                                                SAL_CALL disposing();
 145
 146         // PropertyHandler
 147         virtual ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >
 148                                             SAL_CALL doDescribeSupportedProperties() const;
 149         virtual void onNewComponent();
 150
 151     private:
 152         /** initializes some (cached) meta data about the component
 153             @throws RuntimeException
 154                 if a serious error occurs, for instance if the component does not provide an XPropertySetInfo instance
 155         */
 156         void    impl_initComponentMetaData_throw();
 157
 158         /** classifies our component, in case it's a control model, by ClassId
 159
 160             Note that UNO dialog controls are also classified, though they don't have the ClassId property
 161         */
 162         void    impl_classifyControlModel_throw();
 163
 164         /** const-version of ->getPropertyValue
 165         */
 166         ::com::sun::star::uno::Any impl_getPropertyValue_throw( const ::rtl::OUString& _rPropertyName ) const;
 167
 168         // some property values are faked, and not used in the way they're provided by our component
 169         void impl_normalizePropertyValue_nothrow( ::com::sun::star::uno::Any& _rValue, PropertyId _nPropId ) const;
 170
 171         /** determines whether we should exclude a given property from our "supported properties"
 172         */
 173         bool impl_shouldExcludeProperty_nothrow( const ::com::sun::star::beans::Property& _rProperty ) const;
 174
 175         /** initializes the list of field names, if we're handling a control which supports the
 176             DataField property
 177         */
 178         void impl_initFieldList_nothrow( ::std::vector< ::rtl::OUString >& rFieldNames ) const;
 179
 180         /** obtaines the RowSet to which our component belongs
 181
 182             If the component is a RowSet itself, it's returned directly. Else, the parent
 183             is examined for the XRowSet interface. If the parent is no XRowSet, then
 184             a check is made whether our component is a grid control column, and if so,
 185             the parent of the grid control is examied for the XRowSet interace.
 186
 187             Normally, at least one of those methods should succeed.
 188         */
 189         ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XRowSet > impl_getRowSet_throw( ) const;
 190
 191         /** nothrow-version of ->impl_getRowSet_throw
 192         */
 193         ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XRowSet > impl_getRowSet_nothrow( ) const;
 194
 195         /** connects the row set belonging to our introspected data aware form component,
 196             and remembers the connection in ->m_xRowSetConnection.
 197
 198             If the row set already is connected, ->m_xRowSetConnection will be set, too, but
 199             not take the ownership of the connection.
 200
 201             If ->m_xRowSetConnection is already set, nothing happens, so if you want to
 202             force creation of a connection, you need to clear ->m_xRowSetConnection.
 203         */
 204         bool impl_ensureRowsetConnection_nothrow() const;
 205
 206         /** clears ->m_xRowSetConnection
 207         */
 208         void impl_clearRowsetConnection_nothrow();
 209
 210         /** fills an ->LineDescriptor with information to represent a cursor source
 211             of our form - that is, a table, a query, or an SQL statement.
 212
 213             As an example, if our form has currently a CommandType of TABLE, then the
 214             value list in the LineDescriptor will contain a list of all tables
 215             of the data source which the form is bound to.
 216
 217             @seealso impl_fillTableNames_throw
 218             @seealso impl_fillQueryNames_throw
 219         */
 220         void impl_describeCursorSource_nothrow(
 221                 ::com::sun::star::inspection::LineDescriptor& _out_rProperty,
 222                 const ::com::sun::star::uno::Reference< ::com::sun::star::inspection::XPropertyControlFactory >& _rxControlFactory
 223             ) const;
 224
 225         /** describes the UI for selecting a table name
 226
 227             @precond
 228                 m_xRowSetConnection is not <NULL/>
 229         */
 230         void impl_fillTableNames_throw( ::std::vector< ::rtl::OUString >& _out_rNames ) const;
 231
 232         /** describes the UI for selecting a query name
 233
 234             @precond
 235                 m_xRowSetConnection is not <NULL/>
 236         */
 237         void impl_fillQueryNames_throw( ::std::vector< ::rtl::OUString >& _out_rNames ) const;
 238
 239         /** describes the UI for selecting a query name
 240
 241             @precond
 242                 m_xRowSetConnection is not <NULL/>
 243         */
 244         void impl_fillQueryNames_throw( const ::com::sun::star::uno::Reference< ::com::sun::star::container::XNameAccess >& _xQueryNames
 245                     ,::std::vector< ::rtl::OUString >& _out_rNames
 246                     ,const ::rtl::OUString& _sName = ::rtl::OUString() ) const;
 247
 248         /** describes the UI for selecting a ListSource (for list-like form controls)
 249             @precond
 250                 ->m_xRowSetConnection is not <NULL/>
 251             @precond
 252                 ->m_xComponent is not <NULL/>
 253         */
 254         void impl_describeListSourceUI_throw(
 255                 ::com::sun::star::inspection::LineDescriptor& _out_rDescriptor,
 256                 const ::com::sun::star::uno::Reference< ::com::sun::star::inspection::XPropertyControlFactory >& _rxControlFactory
 257             ) const;
 258
 259         /** displays a datbase-related error to the user
 260         */
 261         void impl_displaySQLError_nothrow( const ::dbtools::SQLExceptionInfo& _rErrorDescriptor ) const;
 262
 263         /** let's the user chose a selection of entries from a string list, and stores this
 264             selection in the given property
 265             @return
 266                 <TRUE/> if and only if the user successfully changed the property
 267         */
 268         bool impl_dialogListSelection_nothrow( const ::rtl::OUString& _rProperty, ::osl::ClearableMutexGuard& _rClearBeforeDialog ) const;
 269
 270         /** executes a dialog for chosing a filter or sort criterion for a database form
 271             @param _bFilter
 272                 <TRUE/> if the Filter property should be used, <FALSE/> if it's the Order
 273                 property
 274             @param _out_rSelectedClause
 275                 the filter or order clause as chosen by the user
 276             @precond
 277                 we're really inspecting a database form (well, a RowSet at least)
 278             @return
 279                 <TRUE/> if and only if the user successfully chose a clause
 280         */
 281         bool impl_dialogFilterOrSort_nothrow( bool _bFilter, ::rtl::OUString& _out_rSelectedClause, ::osl::ClearableMutexGuard& _rClearBeforeDialog ) const;
 282
 283         /** executes a dialog which allows the user to chose the columns linking
 284             a sub to a master form, and sets the respective MasterFields / SlaveFields
 285             properties at the form.
 286             @precond
 287                 we're inspecting (sub) database form
 288             @return
 289                 <TRUE/> if and only if the user successfully eneter master and slave fields
 290         */
 291         bool impl_dialogLinkedFormFields_nothrow( ::osl::ClearableMutexGuard& _rClearBeforeDialog ) const;
 292
 293         /** executes a dialog which allows the user to modify the FormatKey
 294             property of our component, by chosing a (number) format.
 295             @precond
 296                 Our component actually has a FormatKey property.
 297             @param _out_rNewValue
 298                 the new property value, if the user chose a new formatting
 299             @return
 300                 <TRUE/> if and only if a new formatting has been chosen by the user.
 301                 In this case, ->_out_rNewValue is filled with the new property value
 302         */
 303         bool impl_dialogFormatting_nothrow( ::com::sun::star::uno::Any& _out_rNewValue, ::osl::ClearableMutexGuard& _rClearBeforeDialog ) const;
 304
 305         /** executes a dialog which allows to the user to change the ImageURL property
 306             of our component by browsing for an image file.
 307             @precond
 308                 our component actually has a ImageURL property
 309             @param _out_rNewValue
 310                 the new property value, if the user chose a new image url
 311             @return
 312                 <TRUE/> if and only if a new image URL has been chosen by the user.
 313                 In this case, ->_out_rNewValue is filled with the new property value
 314         */
 315         bool impl_browseForImage_nothrow( ::com::sun::star::uno::Any& _out_rNewValue, ::osl::ClearableMutexGuard& _rClearBeforeDialog ) const;
 316
 317         /** executes a dialog which allows the user to change the TargetURL property of
 318             our component
 319             @precond
 320                 our component actually has a TargetURL property
 321             @param _out_rNewValue
 322                 the new property value, if the user chose a new TargetURL
 323             @return
 324                 <TRUE/> if and only if a new TargetURL has been chosen by the user.
 325                 In this case, ->_out_rNewValue is filled with the new property value
 326         */
 327         bool impl_browseForTargetURL_nothrow( ::com::sun::star::uno::Any& _out_rNewValue, ::osl::ClearableMutexGuard& _rClearBeforeDialog ) const;
 328
 329         /** executes a dialog which allows the user to change the font, plus related properties,
 330             of our component
 331             @precond
 332                 our component actually has a Font property
 333             @param _out_rNewValue
 334                 a value desribing the new font, as <code>Sequence&lt; NamedValue &gt;</code>
 335             @return
 336                 <TRUE/> if and only if the user successfully changed the font of our component
 337         */
 338         bool impl_executeFontDialog_nothrow( ::com::sun::star::uno::Any& _out_rNewValue, ::osl::ClearableMutexGuard& _rClearBeforeDialog ) const;
 339
 340         /** allows the user browsing for a database document
 341             @precond
 342                 our component actually has a DataSource property
 343             @param _out_rNewValue
 344                 the new property value, if the user chose a new DataSource
 345             @return
 346                 <TRUE/> if and only if a new DataSource has been chosen by the user.
 347                 In this case, ->_out_rNewValue is filled with the new property value
 348         */
 349         bool impl_browseForDatabaseDocument_throw( ::com::sun::star::uno::Any& _out_rNewValue, ::osl::ClearableMutexGuard& _rClearBeforeDialog ) const;
 350
 351         /** raises a dialog which allows the user to choose a color
 352             @param  _nColorPropertyId
 353                 the ID of the color property
 354             @param  _out_rNewValue
 355                 the chosen color value
 356             @return
 357                 <TRUE/> if and only if a color was chosen by the user
 358         */
 359         bool impl_dialogColorChooser_throw( sal_Int32 _nColorPropertyId, ::com::sun::star::uno::Any& _out_rNewValue, ::osl::ClearableMutexGuard& _rClearBeforeDialog ) const;
 360
 361         /** raises a dialog which allows the user to choose a label control for our component
 362             @param  _out_rNewValue
 363                 the chosen label control, if any
 364             @return
 365                 <TRUE/> if and only if a label control was chosen by the user
 366         */
 367         bool impl_dialogChooseLabelControl_nothrow( ::com::sun::star::uno::Any& _out_rNewValue, ::osl::ClearableMutexGuard& _rClearBeforeDialog ) const;
 368
 369         /** raises a dialog which lets the user chose the tab order of controls of a form
 370             @precond
 371                 we have a view control container in which our controls live
 372             @return
 373                 <TRUE/> if and only if the user successfully changed the tab order
 374             @seealso impl_getContextControlContainer_nothrow
 375         */
 376         bool impl_dialogChangeTabOrder_nothrow( ::osl::ClearableMutexGuard& _rClearBeforeDialog ) const;
 377
 378         /** retrieves the context for controls, whose model(s) we're inspecting
 379
 380             If we're inspecting a control model, this is usually part of a set of controls
 381             and control models, where the controls live in a certain context (a ->XControlContainer).
 382             If we know this context, we can enable additional special functionality.
 383
 384             The ->XComponentContext in which we were created is examined for a value
 385             named "ControlContext", and this value is returned.
 386         */
 387         ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlContainer >
 388             impl_getContextControlContainer_nothrow() const;
 389
 390         /** opens a query design window for interactively designing the SQL command of a
 391             database form
 392             @param _rxUIUpdate
 393                 access to the property browser UI
 394             @param _nDesignForProperty
 395                 the ID for the property for which the designer is opened
 396             @return
 397                 <TRUE/> if the window was successfully opened, or was previously open,
 398                 <FALSE/> otherwise
 399         */
 400         bool impl_doDesignSQLCommand_nothrow(
 401             const ::com::sun::star::uno::Reference< ::com::sun::star::inspection::XObjectInspectorUI >& _rxInspectorUI,
 402             PropertyId _nDesignForProperty
 403         );
 404
 405         /** updates a property (UI) whose state depends on more than one other property
 406
 407             ->actuatingPropertyChanged is called for certain properties in whose changes
 408             we expressed interes (->getActuatingProperty). Now such a property change can
 409             result in simple UI updates, for instance another property being enabled or disabled.
 410
 411             However, it can also result in a more complex change: The current (UI) state might
 412             depend on the value of more than one other property. Those dependent properties (their
 413             UI, more precisly) are updated in this method.
 414
 415             @param _nPropid
 416                 the ->PropertyId of the dependent property whose UI state is to be updated
 417
 418             @param _rxInspectorUI
 419                 provides access to the property browser UI. Must not be <NULL/>.
 420         */
 421         void impl_updateDependentProperty_nothrow( PropertyId _nPropId, const ::com::sun::star::uno::Reference< ::com::sun::star::inspection::XObjectInspectorUI >& _rxInspectorUI ) const;
 422
 423         /** determines whether the given form has a valid data source signature.
 424
 425             Valid here means that the DataSource property denotes an existing data source, and the
 426             Command property is not empty. No check is made whether the value of the Command property
 427             denotes an existent object, since this would be way too expensive.
 428
 429             @param _xFormProperties
 430                 the form to check. Must not be <NULL/>.
 431             @param _bAllowEmptyDataSourceName
 432                 determine whether an empty data source name is allowed (<TRUE/>), and should not
 433                 lead to rejection
 434         */
 435         static bool impl_hasValidDataSourceSignature_nothrow(
 436                 const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet >& _xFormProperties,
 437                 bool _bAllowEmptyDataSourceName );
 438
 439         /** returns the URL of our context document
 440             @return
 441         */
 442         ::rtl::OUString impl_getDocumentURL_nothrow() const;
 443
 444     private:
 445         DECL_LINK( OnDesignerClosed, void* );
 446
 447     private:
 448         FormComponentPropertyHandler();                                                 // never implemented
 449         FormComponentPropertyHandler( const FormComponentPropertyHandler& );            // never implemented
 450         FormComponentPropertyHandler& operator=( const FormComponentPropertyHandler& ); // never implemented
 451
 452     private:
 453         using ::comphelper::OPropertyContainer::addPropertyChangeListener;
 454         using ::comphelper::OPropertyContainer::removePropertyChangeListener;
 455     };
 456
 457     //====================================================================
 458     //= WaitCursor
 459     //====================================================================
 460     /** wrapper around a ->WaitObject which can cope with a NULL window
 461     */
 462     class WaitCursor
 463     {
 464     private:
 465         ::std::auto_ptr< WaitObject >       m_aWaitObject;
 466
 467     public:
 468         WaitCursor( Window* _pWindow )
 469         {
 470             if ( _pWindow )
 471                 m_aWaitObject.reset( new WaitObject( _pWindow ) );
 472         }
 473     };
 474
 475 //........................................................................
 476 } // namespace pcr
 477 //........................................................................
 478
 479 #endif // EXTENSIONS_SOURCE_PROPCTRLR_FORMCOMPONENTHANDLER_HXX
 480
 481 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */