summaryrefslogtreecommitdiff
path: root/extensions/source/propctrlr/taborder.cxx
diff options
context:
space:
mode:
authorMichael Stahl <mstahl@redhat.com>2012-01-28 20:52:45 +0100
committerMichael Stahl <mstahl@redhat.com>2012-01-28 20:52:45 +0100
commit2e626373db2412ac22e8c5c27a60d11cd29e875b (patch)
tree9e9f67205cd5b72f1031721273e1534a3a1e5b0f /extensions/source/propctrlr/taborder.cxx
parentf7ee7bbd5174b084f018c2ec94d8c70c98ee04da (diff)
replace obsolete "master" branch with README that points at new repoHEADmaster-deletedmaster
Diffstat (limited to 'extensions/source/propctrlr/taborder.cxx')
-rw-r--r--extensions/source/propctrlr/taborder.cxx417
1 files changed, 0 insertions, 417 deletions
diff --git a/extensions/source/propctrlr/taborder.cxx b/extensions/source/propctrlr/taborder.cxx
deleted file mode 100644
index 9ea00f2f8..000000000
--- a/extensions/source/propctrlr/taborder.cxx
+++ /dev/null
@@ -1,417 +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_extensions.hxx"
-#include "taborder.hxx"
-#include "taborder.hrc"
-
-#include "modulepcr.hxx"
-#include "formresid.hrc"
-#include "formstrings.hxx"
-#include <comphelper/types.hxx>
-#include <comphelper/property.hxx>
-#include <cppuhelper/implbase1.hxx>
-#include <com/sun/star/form/FormComponentType.hpp>
-#include <com/sun/star/awt/XTabController.hpp>
-#include <vcl/scrbar.hxx>
-
-//............................................................................
-namespace pcr
-{
-//............................................................................
-
- using namespace ::com::sun::star::uno;
- using namespace ::com::sun::star::awt;
- using namespace ::com::sun::star::lang;
- using namespace ::com::sun::star::form;
- using namespace ::com::sun::star::beans;
- using namespace ::com::sun::star::datatransfer;
-
- //========================================================================
- //= OSimpleTabModel
- //========================================================================
- class OSimpleTabModel : public ::cppu::WeakImplHelper1< XTabControllerModel>
- {
- Sequence< Reference< XControlModel > > m_aModels;
-
- public:
- OSimpleTabModel( const Sequence< Reference< XControlModel > >& _rModels )
- :m_aModels( _rModels )
- {
- }
-
- // XTabControllerModel
- virtual void SAL_CALL setControlModels(const Sequence< Reference< XControlModel > >& rModels) throw( RuntimeException ) {m_aModels = rModels;}
- virtual Sequence< Reference< XControlModel > > SAL_CALL getControlModels(void) throw( RuntimeException ) {return m_aModels;}
- virtual void SAL_CALL setGroup(const Sequence< Reference< XControlModel > >& /*Group*/, const ::rtl::OUString& /*GroupName*/) throw( RuntimeException ) {}
- virtual sal_Int32 SAL_CALL getGroupCount(void) throw( RuntimeException ) {return 0;}
- virtual void SAL_CALL getGroup(sal_Int32 /*nGroup*/, Sequence< Reference< XControlModel > >& /*Group*/, ::rtl::OUString& /*Name*/) throw( RuntimeException ) {}
- virtual void SAL_CALL getGroupByName(const ::rtl::OUString& /*Name*/, Sequence< Reference< XControlModel > >& /*Group*/) throw( RuntimeException ) {}
- virtual sal_Bool SAL_CALL getGroupControl(void) throw( RuntimeException ){return sal_False;} ;
- virtual void SAL_CALL setGroupControl(sal_Bool /*GroupControl*/) throw( RuntimeException ){};
- };
-
- //========================================================================
- //= TabOrderDialog
- //========================================================================
- DBG_NAME(TabOrderDialog)
- //------------------------------------------------------------------------
- TabOrderDialog::TabOrderDialog( Window* _pParent, const Reference< XTabControllerModel >& _rxTabModel,
- const Reference< XControlContainer >& _rxControlCont, const Reference< XMultiServiceFactory >& _rxORB )
- :ModalDialog( _pParent, PcrRes( RID_DLG_TABORDER ) )
- ,m_xModel( _rxTabModel )
- ,m_xControlContainer( _rxControlCont )
- ,m_xORB( _rxORB )
- ,aFT_Controls( this, PcrRes( FT_CONTROLS ) )
- ,aLB_Controls( this, PcrRes( CTRL_TREE ) )
- ,aPB_OK( this, PcrRes( PB_OK ) )
- ,aPB_CANCEL( this, PcrRes( PB_CANCEL ) )
- ,aPB_HELP( this, PcrRes( PB_HELP ) )
- ,aPB_MoveUp( this, PcrRes( PB_MOVE_UP ) )
- ,aPB_MoveDown( this, PcrRes( PB_MOVE_DOWN ) )
- ,aPB_AutoOrder( this, PcrRes( PB_AUTO_ORDER ) )
- ,pImageList( NULL )
- {
- DBG_CTOR(TabOrderDialog,NULL);
-
- aPB_MoveUp.SetClickHdl( LINK( this, TabOrderDialog, MoveUpClickHdl ) );
- aPB_MoveDown.SetClickHdl( LINK( this, TabOrderDialog, MoveDownClickHdl ) );
- aPB_AutoOrder.SetClickHdl( LINK( this, TabOrderDialog, AutoOrderClickHdl ) );
- aPB_OK.SetClickHdl( LINK( this, TabOrderDialog, OKClickHdl ) );
- aPB_OK.Disable();
-
- pImageList = new ImageList( PcrRes( RID_IL_FORMEXPLORER ) );
-
- if ( m_xModel.is() )
- m_xTempModel = new OSimpleTabModel( m_xModel->getControlModels() );
-
- if ( m_xTempModel.is() && m_xControlContainer.is() )
- FillList();
-
- if ( aLB_Controls.GetEntryCount() < 2 )
- {
- aPB_MoveUp.Disable();
- aPB_MoveDown.Disable();
- aPB_AutoOrder.Disable();
- }
-
- FreeResource();
- }
-
- //------------------------------------------------------------------------
- void TabOrderDialog::SetModified()
- {
- aPB_OK.Enable();
- }
-
- //------------------------------------------------------------------------
- TabOrderDialog::~TabOrderDialog()
- {
- aLB_Controls.Hide();
- // delete pLB_Controls;
- delete pImageList;
-
- DBG_DTOR(TabOrderDialog,NULL);
- }
-
- //------------------------------------------------------------------------
- Image TabOrderDialog::GetImage( const Reference< XPropertySet >& _rxSet ) const
- {
- sal_uInt16 nImageId = RID_SVXIMG_CONTROL;
- // TODO: classify controls also in Basic propbrw
- if ( _rxSet.is() && ::comphelper::hasProperty( PROPERTY_CLASSID, _rxSet ) )
- {
- switch( ::comphelper::getINT16( _rxSet->getPropertyValue( PROPERTY_CLASSID ) ) )
- {
- case FormComponentType::COMMANDBUTTON: nImageId = RID_SVXIMG_BUTTON; break;
- case FormComponentType::FIXEDTEXT: nImageId = RID_SVXIMG_FIXEDTEXT; break;
- case FormComponentType::TEXTFIELD: nImageId = RID_SVXIMG_EDIT; break;
- case FormComponentType::RADIOBUTTON: nImageId = RID_SVXIMG_RADIOBUTTON; break;
- case FormComponentType::CHECKBOX: nImageId = RID_SVXIMG_CHECKBOX; break;
- case FormComponentType::LISTBOX: nImageId = RID_SVXIMG_LISTBOX; break;
- case FormComponentType::COMBOBOX: nImageId = RID_SVXIMG_COMBOBOX; break;
- case FormComponentType::GROUPBOX: nImageId = RID_SVXIMG_GROUPBOX; break;
- case FormComponentType::IMAGEBUTTON: nImageId = RID_SVXIMG_IMAGEBUTTON; break;
- case FormComponentType::FILECONTROL: nImageId = RID_SVXIMG_FILECONTROL; break;
- case FormComponentType::HIDDENCONTROL: nImageId = RID_SVXIMG_HIDDEN; break;
- case FormComponentType::DATEFIELD: nImageId = RID_SVXIMG_DATEFIELD; break;
- case FormComponentType::TIMEFIELD: nImageId = RID_SVXIMG_TIMEFIELD; break;
- case FormComponentType::NUMERICFIELD: nImageId = RID_SVXIMG_NUMERICFIELD; break;
- case FormComponentType::CURRENCYFIELD: nImageId = RID_SVXIMG_CURRENCYFIELD; break;
- case FormComponentType::PATTERNFIELD: nImageId = RID_SVXIMG_PATTERNFIELD; break;
- case FormComponentType::IMAGECONTROL: nImageId = RID_SVXIMG_IMAGECONTROL; break;
- case FormComponentType::GRIDCONTROL: nImageId = RID_SVXIMG_GRID; break;
- case FormComponentType::SCROLLBAR: nImageId = RID_SVXIMG_SCROLLBAR; break;
- case FormComponentType::SPINBUTTON: nImageId = RID_SVXIMG_SPINBUTTON; break;
- case FormComponentType::NAVIGATIONBAR: nImageId = RID_SVXIMG_NAVIGATIONBAR; break;
- default:
- OSL_FAIL( "TabOrderDialog::GetImage: unknown control type" );
- }
- }
-
- return pImageList->GetImage( nImageId );
- }
-
- //------------------------------------------------------------------------
- void TabOrderDialog::FillList()
- {
- DBG_ASSERT( m_xTempModel.is() && m_xControlContainer.is(), "TabOrderDialog::FillList: invalid call!" );
- if ( !m_xTempModel.is() || !m_xControlContainer.is() )
- return;
-
- aLB_Controls.Clear();
-
- try
- {
- Sequence< Reference< XControlModel > > aControlModels( m_xTempModel->getControlModels() );
- const Reference< XControlModel >* pControlModels = aControlModels.getConstArray();
-
- ::rtl::OUString aName;
- Image aImage;
-
- for ( sal_Int32 i=0; i < aControlModels.getLength(); ++i, ++pControlModels )
- {
- Reference< XPropertySet > xControl( *pControlModels, UNO_QUERY );
- Reference< XPropertySetInfo > xPI;
- if ( xControl.is() )
- xPI = xControl->getPropertySetInfo();
-
- if ( xPI.is() )
- {
- if ( xPI->hasPropertyByName( PROPERTY_TABSTOP ) )
- {
- aName = ::comphelper::getString( xControl->getPropertyValue( PROPERTY_NAME ) );
- // TODO: do Basic controls have a name?
- aImage = GetImage( xControl );
- aLB_Controls.InsertEntry( aName, aImage, aImage, 0, sal_False, LIST_APPEND, xControl.get() );
- }
- }
- else
- {
- // no property set -> no tab order
- OSL_FAIL( "TabOrderDialog::FillList: invalid control encountered!" );
- aLB_Controls.Clear();
- break;
- }
- }
- }
- catch( const Exception& )
- {
- OSL_FAIL( "TabOrderDialog::FillList: caught an exception!" );
- }
-
- // select first entry
- SvLBoxEntry* pFirstEntry = aLB_Controls.GetEntry( 0 );
- if ( pFirstEntry )
- aLB_Controls.Select( pFirstEntry );
- }
-
- //------------------------------------------------------------------------
- IMPL_LINK( TabOrderDialog, MoveUpClickHdl, Button*, /*pButton*/ )
- {
- aLB_Controls.MoveSelection( -1 );
- return 0;
- }
-
- //------------------------------------------------------------------------
- IMPL_LINK( TabOrderDialog, MoveDownClickHdl, Button*, /*pButton*/ )
- {
- aLB_Controls.MoveSelection( 1 );
- return 0;
- }
-
- //------------------------------------------------------------------------
- IMPL_LINK( TabOrderDialog, AutoOrderClickHdl, Button*, /*pButton*/ )
- {
- try
- {
- Reference< XTabController > xTabController;
- if ( m_xORB.is() )
- xTabController = xTabController.query( m_xORB->createInstance( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.form.FormController" ) ) ) );
- DBG_ASSERT( xTabController.is(), "TabOrderDialog::AutoOrderClickHdl: could not instantiate a tab controller!" );
- if ( !xTabController.is() )
- return 0;
-
- xTabController->setModel( m_xTempModel );
- xTabController->setContainer( m_xControlContainer );
- xTabController->autoTabOrder();
-
- SetModified();
- FillList();
-
- ::comphelper::disposeComponent( xTabController );
- }
- catch( const Exception& )
- {
- OSL_FAIL( "TabOrderDialog::AutoOrderClickHdl: caught an exception!" );
- }
-
- return 0;
- }
-
- //------------------------------------------------------------------------
- IMPL_LINK( TabOrderDialog, OKClickHdl, Button*, /*pButton*/ )
- {
- sal_uLong nEntryCount = aLB_Controls.GetEntryCount();
- Sequence< Reference< XControlModel > > aSortedControlModelSeq( nEntryCount );
- Sequence< Reference< XControlModel > > aControlModels( m_xTempModel->getControlModels());
- Reference< XControlModel > * pSortedControlModels = aSortedControlModelSeq.getArray();
- const Reference< XControlModel > * pControlModels = aControlModels.getConstArray();
-
- for (sal_uLong i=0; i < nEntryCount; i++)
- {
- SvLBoxEntry* pEntry = aLB_Controls.GetEntry(i);
-
- for( sal_Int32 j=0; j<aControlModels.getLength(); j++ )
- {
- Reference< XPropertySet > xSet(pControlModels[j], UNO_QUERY);
- if ((XPropertySet*)xSet.get() == ((XPropertySet*)pEntry->GetUserData()))
- {
- pSortedControlModels[i] = pControlModels[j];
- break;
- }
- }
- }
-
- // TODO: UNO action (to bracket all the single actions which are being created)
- m_xModel->setControlModels( aSortedControlModelSeq );
-
- EndDialog( sal_True );
- return 0;
- }
-
- //========================================================================
- //= TabOrderListBox
- //========================================================================
- DBG_NAME(TabOrderListBox);
- //------------------------------------------------------------------------
- TabOrderListBox::TabOrderListBox( Window* pParent, const ResId& rResId )
- :SvTreeListBox( pParent, rResId )
- {
- DBG_CTOR(TabOrderListBox,NULL);
- SetDragDropMode(0xFFFF/*SV_DRAGDROP_CTRL_MOVE*/);
- // Hmm. The flag alone is not enough, so to be on the safe side ...
-
- SetSelectionMode( MULTIPLE_SELECTION );
- }
-
- //------------------------------------------------------------------------
- TabOrderListBox::~TabOrderListBox()
- {
- DBG_DTOR(TabOrderListBox,NULL);
- }
-
- //------------------------------------------------------------------------
- void TabOrderListBox::ModelHasMoved( SvListEntry* _pSource )
- {
- SvTreeListBox::ModelHasMoved( _pSource );
-
- ((TabOrderDialog*)Window::GetParent())->SetModified();
- }
-
- //------------------------------------------------------------------------
- void TabOrderListBox::MoveSelection( long nRelPos )
- {
- UniString aSelEntryPrevText,aSelEntryNextText;
- Image aImage;
- for (long i=0; i<labs(nRelPos); i++)
- {
- ((TabOrderDialog*)Window::GetParent())->SetModified();
-
- //////////////////////////////////////////////////////////////////////
- // move entries
- if( nRelPos < 0 )
- {
- SvLBoxEntry* pFirstSelected = FirstSelected();
- if( !pFirstSelected ) return;
- sal_uLong nFirstSelPos = GetModel()->GetAbsPos( pFirstSelected );
- if( nFirstSelPos == 0 ) return;
-
- SvLBoxEntry* pSelEntry = pFirstSelected;
- while( pSelEntry )
- {
- sal_uLong nSelEntryPos = GetModel()->GetAbsPos( pSelEntry );
- SvLBoxEntry* pSelEntryPrev = GetEntry( nSelEntryPos-1 );
- aSelEntryPrevText = GetEntryText( pSelEntryPrev );
- aImage = GetExpandedEntryBmp(pSelEntryPrev);
- void* pData = pSelEntryPrev->GetUserData();
-
- GetModel()->Remove( pSelEntryPrev );
- InsertEntry( aSelEntryPrevText, aImage, aImage, 0, sal_False, nSelEntryPos, pData );
-
- pSelEntry = NextSelected( pSelEntry );
- }
- }
-
- else if( nRelPos > 0 )
- {
- SvLBoxEntry* pLastSelected = LastSelected();
- if( !pLastSelected ) return;
- sal_uLong nLastSelPos = GetModel()->GetAbsPos( pLastSelected );
-
- if( (nLastSelPos + nRelPos - i) > (GetEntryCount()-1) ) return;
-
-#if OSL_DEBUG_LEVEL > 0
- sal_uLong nSelCount = GetSelectionCount();
- (void)nSelCount;
-#endif
-
-
- SvLBoxEntry* pSelEntry = pLastSelected;
- while( pSelEntry )
- {
- sal_uLong nSelEntryPos = GetModel()->GetAbsPos( pSelEntry );
- SvLBoxEntry* pSelEntryNext = GetEntry( nSelEntryPos+1 );
- void* pData = pSelEntryNext->GetUserData();
-
- aSelEntryNextText = GetEntryText( pSelEntryNext );
- aImage = GetExpandedEntryBmp(pSelEntryNext);
-
- GetModel()->Remove( pSelEntryNext );
- InsertEntry( aSelEntryNextText, aImage, aImage, 0, sal_False, nSelEntryPos, pData );
-
- pSelEntry = PrevSelected( pSelEntry );
- }
- long nThumbPos = GetVScroll()->GetThumbPos();
- long nVisibleSize = GetVScroll()->GetVisibleSize();
- long nFirstVisible = GetModel()->GetAbsPos( FirstVisible());
-
- if ( ( nThumbPos + nVisibleSize + 1 ) < (long)( nLastSelPos + 3 ) )
- GetVScroll()->DoScrollAction(SCROLL_LINEDOWN);
- else if((nThumbPos+nVisibleSize+1) >= (nFirstVisible))
- GetVScroll()->DoScrollAction(SCROLL_LINEUP);
- }
- }
- }
-
-//............................................................................
-} // namespace pcr
-//............................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */