replace obsolete "master" branch with README that points at new repoHEADmaster-deletedmaster

1 files changed, 0 insertions, 1887 deletions

diff --git a/basctl/source/dlged/dlgedobj.cxx b/basctl/source/dlged/dlgedobj.cxx
deleted file mode 100644
index 52adc033f..000000000
--- a/basctl/source/dlged/dlgedobj.cxx
+++ /dev/null
@@ -1,1887 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * This file is part of OpenOffice.org.
- *
- * OpenOffice.org is free software: you can redistribute it and/or modify
- * it under the terms of the GNU Lesser General Public License version 3
- * only, as published by the Free Software Foundation.
- *
- * OpenOffice.org is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- * GNU Lesser General Public License version 3 for more details
- * (a copy is included in the LICENSE file that accompanied this code).
- *
- * You should have received a copy of the GNU Lesser General Public License
- * version 3 along with OpenOffice.org.  If not, see
- * <http://www.openoffice.org/license.html>
- * for a copy of the LGPLv3 License.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_basctl.hxx"
-
-#include <vector>
-#include <dlgeddef.hxx>
-#include "dlgedobj.hxx"
-#include "dlged.hxx"
-#include "dlgedmod.hxx"
-#include "dlgedpage.hxx"
-#include "dlgedview.hxx"
-#include "dlgedlist.hxx"
-#include <iderid.hxx>
-#include <localizationmgr.hxx>
-
-#include <dlgresid.hrc>
-#include <tools/resmgr.hxx>
-#include <tools/shl.hxx>
-#include <unotools/sharedunocomponent.hxx>
-#include <com/sun/star/awt/XTabControllerModel.hpp>
-#include <com/sun/star/awt/XUnoControlContainer.hpp>
-#include <com/sun/star/awt/XVclContainerPeer.hpp>
-#include <com/sun/star/awt/XWindow.hpp>
-#include <com/sun/star/beans/XPropertySet.hpp>
-#include <com/sun/star/beans/PropertyAttribute.hpp>
-#include <com/sun/star/script/XScriptEventsSupplier.hpp>
-#include <com/sun/star/container/XContainer.hpp>
-#include <com/sun/star/lang/XServiceInfo.hpp>
-#include <comphelper/processfactory.hxx>
-#include <comphelper/types.hxx>
-#include <vcl/svapp.hxx>
-
-#include <algorithm>
-#include <functional>
-#include <o3tl/compat_functional.hxx>
-
-using namespace ::com::sun::star;
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::script;
-using ::rtl::OUString;
-
-
-TYPEINIT1(DlgEdObj, SdrUnoObj);
-DBG_NAME(DlgEdObj);
-
-//----------------------------------------------------------------------------
-
-DlgEdObj::DlgEdObj()
-          :SdrUnoObj(String(), sal_False)
-          ,bIsListening(sal_False)
-          ,pDlgEdForm( NULL )
-{
-    DBG_CTOR(DlgEdObj, NULL);
-}
-
-//----------------------------------------------------------------------------
-
-DlgEdObj::DlgEdObj(const ::rtl::OUString& rModelName,
-                   const com::sun::star::uno::Reference< com::sun::star::lang::XMultiServiceFactory >& rxSFac)
-          :SdrUnoObj(rModelName, rxSFac, sal_False)
-          ,bIsListening(sal_False)
-          ,pDlgEdForm( NULL )
-{
-    DBG_CTOR(DlgEdObj, NULL);
-}
-
-//----------------------------------------------------------------------------
-
-DlgEdObj::~DlgEdObj()
-{
-    DBG_DTOR(DlgEdObj, NULL);
-
-    if ( isListening() )
-        EndListening();
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::SetPage(SdrPage* _pNewPage)
-{
-    // now set the page
-    SdrUnoObj::SetPage(_pNewPage);
-}
-
-//----------------------------------------------------------------------------
-
-namespace
-{
-    /** returns the DlgEdForm which the given DlgEdObj belongs to
-        (which might in fact be the object itself)
-
-        Failure to obtain the form will be reported with an assertion in the non-product
-        version.
-     */
-    bool lcl_getDlgEdForm( DlgEdObj* _pObject, DlgEdForm*& _out_pDlgEdForm )
-    {
-        _out_pDlgEdForm = dynamic_cast< DlgEdForm* >( _pObject );
-        if ( !_out_pDlgEdForm )
-            _out_pDlgEdForm = _pObject->GetDlgEdForm();
-        DBG_ASSERT( _out_pDlgEdForm, "lcl_getDlgEdForm: no form!" );
-        return ( _out_pDlgEdForm != NULL );
-    }
-}
-
-//----------------------------------------------------------------------------
-
-uno::Reference< awt::XControl > DlgEdObj::GetControl() const
-{
-    const DlgEdForm* pForm = GetDlgEdForm();
-    const DlgEditor* pEditor = pForm ? pForm->GetDlgEditor() : NULL;
-    SdrView* pView = pEditor ? pEditor->GetView() : NULL;
-    Window* pWindow = pEditor ? pEditor->GetWindow() : NULL;
-    OSL_ENSURE( ( pView && pWindow ) || !pForm, "DlgEdObj::GetControl: no view or no window!" );
-
-    uno::Reference< awt::XControl > xControl;
-    if ( pView && pWindow )
-        xControl = GetUnoControl( *pView, *pWindow );
-
-    return xControl;
-}
-
-//----------------------------------------------------------------------------
-
-bool DlgEdObj::TransformSdrToControlCoordinates(
-    sal_Int32 nXIn, sal_Int32 nYIn, sal_Int32 nWidthIn, sal_Int32 nHeightIn,
-    sal_Int32& nXOut, sal_Int32& nYOut, sal_Int32& nWidthOut, sal_Int32& nHeightOut )
-{
-    // input position and size
-    Size aPos( nXIn, nYIn );
-    Size aSize( nWidthIn, nHeightIn );
-
-    // form position
-    DlgEdForm* pForm = NULL;
-    if ( !lcl_getDlgEdForm( this, pForm ) )
-        return false;
-    Rectangle aFormRect = pForm->GetSnapRect();
-    Size aFormPos( aFormRect.Left(), aFormRect.Top() );
-
-    // convert 100th_mm to pixel
-    OutputDevice* pDevice = Application::GetDefaultDevice();
-    DBG_ASSERT( pDevice, "DlgEdObj::TransformSdrToControlCoordinates: missing default device!" );
-    if ( !pDevice )
-        return false;
-    aPos = pDevice->LogicToPixel( aPos, MapMode( MAP_100TH_MM ) );
-    aSize = pDevice->LogicToPixel( aSize, MapMode( MAP_100TH_MM ) );
-    aFormPos = pDevice->LogicToPixel( aFormPos, MapMode( MAP_100TH_MM ) );
-
-    // subtract form position
-    aPos.Width() -= aFormPos.Width();
-    aPos.Height() -= aFormPos.Height();
-
-    // take window borders into account
-    Reference< beans::XPropertySet > xPSetForm( pForm->GetUnoControlModel(), UNO_QUERY );
-    DBG_ASSERT( xPSetForm.is(), "DlgEdObj::TransformFormToSdrCoordinates: no form property set!" );
-    if ( !xPSetForm.is() )
-        return false;
-    bool bDecoration = true;
-    xPSetForm->getPropertyValue( DLGED_PROP_DECORATION ) >>= bDecoration;
-    if( bDecoration )
-    {
-        awt::DeviceInfo aDeviceInfo = pForm->getDeviceInfo();
-        aPos.Width() -= aDeviceInfo.LeftInset;
-        aPos.Height() -= aDeviceInfo.TopInset;
-    }
-
-    // convert pixel to logic units
-    aPos = pDevice->PixelToLogic( aPos, MAP_APPFONT );
-    aSize = pDevice->PixelToLogic( aSize, MAP_APPFONT );
-
-    // set out parameters
-    nXOut = aPos.Width();
-    nYOut = aPos.Height();
-    nWidthOut = aSize.Width();
-    nHeightOut = aSize.Height();
-
-    return true;
-}
-
-//----------------------------------------------------------------------------
-
-bool DlgEdObj::TransformSdrToFormCoordinates(
-    sal_Int32 nXIn, sal_Int32 nYIn, sal_Int32 nWidthIn, sal_Int32 nHeightIn,
-    sal_Int32& nXOut, sal_Int32& nYOut, sal_Int32& nWidthOut, sal_Int32& nHeightOut )
-{
-    // input position and size
-    Size aPos( nXIn, nYIn );
-    Size aSize( nWidthIn, nHeightIn );
-
-    // convert 100th_mm to pixel
-    OutputDevice* pDevice = Application::GetDefaultDevice();
-    DBG_ASSERT( pDevice, "DlgEdObj::TransformSdrToFormCoordinates: missing default device!" );
-    if ( !pDevice )
-        return false;
-    aPos = pDevice->LogicToPixel( aPos, MapMode( MAP_100TH_MM ) );
-    aSize = pDevice->LogicToPixel( aSize, MapMode( MAP_100TH_MM ) );
-
-    // take window borders into account
-    DlgEdForm* pForm = NULL;
-    if ( !lcl_getDlgEdForm( this, pForm ) )
-        return false;
-
-    // take window borders into account
-    Reference< beans::XPropertySet > xPSetForm( pForm->GetUnoControlModel(), UNO_QUERY );
-    DBG_ASSERT( xPSetForm.is(), "DlgEdObj::TransformFormToSdrCoordinates: no form property set!" );
-    if ( !xPSetForm.is() )
-        return false;
-    bool bDecoration = true;
-    xPSetForm->getPropertyValue( DLGED_PROP_DECORATION ) >>= bDecoration;
-    if( bDecoration )
-    {
-        awt::DeviceInfo aDeviceInfo = pForm->getDeviceInfo();
-        aSize.Width() -= aDeviceInfo.LeftInset + aDeviceInfo.RightInset;
-        aSize.Height() -= aDeviceInfo.TopInset + aDeviceInfo.BottomInset;
-    }
-    // convert pixel to logic units
-    aPos = pDevice->PixelToLogic( aPos, MAP_APPFONT );
-    aSize = pDevice->PixelToLogic( aSize, MAP_APPFONT );
-
-    // set out parameters
-    nXOut = aPos.Width();
-    nYOut = aPos.Height();
-    nWidthOut = aSize.Width();
-    nHeightOut = aSize.Height();
-
-    return true;
-}
-
-//----------------------------------------------------------------------------
-
-bool DlgEdObj::TransformControlToSdrCoordinates(
-    sal_Int32 nXIn, sal_Int32 nYIn, sal_Int32 nWidthIn, sal_Int32 nHeightIn,
-    sal_Int32& nXOut, sal_Int32& nYOut, sal_Int32& nWidthOut, sal_Int32& nHeightOut )
-{
-    // input position and size
-    Size aPos( nXIn, nYIn );
-    Size aSize( nWidthIn, nHeightIn );
-
-    // form position
-    DlgEdForm* pForm = NULL;
-    if ( !lcl_getDlgEdForm( this, pForm ) )
-        return false;
-
-    Reference< beans::XPropertySet > xPSetForm( pForm->GetUnoControlModel(), UNO_QUERY );
-    DBG_ASSERT( xPSetForm.is(), "DlgEdObj::TransformControlToSdrCoordinates: no form property set!" );
-    if ( !xPSetForm.is() )
-        return false;
-    sal_Int32 nFormX = 0, nFormY = 0, nFormWidth, nFormHeight;
-    xPSetForm->getPropertyValue( DLGED_PROP_POSITIONX ) >>= nFormX;
-    xPSetForm->getPropertyValue( DLGED_PROP_POSITIONY ) >>= nFormY;
-    xPSetForm->getPropertyValue( DLGED_PROP_WIDTH ) >>= nFormWidth;
-    xPSetForm->getPropertyValue( DLGED_PROP_HEIGHT ) >>= nFormHeight;
-    Size aFormPos( nFormX, nFormY );
-
-    // convert logic units to pixel
-    OutputDevice* pDevice = Application::GetDefaultDevice();
-    DBG_ASSERT( pDevice, "DlgEdObj::TransformControlToSdrCoordinates: missing default device!" );
-    if ( !pDevice )
-        return false;
-    aPos = pDevice->LogicToPixel( aPos, MAP_APPFONT );
-    aSize = pDevice->LogicToPixel( aSize, MAP_APPFONT );
-    aFormPos = pDevice->LogicToPixel( aFormPos, MAP_APPFONT );
-
-    // add form position
-    aPos.Width() += aFormPos.Width();
-    aPos.Height() += aFormPos.Height();
-
-    // take window borders into account
-    bool bDecoration = true;
-    xPSetForm->getPropertyValue( DLGED_PROP_DECORATION ) >>= bDecoration;
-    if( bDecoration )
-    {
-        awt::DeviceInfo aDeviceInfo = pForm->getDeviceInfo();
-        aPos.Width() += aDeviceInfo.LeftInset;
-        aPos.Height() += aDeviceInfo.TopInset;
-    }
-
-    // convert pixel to 100th_mm
-    aPos = pDevice->PixelToLogic( aPos, MapMode( MAP_100TH_MM ) );
-    aSize = pDevice->PixelToLogic( aSize, MapMode( MAP_100TH_MM ) );
-
-    // set out parameters
-    nXOut = aPos.Width();
-    nYOut = aPos.Height();
-    nWidthOut = aSize.Width();
-    nHeightOut = aSize.Height();
-
-    return true;
-}
-
-//----------------------------------------------------------------------------
-
-bool DlgEdObj::TransformFormToSdrCoordinates(
-    sal_Int32 nXIn, sal_Int32 nYIn, sal_Int32 nWidthIn, sal_Int32 nHeightIn,
-    sal_Int32& nXOut, sal_Int32& nYOut, sal_Int32& nWidthOut, sal_Int32& nHeightOut )
-{
-    // input position and size
-    Size aPos( nXIn, nYIn );
-    Size aSize( nWidthIn, nHeightIn );
-
-    // convert logic units to pixel
-    OutputDevice* pDevice = Application::GetDefaultDevice();
-    DBG_ASSERT( pDevice, "DlgEdObj::TransformFormToSdrCoordinates: missing default device!" );
-    if ( !pDevice )
-        return false;
-
-    // take window borders into account
-    DlgEdForm* pForm = NULL;
-    if ( !lcl_getDlgEdForm( this, pForm ) )
-        return false;
-
-    aPos = pDevice->LogicToPixel( aPos, MAP_APPFONT );
-    aSize = pDevice->LogicToPixel( aSize, MAP_APPFONT );
-
-    // take window borders into account
-    Reference< beans::XPropertySet > xPSetForm( pForm->GetUnoControlModel(), UNO_QUERY );
-    DBG_ASSERT( xPSetForm.is(), "DlgEdObj::TransformFormToSdrCoordinates: no form property set!" );
-    if ( !xPSetForm.is() )
-        return false;
-    bool bDecoration = true;
-    xPSetForm->getPropertyValue( DLGED_PROP_DECORATION ) >>= bDecoration;
-    if( bDecoration )
-    {
-        awt::DeviceInfo aDeviceInfo = pForm->getDeviceInfo();
-        aSize.Width() += aDeviceInfo.LeftInset + aDeviceInfo.RightInset;
-        aSize.Height() += aDeviceInfo.TopInset + aDeviceInfo.BottomInset;
-    }
-
-    // convert pixel to 100th_mm
-    aPos = pDevice->PixelToLogic( aPos, MapMode( MAP_100TH_MM ) );
-    aSize = pDevice->PixelToLogic( aSize, MapMode( MAP_100TH_MM ) );
-
-    // set out parameters
-    nXOut = aPos.Width();
-    nYOut = aPos.Height();
-    nWidthOut = aSize.Width();
-    nHeightOut = aSize.Height();
-
-    return true;
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::SetRectFromProps()
-{
-    // get control position and size from properties
-    Reference< beans::XPropertySet > xPSet( GetUnoControlModel(), UNO_QUERY );
-    if ( xPSet.is() )
-    {
-        sal_Int32 nXIn = 0, nYIn = 0, nWidthIn = 0, nHeightIn = 0;
-        xPSet->getPropertyValue( DLGED_PROP_POSITIONX ) >>= nXIn;
-        xPSet->getPropertyValue( DLGED_PROP_POSITIONY ) >>= nYIn;
-        xPSet->getPropertyValue( DLGED_PROP_WIDTH ) >>= nWidthIn;
-        xPSet->getPropertyValue( DLGED_PROP_HEIGHT ) >>= nHeightIn;
-
-        // transform coordinates
-        sal_Int32 nXOut, nYOut, nWidthOut, nHeightOut;
-        if ( TransformControlToSdrCoordinates( nXIn, nYIn, nWidthIn, nHeightIn, nXOut, nYOut, nWidthOut, nHeightOut ) )
-        {
-            // set rectangle position and size
-            Point aPoint( nXOut, nYOut );
-            Size aSize( nWidthOut, nHeightOut );
-            SetSnapRect( Rectangle( aPoint, aSize ) );
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::SetPropsFromRect()
-{
-    // get control position and size from rectangle
-    Rectangle aRect_ = GetSnapRect();
-    sal_Int32 nXIn = aRect_.Left();
-    sal_Int32 nYIn = aRect_.Top();
-    sal_Int32 nWidthIn = aRect_.GetWidth();
-    sal_Int32 nHeightIn = aRect_.GetHeight();
-
-    // transform coordinates
-    sal_Int32 nXOut, nYOut, nWidthOut, nHeightOut;
-    if ( TransformSdrToControlCoordinates( nXIn, nYIn, nWidthIn, nHeightIn, nXOut, nYOut, nWidthOut, nHeightOut ) )
-    {
-        // set properties
-        Reference< beans::XPropertySet > xPSet( GetUnoControlModel(), UNO_QUERY );
-        if ( xPSet.is() )
-        {
-            Any aValue;
-            aValue <<= nXOut;
-            xPSet->setPropertyValue( DLGED_PROP_POSITIONX, aValue );
-            aValue <<= nYOut;
-            xPSet->setPropertyValue( DLGED_PROP_POSITIONY, aValue );
-            aValue <<= nWidthOut;
-            xPSet->setPropertyValue( DLGED_PROP_WIDTH, aValue );
-            aValue <<= nHeightOut;
-            xPSet->setPropertyValue( DLGED_PROP_HEIGHT, aValue );
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::PositionAndSizeChange( const beans::PropertyChangeEvent& evt )
-{
-    DlgEdPage* pPage_ = 0;
-    if ( pDlgEdForm )
-    {
-        DlgEditor* pEditor = pDlgEdForm->GetDlgEditor();
-        if ( pEditor )
-            pPage_ = pEditor->GetPage();
-    }
-    DBG_ASSERT( pPage_, "DlgEdObj::PositionAndSizeChange: no page!" );
-    if ( pPage_ )
-    {
-        sal_Int32 nPageXIn = 0;
-        sal_Int32 nPageYIn = 0;
-        Size aPageSize = pPage_->GetSize();
-        sal_Int32 nPageWidthIn = aPageSize.Width();
-        sal_Int32 nPageHeightIn = aPageSize.Height();
-        sal_Int32 nPageX, nPageY, nPageWidth, nPageHeight;
-        if ( TransformSdrToControlCoordinates( nPageXIn, nPageYIn, nPageWidthIn, nPageHeightIn, nPageX, nPageY, nPageWidth, nPageHeight ) )
-        {
-            Reference< beans::XPropertySet > xPSet( GetUnoControlModel(), UNO_QUERY );
-            if ( xPSet.is() )
-            {
-                sal_Int32 nX = 0, nY = 0, nWidth = 0, nHeight = 0;
-                xPSet->getPropertyValue( DLGED_PROP_POSITIONX ) >>= nX;
-                xPSet->getPropertyValue( DLGED_PROP_POSITIONY ) >>= nY;
-                xPSet->getPropertyValue( DLGED_PROP_WIDTH ) >>= nWidth;
-                xPSet->getPropertyValue( DLGED_PROP_HEIGHT ) >>= nHeight;
-
-                sal_Int32 nValue = 0;
-                evt.NewValue >>= nValue;
-                sal_Int32 nNewValue = nValue;
-
-                if ( evt.PropertyName == DLGED_PROP_POSITIONX )
-                {
-                    if ( nNewValue + nWidth > nPageX + nPageWidth )
-                        nNewValue = nPageX + nPageWidth - nWidth;
-                    if ( nNewValue < nPageX )
-                        nNewValue = nPageX;
-                }
-                else if ( evt.PropertyName == DLGED_PROP_POSITIONY )
-                {
-                    if ( nNewValue + nHeight > nPageY + nPageHeight )
-                        nNewValue = nPageY + nPageHeight - nHeight;
-                    if ( nNewValue < nPageY )
-                        nNewValue = nPageY;
-                }
-                else if ( evt.PropertyName == DLGED_PROP_WIDTH )
-                {
-                    if ( nX + nNewValue > nPageX + nPageWidth )
-                        nNewValue = nPageX + nPageWidth - nX;
-                    if ( nNewValue < 1 )
-                        nNewValue = 1;
-                }
-                else if ( evt.PropertyName == DLGED_PROP_HEIGHT )
-                {
-                    if ( nY + nNewValue > nPageY + nPageHeight )
-                        nNewValue = nPageY + nPageHeight - nY;
-                    if ( nNewValue < 1 )
-                        nNewValue = 1;
-                }
-
-                if ( nNewValue != nValue )
-                {
-                    Any aNewValue;
-                    aNewValue <<= nNewValue;
-                    EndListening( sal_False );
-                    xPSet->setPropertyValue( evt.PropertyName, aNewValue );
-                    StartListening();
-                }
-            }
-        }
-    }
-
-    SetRectFromProps();
-}
-
-//----------------------------------------------------------------------------
-
-void SAL_CALL DlgEdObj::NameChange( const  ::com::sun::star::beans::PropertyChangeEvent& evt ) throw( ::com::sun::star::uno::RuntimeException)
-{
-    // get old name
-    ::rtl::OUString aOldName;
-    evt.OldValue >>= aOldName;
-
-    // get new name
-    ::rtl::OUString aNewName;
-    evt.NewValue >>= aNewName;
-
-    if ( !aNewName.equals(aOldName) )
-    {
-        Reference< container::XNameAccess > xNameAcc((GetDlgEdForm()->GetUnoControlModel()), UNO_QUERY);
-        if ( xNameAcc.is() && xNameAcc->hasByName(aOldName) )
-        {
-            if ( !xNameAcc->hasByName(aNewName) && aNewName.getLength() != 0 )
-            {
-                // remove the control by the old name and insert the control by the new name in the container
-                Reference< container::XNameContainer > xCont(xNameAcc, UNO_QUERY );
-                if ( xCont.is() )
-                {
-                    Reference< awt::XControlModel > xCtrl(GetUnoControlModel(), UNO_QUERY);
-                    Any aAny;
-                    aAny <<= xCtrl;
-                    xCont->removeByName( aOldName );
-                    xCont->insertByName( aNewName , aAny );
-
-                    DlgEditor* pEditor;
-                    if ( ISA(DlgEdForm) )
-                        pEditor = ((DlgEdForm*)this)->GetDlgEditor();
-                    else
-                        pEditor = GetDlgEdForm()->GetDlgEditor();
-                    LocalizationMgr::renameControlResourceIDsForEditorObject( pEditor, aAny, aNewName );
-                }
-            }
-            else
-            {
-                // set old name property
-                EndListening(sal_False);
-                Reference< beans::XPropertySet >  xPSet(GetUnoControlModel(), UNO_QUERY);
-                Any aName;
-                aName <<= aOldName;
-                xPSet->setPropertyValue( DLGED_PROP_NAME, aName );
-                StartListening();
-            }
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-sal_Int32 DlgEdObj::GetStep() const
-{
-    // get step property
-    sal_Int32 nStep = 0;
-    uno::Reference< beans::XPropertySet >  xPSet( GetUnoControlModel(), uno::UNO_QUERY );
-    if (xPSet.is())
-    {
-        xPSet->getPropertyValue( DLGED_PROP_STEP ) >>= nStep;
-    }
-    return nStep;
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::UpdateStep()
-{
-    sal_Int32 nCurStep = GetDlgEdForm()->GetStep();
-    sal_Int32 nStep = GetStep();
-
-    SdrLayerAdmin& rLayerAdmin = GetModel()->GetLayerAdmin();
-    SdrLayerID nHiddenLayerId   = rLayerAdmin.GetLayerID( String( RTL_CONSTASCII_USTRINGPARAM( "HiddenLayer" ) ), sal_False );
-    SdrLayerID nControlLayerId   = rLayerAdmin.GetLayerID( rLayerAdmin.GetControlLayerName(), sal_False );
-
-    if( nCurStep )
-    {
-        if ( nStep && (nStep != nCurStep) )
-        {
-            SetLayer( nHiddenLayerId );
-        }
-        else
-        {
-            SetLayer( nControlLayerId );
-        }
-    }
-    else
-    {
-        SetLayer( nControlLayerId );
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::TabIndexChange( const beans::PropertyChangeEvent& evt ) throw (RuntimeException)
-{
-    DlgEdForm* pForm = GetDlgEdForm();
-    if ( pForm )
-    {
-        // stop listening with all children
-        ::std::vector<DlgEdObj*> aChildList = pForm->GetChilds();
-        ::std::vector<DlgEdObj*>::iterator aIter;
-        for ( aIter = aChildList.begin() ; aIter != aChildList.end() ; ++aIter )
-        {
-            (*aIter)->EndListening( sal_False );
-        }
-
-        Reference< container::XNameAccess > xNameAcc( pForm->GetUnoControlModel() , UNO_QUERY );
-        if ( xNameAcc.is() )
-        {
-            // get sequence of control names
-            Sequence< ::rtl::OUString > aNames = xNameAcc->getElementNames();
-            const ::rtl::OUString* pNames = aNames.getConstArray();
-            sal_Int32 nCtrls = aNames.getLength();
-            sal_Int16 i;
-
-            // create a map of tab indices and control names, sorted by tab index
-            IndexToNameMap aIndexToNameMap;
-            for ( i = 0; i < nCtrls; ++i )
-            {
-                // get control name
-                ::rtl::OUString aName( pNames[i] );
-
-                // get tab index
-                sal_Int16 nTabIndex = -1;
-                Any aCtrl = xNameAcc->getByName( aName );
-                Reference< beans::XPropertySet > xPSet;
-                   aCtrl >>= xPSet;
-                if ( xPSet.is() && xPSet == Reference< beans::XPropertySet >( evt.Source, UNO_QUERY ) )
-                    evt.OldValue >>= nTabIndex;
-                else if ( xPSet.is() )
-                    xPSet->getPropertyValue( DLGED_PROP_TABINDEX ) >>= nTabIndex;
-
-                // insert into map
-                aIndexToNameMap.insert( IndexToNameMap::value_type( nTabIndex, aName ) );
-            }
-
-            // create a helper list of control names, sorted by tab index
-            ::std::vector< ::rtl::OUString > aNameList( aIndexToNameMap.size() );
-            ::std::transform(
-                    aIndexToNameMap.begin(), aIndexToNameMap.end(),
-                    aNameList.begin(),
-                    ::o3tl::select2nd< IndexToNameMap::value_type >( )
-                );
-
-            // check tab index
-            sal_Int16 nOldTabIndex = 0;
-            evt.OldValue >>= nOldTabIndex;
-            sal_Int16 nNewTabIndex = 0;
-            evt.NewValue >>= nNewTabIndex;
-            if ( nNewTabIndex < 0 )
-                nNewTabIndex = 0;
-            else if ( nNewTabIndex > nCtrls - 1 )
-                nNewTabIndex = sal::static_int_cast<sal_Int16>( nCtrls - 1 );
-
-            // reorder helper list
-            ::rtl::OUString aCtrlName = aNameList[nOldTabIndex];
-            aNameList.erase( aNameList.begin() + nOldTabIndex );
-            aNameList.insert( aNameList.begin() + nNewTabIndex , aCtrlName );
-
-            // set new tab indices
-            for ( i = 0; i < nCtrls; ++i )
-            {
-                Any aCtrl = xNameAcc->getByName( aNameList[i] );
-                Reference< beans::XPropertySet > xPSet;
-                   aCtrl >>= xPSet;
-                if ( xPSet.is() )
-                {
-                    Any aTabIndex;
-                    aTabIndex <<= (sal_Int16) i;
-                    xPSet->setPropertyValue( DLGED_PROP_TABINDEX, aTabIndex );
-                }
-            }
-
-            // reorder objects in drawing page
-            GetModel()->GetPage(0)->SetObjectOrdNum( nOldTabIndex + 1, nNewTabIndex + 1 );
-
-            // #110559#
-            pForm->UpdateTabOrderAndGroups();
-        }
-
-        // start listening with all children
-        for ( aIter = aChildList.begin() ; aIter != aChildList.end() ; ++aIter )
-        {
-            (*aIter)->StartListening();
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-sal_Bool DlgEdObj::supportsService( const sal_Char* _pServiceName ) const
-{
-    sal_Bool bSupports = sal_False;
-
-    Reference< lang::XServiceInfo > xServiceInfo( GetUnoControlModel() , UNO_QUERY );
-        // TODO: cache xServiceInfo as member?
-    if ( xServiceInfo.is() )
-        bSupports = xServiceInfo->supportsService( ::rtl::OUString::createFromAscii( _pServiceName ) );
-
-    return bSupports;
-}
-
-//----------------------------------------------------------------------------
-
-::rtl::OUString DlgEdObj::GetDefaultName() const
-{
-    sal_uInt16 nResId = 0;
-    ::rtl::OUString aDefaultName;
-    if ( supportsService( "com.sun.star.awt.UnoControlDialogModel" ) )
-    {
-        nResId = RID_STR_CLASS_DIALOG;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlButtonModel" ) )
-    {
-        nResId = RID_STR_CLASS_BUTTON;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlRadioButtonModel" ) )
-    {
-        nResId = RID_STR_CLASS_RADIOBUTTON;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlCheckBoxModel" ) )
-    {
-        nResId = RID_STR_CLASS_CHECKBOX;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlListBoxModel" ) )
-    {
-        nResId = RID_STR_CLASS_LISTBOX;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlComboBoxModel" ) )
-    {
-        nResId = RID_STR_CLASS_COMBOBOX;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlGroupBoxModel" ) )
-    {
-        nResId = RID_STR_CLASS_GROUPBOX;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlEditModel" ) )
-    {
-        nResId = RID_STR_CLASS_EDIT;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlFixedTextModel" ) )
-    {
-        nResId = RID_STR_CLASS_FIXEDTEXT;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlImageControlModel" ) )
-    {
-        nResId = RID_STR_CLASS_IMAGECONTROL;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlProgressBarModel" ) )
-    {
-        nResId = RID_STR_CLASS_PROGRESSBAR;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlScrollBarModel" ) )
-    {
-        nResId = RID_STR_CLASS_SCROLLBAR;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlFixedLineModel" ) )
-    {
-        nResId = RID_STR_CLASS_FIXEDLINE;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlDateFieldModel" ) )
-    {
-        nResId = RID_STR_CLASS_DATEFIELD;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlTimeFieldModel" ) )
-    {
-        nResId = RID_STR_CLASS_TIMEFIELD;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlNumericFieldModel" ) )
-    {
-        nResId = RID_STR_CLASS_NUMERICFIELD;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlCurrencyFieldModel" ) )
-    {
-        nResId = RID_STR_CLASS_CURRENCYFIELD;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlFormattedFieldModel" ) )
-    {
-        nResId = RID_STR_CLASS_FORMATTEDFIELD;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlPatternFieldModel" ) )
-    {
-        nResId = RID_STR_CLASS_PATTERNFIELD;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlFileControlModel" ) )
-    {
-        nResId = RID_STR_CLASS_FILECONTROL;
-    }
-    else if ( supportsService( "com.sun.star.awt.tree.TreeControlModel" ) )
-    {
-        nResId = RID_STR_CLASS_TREECONTROL;
-    }
-
-    else
-    {
-        nResId = RID_STR_CLASS_CONTROL;
-    }
-
-    if (nResId)
-    {
-        aDefaultName = ::rtl::OUString( String(IDEResId(nResId)) );
-    }
-
-    return aDefaultName;
-}
-
-//----------------------------------------------------------------------------
-
-::rtl::OUString DlgEdObj::GetUniqueName() const
-{
-    ::rtl::OUString aUniqueName;
-    uno::Reference< container::XNameAccess > xNameAcc((GetDlgEdForm()->GetUnoControlModel()), uno::UNO_QUERY);
-
-    if ( xNameAcc.is() )
-    {
-        sal_Int32 n = 0;
-        ::rtl::OUString aDefaultName = GetDefaultName();
-
-        do
-        {
-            aUniqueName = aDefaultName + ::rtl::OUString::valueOf(++n);
-        }	while (xNameAcc->hasByName(aUniqueName));
-    }
-
-    return aUniqueName;
-}
-
-//----------------------------------------------------------------------------
-
-sal_uInt32 DlgEdObj::GetObjInventor()   const
-{
-    return DlgInventor;
-}
-
-//----------------------------------------------------------------------------
-
-sal_uInt16 DlgEdObj::GetObjIdentifier() const
-{
-    if ( supportsService( "com.sun.star.awt.UnoControlDialogModel" ))
-    {
-        return OBJ_DLG_DIALOG;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlButtonModel" ))
-    {
-        return OBJ_DLG_PUSHBUTTON;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlRadioButtonModel" ))
-    {
-        return OBJ_DLG_RADIOBUTTON;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlCheckBoxModel" ))
-    {
-        return OBJ_DLG_CHECKBOX;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlListBoxModel" ))
-    {
-        return OBJ_DLG_LISTBOX;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlComboBoxModel" ))
-    {
-        return OBJ_DLG_COMBOBOX;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlGroupBoxModel" ))
-    {
-        return OBJ_DLG_GROUPBOX;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlEditModel" ))
-    {
-        return OBJ_DLG_EDIT;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlFixedTextModel" ))
-    {
-        return OBJ_DLG_FIXEDTEXT;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlImageControlModel" ))
-    {
-        return OBJ_DLG_IMAGECONTROL;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlProgressBarModel" ))
-    {
-        return OBJ_DLG_PROGRESSBAR;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlScrollBarModel" ))
-    {
-        return OBJ_DLG_HSCROLLBAR;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlFixedLineModel" ))
-    {
-        return OBJ_DLG_HFIXEDLINE;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlDateFieldModel" ))
-    {
-        return OBJ_DLG_DATEFIELD;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlTimeFieldModel" ))
-    {
-        return OBJ_DLG_TIMEFIELD;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlNumericFieldModel" ))
-    {
-        return OBJ_DLG_NUMERICFIELD;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlCurrencyFieldModel" ))
-    {
-        return OBJ_DLG_CURRENCYFIELD;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlFormattedFieldModel" ))
-    {
-        return OBJ_DLG_FORMATTEDFIELD;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlPatternFieldModel" ))
-    {
-        return OBJ_DLG_PATTERNFIELD;
-    }
-    else if ( supportsService( "com.sun.star.awt.UnoControlFileControlModel" ))
-    {
-        return OBJ_DLG_FILECONTROL;
-    }
-    else if ( supportsService( "com.sun.star.awt.tree.TreeControlModel" ))
-    {
-        return OBJ_DLG_TREECONTROL;
-    }
-    else
-    {
-        return OBJ_DLG_CONTROL;
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::clonedFrom(const DlgEdObj* _pSource)
-{
-    // set parent form
-    pDlgEdForm = _pSource->pDlgEdForm;
-
-    // add child to parent form
-    pDlgEdForm->AddChild( this );
-
-    Reference< beans::XPropertySet > xPSet( GetUnoControlModel(), UNO_QUERY );
-    if ( xPSet.is() )
-    {
-        // set new name
-        ::rtl::OUString aOUniqueName( GetUniqueName() );
-        Any aUniqueName;
-        aUniqueName <<= aOUniqueName;
-        xPSet->setPropertyValue( DLGED_PROP_NAME, aUniqueName );
-
-        Reference< container::XNameContainer > xCont( GetDlgEdForm()->GetUnoControlModel() , UNO_QUERY );
-        if ( xCont.is() )
-        {
-            // set tabindex
-               Sequence< OUString > aNames = xCont->getElementNames();
-            Any aTabIndex;
-            aTabIndex <<= (sal_Int16) aNames.getLength();
-            xPSet->setPropertyValue( DLGED_PROP_TABINDEX, aTabIndex );
-
-            // insert control model in dialog model
-            Reference< awt::XControlModel > xCtrl( xPSet , UNO_QUERY );
-            Any aCtrl;
-            aCtrl <<= xCtrl;
-            xCont->insertByName( aOUniqueName , aCtrl );
-
-            // #110559#
-            pDlgEdForm->UpdateTabOrderAndGroups();
-        }
-    }
-
-    // start listening
-    StartListening();
-}
-
-//----------------------------------------------------------------------------
-
-DlgEdObj* DlgEdObj::Clone() const
-{
-    DlgEdObj* pDlgEdObj = CloneHelper< DlgEdObj >();
-    DBG_ASSERT( pDlgEdObj != NULL, "DlgEdObj::Clone: invalid clone!" );
-    if ( pDlgEdObj )
-        pDlgEdObj->clonedFrom( this );
-
-    return pDlgEdObj;
-}
-
-//----------------------------------------------------------------------------
-
-SdrObject* DlgEdObj::getFullDragClone() const
-{
-    // no need to really add the clone for dragging, it's a temporary
-    // object
-    SdrObject* pObj = new SdrUnoObj(String());
-    *pObj = *((const SdrUnoObj*)this);
-
-    return pObj;
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::NbcMove( const Size& rSize )
-{
-    SdrUnoObj::NbcMove( rSize );
-
-    // stop listening
-    EndListening(sal_False);
-
-    // set geometry properties
-    SetPropsFromRect();
-
-    // start listening
-    StartListening();
-
-    // dialog model changed
-    GetDlgEdForm()->GetDlgEditor()->SetDialogModelChanged(sal_True);
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::NbcResize(const Point& rRef, const Fraction& xFract, const Fraction& yFract)
-{
-    SdrUnoObj::NbcResize( rRef, xFract, yFract );
-
-    // stop listening
-    EndListening(sal_False);
-
-    // set geometry properties
-    SetPropsFromRect();
-
-    // start listening
-    StartListening();
-
-    // dialog model changed
-    GetDlgEdForm()->GetDlgEditor()->SetDialogModelChanged(sal_True);
-}
-
-//----------------------------------------------------------------------------
-
-bool DlgEdObj::EndCreate(SdrDragStat& rStat, SdrCreateCmd eCmd)
-{
-    bool bResult = SdrUnoObj::EndCreate(rStat, eCmd);
-
-    SetDefaults();
-    StartListening();
-
-    return bResult;
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::SetDefaults()
-{
-    // set parent form
-    pDlgEdForm = ((DlgEdPage*)GetPage())->GetDlgEdForm();
-
-    if ( pDlgEdForm )
-    {
-        // add child to parent form
-        pDlgEdForm->AddChild( this );
-
-        Reference< beans::XPropertySet > xPSet( GetUnoControlModel(), UNO_QUERY );
-        if ( xPSet.is() )
-        {
-            // get unique name
-            ::rtl::OUString aOUniqueName( GetUniqueName() );
-
-            // set name property
-            Any aUniqueName;
-            aUniqueName <<= aOUniqueName;
-            xPSet->setPropertyValue( DLGED_PROP_NAME, aUniqueName );
-
-            // set labels
-            if ( supportsService( "com.sun.star.awt.UnoControlButtonModel" ) ||
-                supportsService( "com.sun.star.awt.UnoControlRadioButtonModel" ) ||
-                supportsService( "com.sun.star.awt.UnoControlCheckBoxModel" ) ||
-                supportsService( "com.sun.star.awt.UnoControlGroupBoxModel" ) ||
-                supportsService( "com.sun.star.awt.UnoControlFixedTextModel" ) )
-            {
-                xPSet->setPropertyValue( DLGED_PROP_LABEL, aUniqueName );
-            }
-
-            // set number formats supplier for formatted field
-            if ( supportsService( "com.sun.star.awt.UnoControlFormattedFieldModel" ) )
-            {
-                Reference< util::XNumberFormatsSupplier > xSupplier = GetDlgEdForm()->GetDlgEditor()->GetNumberFormatsSupplier();
-                if ( xSupplier.is() )
-                {
-                    Any aSupplier;
-                    aSupplier <<= xSupplier;
-                    xPSet->setPropertyValue( DLGED_PROP_FORMATSSUPPLIER, aSupplier );
-                }
-            }
-
-            // set geometry properties
-            SetPropsFromRect();
-
-            Reference< container::XNameContainer > xCont( GetDlgEdForm()->GetUnoControlModel() , UNO_QUERY );
-            if ( xCont.is() )
-            {
-                // set tabindex
-                   Sequence< OUString > aNames = xCont->getElementNames();
-                uno::Any aTabIndex;
-                aTabIndex <<= (sal_Int16) aNames.getLength();
-                xPSet->setPropertyValue( DLGED_PROP_TABINDEX, aTabIndex );
-
-                // set step
-                Reference< beans::XPropertySet > xPSetForm( xCont, UNO_QUERY );
-                if ( xPSetForm.is() )
-                {
-                    Any aStep = xPSetForm->getPropertyValue( DLGED_PROP_STEP );
-                    xPSet->setPropertyValue( DLGED_PROP_STEP, aStep );
-                }
-
-                // insert control model in dialog model
-                Reference< awt::XControlModel > xCtrl( xPSet , UNO_QUERY );
-                Any aAny;
-                aAny <<= xCtrl;
-                xCont->insertByName( aOUniqueName , aAny );
-
-                DlgEditor* pEditor;
-                if ( ISA(DlgEdForm) )
-                    pEditor = ((DlgEdForm*)this)->GetDlgEditor();
-                else
-                    pEditor = GetDlgEdForm()->GetDlgEditor();
-                LocalizationMgr::setControlResourceIDsForNewEditorObject( pEditor, aAny, aOUniqueName );
-
-                // #110559#
-                pDlgEdForm->UpdateTabOrderAndGroups();
-            }
-        }
-
-        // dialog model changed
-        pDlgEdForm->GetDlgEditor()->SetDialogModelChanged( sal_True );
-    }
-}
-
-//----------------------------------------------------------------------------
-
-IMPL_LINK(DlgEdObj, OnCreate, void*, EMPTYTAG)
-{
-    (void)EMPTYTAG;
-    /*
-    if (pTempView)
-        pTempView->ObjectCreated(this);
-    */
-    return 0;
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::StartListening()
-{
-    DBG_ASSERT(!isListening(), "DlgEdObj::StartListening: already listening!");
-
-    if (!isListening())
-    {
-        bIsListening = sal_True;
-
-        // XPropertyChangeListener
-        Reference< XPropertySet > xControlModel( GetUnoControlModel() , UNO_QUERY );
-        if (!m_xPropertyChangeListener.is() && xControlModel.is())
-        {
-            // create listener
-            m_xPropertyChangeListener = static_cast< ::com::sun::star::beans::XPropertyChangeListener*>( new DlgEdPropListenerImpl( (DlgEdObj*)this ) );
-
-            // register listener to properties
-            xControlModel->addPropertyChangeListener( ::rtl::OUString() , m_xPropertyChangeListener );
-        }
-
-        // XContainerListener
-        Reference< XScriptEventsSupplier > xEventsSupplier( GetUnoControlModel() , UNO_QUERY );
-        if( !m_xContainerListener.is() && xEventsSupplier.is() )
-        {
-            // create listener
-            m_xContainerListener = static_cast< ::com::sun::star::container::XContainerListener*>( new DlgEdEvtContListenerImpl( (DlgEdObj*)this ) );
-
-            // register listener to script event container
-            Reference< XNameContainer > xEventCont = xEventsSupplier->getEvents();
-            DBG_ASSERT(xEventCont.is(), "DlgEdObj::StartListening: control model has no script event container!");
-            Reference< XContainer > xCont( xEventCont , UNO_QUERY );
-            if (xCont.is())
-                xCont->addContainerListener( m_xContainerListener );
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::EndListening(sal_Bool bRemoveListener)
-{
-    DBG_ASSERT(isListening(), "DlgEdObj::EndListening: not listening currently!");
-
-    if (isListening())
-    {
-        bIsListening = sal_False;
-
-        if (bRemoveListener)
-        {
-            // XPropertyChangeListener
-            Reference< XPropertySet > xControlModel(GetUnoControlModel(), UNO_QUERY);
-            if ( m_xPropertyChangeListener.is() && xControlModel.is() )
-            {
-                // remove listener
-                xControlModel->removePropertyChangeListener( ::rtl::OUString() , m_xPropertyChangeListener );
-            }
-            m_xPropertyChangeListener.clear();
-
-            // XContainerListener
-            Reference< XScriptEventsSupplier > xEventsSupplier( GetUnoControlModel() , UNO_QUERY );
-            if( m_xContainerListener.is() && xEventsSupplier.is() )
-            {
-                // remove listener
-                Reference< XNameContainer > xEventCont = xEventsSupplier->getEvents();
-                DBG_ASSERT(xEventCont.is(), "DlgEdObj::EndListening: control model has no script event container!");
-                Reference< XContainer > xCont( xEventCont , UNO_QUERY );
-                if (xCont.is())
-                    xCont->removeContainerListener( m_xContainerListener );
-            }
-            m_xContainerListener.clear();
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void SAL_CALL DlgEdObj::_propertyChange( const  ::com::sun::star::beans::PropertyChangeEvent& evt ) throw( ::com::sun::star::uno::RuntimeException)
-{
-    if (isListening())
-    {
-        DlgEdForm* pRealDlgEdForm = dynamic_cast< DlgEdForm* >(this);
-        if( pRealDlgEdForm == 0 )
-            pRealDlgEdForm = GetDlgEdForm();
-
-        DlgEditor* pDlgEditor = pRealDlgEdForm ? pRealDlgEdForm->GetDlgEditor() : 0;
-
-        if( !pDlgEditor || pDlgEditor->isInPaint() )
-            return;
-
-        // dialog model changed
-        pDlgEditor->SetDialogModelChanged(sal_True);
-
-        // update position and size
-        if ( evt.PropertyName == DLGED_PROP_POSITIONX || evt.PropertyName == DLGED_PROP_POSITIONY ||
-             evt.PropertyName == DLGED_PROP_WIDTH || evt.PropertyName == DLGED_PROP_HEIGHT ||
-             evt.PropertyName == DLGED_PROP_DECORATION )
-        {
-            PositionAndSizeChange( evt );
-
-            if ( evt.PropertyName == DLGED_PROP_DECORATION )
-            {
-                if ( ISA(DlgEdForm) )
-                    ((DlgEdForm*)this)->GetDlgEditor()->ResetDialog();
-                else
-                    GetDlgEdForm()->GetDlgEditor()->ResetDialog();
-            }
-        }
-        // change name of control in dialog model
-        else if ( evt.PropertyName == DLGED_PROP_NAME )
-        {
-            if ( !ISA(DlgEdForm) )
-            {
-                NameChange(evt);
-            }
-        }
-        // update step
-        else if ( evt.PropertyName == DLGED_PROP_STEP )
-        {
-            UpdateStep();
-        }
-        // change tabindex
-        else if ( evt.PropertyName == DLGED_PROP_TABINDEX )
-        {
-            if ( !ISA(DlgEdForm) )
-            {
-                TabIndexChange(evt);
-            }
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void SAL_CALL DlgEdObj::_elementInserted(const ::com::sun::star::container::ContainerEvent& ) throw(::com::sun::star::uno::RuntimeException)
-{
-    if (isListening())
-    {
-        // dialog model changed
-        if ( ISA(DlgEdForm) )
-        {
-            ((DlgEdForm*)this)->GetDlgEditor()->SetDialogModelChanged(sal_True);
-        }
-        else
-        {
-            GetDlgEdForm()->GetDlgEditor()->SetDialogModelChanged(sal_True);
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void SAL_CALL DlgEdObj::_elementReplaced(const ::com::sun::star::container::ContainerEvent& ) throw(::com::sun::star::uno::RuntimeException)
-{
-    if (isListening())
-    {
-        // dialog model changed
-        if ( ISA(DlgEdForm) )
-        {
-            ((DlgEdForm*)this)->GetDlgEditor()->SetDialogModelChanged(sal_True);
-        }
-        else
-        {
-            GetDlgEdForm()->GetDlgEditor()->SetDialogModelChanged(sal_True);
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void SAL_CALL DlgEdObj::_elementRemoved(const ::com::sun::star::container::ContainerEvent& ) throw(::com::sun::star::uno::RuntimeException)
-{
-    if (isListening())
-    {
-        // dialog model changed
-        if ( ISA(DlgEdForm) )
-        {
-            ((DlgEdForm*)this)->GetDlgEditor()->SetDialogModelChanged(sal_True);
-        }
-        else
-        {
-            GetDlgEdForm()->GetDlgEditor()->SetDialogModelChanged(sal_True);
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdObj::SetLayer(SdrLayerID nLayer)
-{
-    SdrLayerID nOldLayer = GetLayer();
-
-    if ( nLayer != nOldLayer )
-    {
-        SdrUnoObj::SetLayer( nLayer );
-
-        DlgEdHint aHint( DLGED_HINT_LAYERCHANGED, this );
-        GetDlgEdForm()->GetDlgEditor()->Broadcast( aHint );
-    }
-}
-
-//----------------------------------------------------------------------------
-
-TYPEINIT1(DlgEdForm, DlgEdObj);
-DBG_NAME(DlgEdForm);
-
-//----------------------------------------------------------------------------
-
-DlgEdForm::DlgEdForm()
-          :DlgEdObj()
-{
-    DBG_CTOR(DlgEdForm, NULL);
-}
-
-//----------------------------------------------------------------------------
-
-DlgEdForm::~DlgEdForm()
-{
-    DBG_DTOR(DlgEdForm, NULL);
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::SetDlgEditor( DlgEditor* pEditor )
-{
-    pDlgEditor = pEditor;
-    ImplInvalidateDeviceInfo();
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::ImplInvalidateDeviceInfo()
-{
-    mpDeviceInfo.reset();
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::SetRectFromProps()
-{
-    // get form position and size from properties
-    Reference< beans::XPropertySet > xPSet( GetUnoControlModel(), UNO_QUERY );
-    if ( xPSet.is() )
-    {
-        sal_Int32 nXIn = 0, nYIn = 0, nWidthIn = 0, nHeightIn = 0;
-        xPSet->getPropertyValue( DLGED_PROP_POSITIONX ) >>= nXIn;
-        xPSet->getPropertyValue( DLGED_PROP_POSITIONY ) >>= nYIn;
-        xPSet->getPropertyValue( DLGED_PROP_WIDTH ) >>= nWidthIn;
-        xPSet->getPropertyValue( DLGED_PROP_HEIGHT ) >>= nHeightIn;
-
-        // transform coordinates
-        sal_Int32 nXOut, nYOut, nWidthOut, nHeightOut;
-        if ( TransformFormToSdrCoordinates( nXIn, nYIn, nWidthIn, nHeightIn, nXOut, nYOut, nWidthOut, nHeightOut ) )
-        {
-            // set rectangle position and size
-            Point aPoint( nXOut, nYOut );
-            Size aSize( nWidthOut, nHeightOut );
-            SetSnapRect( Rectangle( aPoint, aSize ) );
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::SetPropsFromRect()
-{
-    // get form position and size from rectangle
-    Rectangle aRect_ = GetSnapRect();
-    sal_Int32 nXIn = aRect_.Left();
-    sal_Int32 nYIn = aRect_.Top();
-    sal_Int32 nWidthIn = aRect_.GetWidth();
-    sal_Int32 nHeightIn = aRect_.GetHeight();
-
-    // transform coordinates
-    sal_Int32 nXOut, nYOut, nWidthOut, nHeightOut;
-    if ( TransformSdrToFormCoordinates( nXIn, nYIn, nWidthIn, nHeightIn, nXOut, nYOut, nWidthOut, nHeightOut ) )
-    {
-        // set properties
-        Reference< beans::XPropertySet > xPSet( GetUnoControlModel(), UNO_QUERY );
-        if ( xPSet.is() )
-        {
-            Any aValue;
-            aValue <<= nXOut;
-            xPSet->setPropertyValue( DLGED_PROP_POSITIONX, aValue );
-            aValue <<= nYOut;
-            xPSet->setPropertyValue( DLGED_PROP_POSITIONY, aValue );
-            aValue <<= nWidthOut;
-            xPSet->setPropertyValue( DLGED_PROP_WIDTH, aValue );
-            aValue <<= nHeightOut;
-            xPSet->setPropertyValue( DLGED_PROP_HEIGHT, aValue );
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::AddChild( DlgEdObj* pDlgEdObj )
-{
-    pChilds.push_back( pDlgEdObj );
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::RemoveChild( DlgEdObj* pDlgEdObj )
-{
-    pChilds.erase( ::std::find( pChilds.begin() , pChilds.end() , pDlgEdObj ) );
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::PositionAndSizeChange( const beans::PropertyChangeEvent& evt )
-{
-    DlgEditor* pEditor = GetDlgEditor();
-    DBG_ASSERT( pEditor, "DlgEdForm::PositionAndSizeChange: no dialog editor!" );
-    if ( pEditor )
-    {
-        DlgEdPage* pPage_ = pEditor->GetPage();
-        DBG_ASSERT( pPage_, "DlgEdForm::PositionAndSizeChange: no page!" );
-        if ( pPage_ )
-        {
-            sal_Int32 nPageXIn = 0;
-            sal_Int32 nPageYIn = 0;
-            Size aPageSize = pPage_->GetSize();
-            sal_Int32 nPageWidthIn = aPageSize.Width();
-            sal_Int32 nPageHeightIn = aPageSize.Height();
-            sal_Int32 nPageX, nPageY, nPageWidth, nPageHeight;
-            if ( TransformSdrToFormCoordinates( nPageXIn, nPageYIn, nPageWidthIn, nPageHeightIn, nPageX, nPageY, nPageWidth, nPageHeight ) )
-            {
-                Reference< beans::XPropertySet > xPSetForm( GetUnoControlModel(), UNO_QUERY );
-                if ( xPSetForm.is() )
-                {
-                    sal_Int32 nValue = 0;
-                    evt.NewValue >>= nValue;
-                    sal_Int32 nNewValue = nValue;
-
-                    if ( evt.PropertyName == DLGED_PROP_POSITIONX )
-                    {
-                        if ( nNewValue < nPageX )
-                            nNewValue = nPageX;
-                    }
-                    else if ( evt.PropertyName == DLGED_PROP_POSITIONY )
-                    {
-                        if ( nNewValue < nPageY )
-                            nNewValue = nPageY;
-                    }
-                    else if ( evt.PropertyName == DLGED_PROP_WIDTH )
-                    {
-                        if ( nNewValue < 1 )
-                            nNewValue = 1;
-                    }
-                    else if ( evt.PropertyName == DLGED_PROP_HEIGHT )
-                    {
-                        if ( nNewValue < 1 )
-                            nNewValue = 1;
-                    }
-
-                    if ( nNewValue != nValue )
-                    {
-                        Any aNewValue;
-                        aNewValue <<= nNewValue;
-                        EndListening( sal_False );
-                        xPSetForm->setPropertyValue( evt.PropertyName, aNewValue );
-                        StartListening();
-                    }
-                }
-            }
-
-            bool bAdjustedPageSize = pEditor->AdjustPageSize();
-            SetRectFromProps();
-            ::std::vector< DlgEdObj* >::iterator aIter;
-            ::std::vector< DlgEdObj* > aChildList = ((DlgEdForm*)this)->GetChilds();
-
-            if ( bAdjustedPageSize )
-            {
-                pEditor->InitScrollBars();
-                aPageSize = pPage_->GetSize();
-                nPageWidthIn = aPageSize.Width();
-                nPageHeightIn = aPageSize.Height();
-                if ( TransformSdrToControlCoordinates( nPageXIn, nPageYIn, nPageWidthIn, nPageHeightIn, nPageX, nPageY, nPageWidth, nPageHeight ) )
-                {
-                    for ( aIter = aChildList.begin(); aIter != aChildList.end(); aIter++ )
-                    {
-                        Reference< beans::XPropertySet > xPSet( (*aIter)->GetUnoControlModel(), UNO_QUERY );
-                        if ( xPSet.is() )
-                        {
-                            sal_Int32 nX = 0, nY = 0, nWidth = 0, nHeight = 0;
-                            xPSet->getPropertyValue( DLGED_PROP_POSITIONX ) >>= nX;
-                            xPSet->getPropertyValue( DLGED_PROP_POSITIONY ) >>= nY;
-                            xPSet->getPropertyValue( DLGED_PROP_WIDTH ) >>= nWidth;
-                            xPSet->getPropertyValue( DLGED_PROP_HEIGHT ) >>= nHeight;
-
-                            sal_Int32 nNewX = nX;
-                            if ( nX + nWidth > nPageX + nPageWidth )
-                            {
-                                nNewX = nPageX + nPageWidth - nWidth;
-                                if ( nNewX < nPageX )
-                                    nNewX = nPageX;
-                            }
-                            if ( nNewX != nX )
-                            {
-                                Any aValue;
-                                aValue <<= nNewX;
-                                EndListening( sal_False );
-                                xPSet->setPropertyValue( DLGED_PROP_POSITIONX, aValue );
-                                StartListening();
-                            }
-
-                            sal_Int32 nNewY = nY;
-                            if ( nY + nHeight > nPageY + nPageHeight )
-                            {
-                                nNewY = nPageY + nPageHeight - nHeight;
-                                if ( nNewY < nPageY )
-                                    nNewY = nPageY;
-                            }
-                            if ( nNewY != nY )
-                            {
-                                Any aValue;
-                                aValue <<= nNewY;
-                                EndListening( sal_False );
-                                xPSet->setPropertyValue( DLGED_PROP_POSITIONY, aValue );
-                                StartListening();
-                            }
-                        }
-                    }
-                }
-            }
-
-            for ( aIter = aChildList.begin(); aIter != aChildList.end(); aIter++ )
-            {
-                (*aIter)->SetRectFromProps();
-            }
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::UpdateStep()
-{
-    sal_uLong nObjCount;
-    SdrPage* pSdrPage = GetPage();
-
-    if ( pSdrPage && ( ( nObjCount = pSdrPage->GetObjCount() ) > 0 ) )
-    {
-        for ( sal_uLong i = 0 ; i < nObjCount ; i++ )
-        {
-            SdrObject* pObj = pSdrPage->GetObj(i);
-            DlgEdObj* pDlgEdObj = PTR_CAST(DlgEdObj, pObj);
-            if ( pDlgEdObj && !pDlgEdObj->ISA(DlgEdForm) )
-                pDlgEdObj->UpdateStep();
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::UpdateTabIndices()
-{
-    // stop listening with all children
-    ::std::vector<DlgEdObj*>::iterator aIter;
-    for ( aIter = pChilds.begin() ; aIter != pChilds.end() ; ++aIter )
-    {
-        (*aIter)->EndListening( sal_False );
-    }
-
-    Reference< ::com::sun::star::container::XNameAccess > xNameAcc( GetUnoControlModel() , UNO_QUERY );
-    if ( xNameAcc.is() )
-    {
-        // get sequence of control names
-        Sequence< ::rtl::OUString > aNames = xNameAcc->getElementNames();
-        const ::rtl::OUString* pNames = aNames.getConstArray();
-        sal_Int32 nCtrls = aNames.getLength();
-
-        // create a map of tab indices and control names, sorted by tab index
-        IndexToNameMap aIndexToNameMap;
-        for ( sal_Int16 i = 0; i < nCtrls; ++i )
-        {
-            // get name
-            ::rtl::OUString aName( pNames[i] );
-
-            // get tab index
-            sal_Int16 nTabIndex = -1;
-            Any aCtrl = xNameAcc->getByName( aName );
-            Reference< ::com::sun::star::beans::XPropertySet > xPSet;
-               aCtrl >>= xPSet;
-            if ( xPSet.is() )
-                xPSet->getPropertyValue( DLGED_PROP_TABINDEX ) >>= nTabIndex;
-
-            // insert into map
-            aIndexToNameMap.insert( IndexToNameMap::value_type( nTabIndex, aName ) );
-        }
-
-        // set new tab indices
-        sal_Int16 nNewTabIndex = 0;
-        for ( IndexToNameMap::iterator aIt = aIndexToNameMap.begin(); aIt != aIndexToNameMap.end(); ++aIt )
-        {
-            Any aCtrl = xNameAcc->getByName( aIt->second );
-            Reference< beans::XPropertySet > xPSet;
-               aCtrl >>= xPSet;
-            if ( xPSet.is() )
-            {
-                Any aTabIndex;
-                aTabIndex <<= (sal_Int16) nNewTabIndex++;
-                xPSet->setPropertyValue( DLGED_PROP_TABINDEX, aTabIndex );
-            }
-        }
-
-        // #110559#
-        UpdateTabOrderAndGroups();
-    }
-
-    // start listening with all children
-    for ( aIter = pChilds.begin() ; aIter != pChilds.end() ; ++aIter )
-    {
-        (*aIter)->StartListening();
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::UpdateTabOrder()
-{
-    // #110559#
-    // When the tabindex of a control model changes, the dialog control is
-    // notified about those changes. Due to #109067# (bad performance of
-    // dialog editor) the dialog control doesn't activate the tab order
-    // in design mode. When the dialog editor has reordered all
-    // tabindices, this method allows to activate the taborder afterwards.
-
-    Reference< awt::XUnoControlContainer > xCont( GetControl(), UNO_QUERY );
-    if ( xCont.is() )
-    {
-        Sequence< Reference< awt::XTabController > > aSeqTabCtrls = xCont->getTabControllers();
-        const Reference< awt::XTabController >* pTabCtrls = aSeqTabCtrls.getConstArray();
-        sal_Int32 nCount = aSeqTabCtrls.getLength();
-        for ( sal_Int32 i = 0; i < nCount; ++i )
-            pTabCtrls[i]->activateTabOrder();
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::UpdateGroups()
-{
-    // #110559#
-    // The grouping of radio buttons in a dialog is done by vcl.
-    // In the dialog editor we have two views (=controls) for one
-    // radio button model. One control is owned by the dialog control,
-    // but not visible in design mode. The other control is owned by
-    // the drawing layer object. Whereas the grouping of the first
-    // control is done by vcl, the grouping of the control in the
-    // drawing layer has to be done here.
-
-    Reference< awt::XTabControllerModel > xTabModel( GetUnoControlModel() , UNO_QUERY );
-    if ( xTabModel.is() )
-    {
-        // create a global list of controls that belong to the dialog
-        ::std::vector<DlgEdObj*> aChildList = GetChilds();
-        sal_uInt32 nSize = aChildList.size();
-        Sequence< Reference< awt::XControl > > aSeqControls( nSize );
-        for ( sal_uInt32 i = 0; i < nSize; ++i )
-            aSeqControls.getArray()[i] = Reference< awt::XControl >( aChildList[i]->GetControl(), UNO_QUERY );
-
-        sal_Int32 nGroupCount = xTabModel->getGroupCount();
-        for ( sal_Int32 nGroup = 0; nGroup < nGroupCount; ++nGroup )
-        {
-            // get a list of control models that belong to this group
-            ::rtl::OUString aName;
-            Sequence< Reference< awt::XControlModel > > aSeqModels;
-            xTabModel->getGroup( nGroup, aSeqModels, aName );
-            const Reference< awt::XControlModel >* pModels = aSeqModels.getConstArray();
-            sal_Int32 nModelCount = aSeqModels.getLength();
-
-            // create a list of peers that belong to this group
-            Sequence< Reference< awt::XWindow > > aSeqPeers( nModelCount );
-            for ( sal_Int32 nModel = 0; nModel < nModelCount; ++nModel )
-            {
-                // for each control model find the corresponding control in the global list
-                const Reference< awt::XControl >* pControls = aSeqControls.getConstArray();
-                sal_Int32 nControlCount = aSeqControls.getLength();
-                for ( sal_Int32 nControl = 0; nControl < nControlCount; ++nControl )
-                {
-                    const Reference< awt::XControl > xCtrl( pControls[nControl] );
-                    if ( xCtrl.is() )
-                    {
-                        Reference< awt::XControlModel > xCtrlModel( xCtrl->getModel() );
-                        if ( (awt::XControlModel*)xCtrlModel.get() == (awt::XControlModel*)pModels[nModel].get() )
-                        {
-                            // get the control peer and insert into the list of peers
-                            aSeqPeers.getArray()[ nModel ] = Reference< awt::XWindow >( xCtrl->getPeer(), UNO_QUERY );
-                            break;
-                        }
-                    }
-                }
-            }
-
-            // set the group at the dialog peer
-            Reference< awt::XControl > xDlg( GetControl(), UNO_QUERY );
-            if ( xDlg.is() )
-            {
-                Reference< awt::XVclContainerPeer > xDlgPeer( xDlg->getPeer(), UNO_QUERY );
-                if ( xDlgPeer.is() )
-                    xDlgPeer->setGroup( aSeqPeers );
-            }
-        }
-    }
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::UpdateTabOrderAndGroups()
-{
-    UpdateTabOrder();
-    UpdateGroups();
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::NbcMove( const Size& rSize )
-{
-    SdrUnoObj::NbcMove( rSize );
-
-    // set geometry properties of form
-    EndListening(sal_False);
-    SetPropsFromRect();
-    StartListening();
-
-    // set geometry properties of all childs
-    ::std::vector<DlgEdObj*>::iterator aIter;
-    for ( aIter = pChilds.begin() ; aIter != pChilds.end() ; aIter++ )
-    {
-        (*aIter)->EndListening(sal_False);
-        (*aIter)->SetPropsFromRect();
-        (*aIter)->StartListening();
-    }
-
-    // dialog model changed
-    GetDlgEditor()->SetDialogModelChanged(sal_True);
-}
-
-//----------------------------------------------------------------------------
-
-void DlgEdForm::NbcResize(const Point& rRef, const Fraction& xFract, const Fraction& yFract)
-{
-    SdrUnoObj::NbcResize( rRef, xFract, yFract );
-
-    // set geometry properties of form
-    EndListening(sal_False);
-    SetPropsFromRect();
-    StartListening();
-
-    // set geometry properties of all childs
-    ::std::vector<DlgEdObj*>::iterator aIter;
-    for ( aIter = pChilds.begin() ; aIter != pChilds.end() ; aIter++ )
-    {
-        (*aIter)->EndListening(sal_False);
-        (*aIter)->SetPropsFromRect();
-        (*aIter)->StartListening();
-    }
-
-    // dialog model changed
-    GetDlgEditor()->SetDialogModelChanged(sal_True);
-}
-
-//----------------------------------------------------------------------------
-
-bool DlgEdForm::EndCreate(SdrDragStat& rStat, SdrCreateCmd eCmd)
-{
-    bool bResult = SdrUnoObj::EndCreate(rStat, eCmd);
-
-    // stop listening
-    EndListening(sal_False);
-
-    // set geometry properties
-    SetPropsFromRect();
-
-    // dialog model changed
-    GetDlgEditor()->SetDialogModelChanged(sal_True);
-
-    // start listening
-    StartListening();
-
-    return bResult;
-}
-
-//----------------------------------------------------------------------------
-
-awt::DeviceInfo DlgEdForm::getDeviceInfo() const
-{
-    awt::DeviceInfo aDeviceInfo;
-
-    DlgEditor* pEditor = GetDlgEditor();
-    DBG_ASSERT( pEditor, "DlgEdForm::getDeviceInfo: no editor associated with the form object!" );
-    if ( !pEditor )
-        return aDeviceInfo;
-
-    Window* pWindow = pEditor->GetWindow();
-    DBG_ASSERT( pWindow, "DlgEdForm::getDeviceInfo: no window associated with the editor!" );
-    if ( !pWindow )
-        return aDeviceInfo;
-
-    // obtain an XControl
-    ::utl::SharedUNOComponent< awt::XControl > xDialogControl; // ensures auto-disposal, if needed
-    xDialogControl.reset( GetControl(), ::utl::SharedUNOComponent< awt::XControl >::NoTakeOwnership );
-    if ( !xDialogControl.is() )
-    {
-        // don't create a temporary control all the time, this method here is called
-        // way too often. Instead, use a cached DeviceInfo.
-        // #i74065#
-        if ( !!mpDeviceInfo )
-            return *mpDeviceInfo;
-
-        Reference< awt::XControlContainer > xEditorControlContainer( pEditor->GetWindowControlContainer() );
-        xDialogControl.reset(
-            GetTemporaryControlForWindow( *pWindow, xEditorControlContainer ),
-            ::utl::SharedUNOComponent< awt::XControl >::TakeOwnership );
-    }
-
-    Reference< awt::XDevice > xDialogDevice;
-    if ( xDialogControl.is() )
-        xDialogDevice.set( xDialogControl->getPeer(), UNO_QUERY );
-    DBG_ASSERT( xDialogDevice.is(), "DlgEdForm::getDeviceInfo: no device!" );
-    if ( xDialogDevice.is() )
-        aDeviceInfo = xDialogDevice->getInfo();
-
-    mpDeviceInfo.reset( aDeviceInfo );
-
-    return aDeviceInfo;
-}
-
-//----------------------------------------------------------------------------
-
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */