e57ca02849
...(for now, from LIBO_INTERNAL_CODE only). See the mail thread starting at <https://lists.freedesktop.org/archives/libreoffice/2017-January/076665.html> "Dynamic Exception Specifications" for details. Most changes have been done automatically by the rewriting loplugin:dynexcspec (after enabling the rewriting mode, to be committed shortly). The way it only removes exception specs from declarations if it also sees a definition, it identified some dead declarations-w/o-definitions (that have been removed manually) and some cases where a definition appeared in multiple include files (which have also been cleaned up manually). There's also been cases of macro paramters (that were used to abstract over exception specs) that have become unused now (and been removed). Furthermore, some code needed to be cleaned up manually (avmedia/source/quicktime/ and connectivity/source/drivers/kab/), as I had no configurations available that would actually build that code. Missing @throws documentation has not been applied in such manual clean-up. Change-Id: I3408691256c9b0c12bc5332de976743626e13960 Reviewed-on: https://gerrit.libreoffice.org/33574 Tested-by: Jenkins <ci@libreoffice.org> Reviewed-by: Stephan Bergmann <sbergman@redhat.com>
392 lines
15 KiB
C++
392 lines
15 KiB
C++
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
|
|
/*
|
|
* This file is part of the LibreOffice project.
|
|
*
|
|
* This Source Code Form is subject to the terms of the Mozilla Public
|
|
* License, v. 2.0. If a copy of the MPL was not distributed with this
|
|
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
*
|
|
* This file incorporates work covered by the following license notice:
|
|
*
|
|
* Licensed to the Apache Software Foundation (ASF) under one or more
|
|
* contributor license agreements. See the NOTICE file distributed
|
|
* with this work for additional information regarding copyright
|
|
* ownership. The ASF licenses this file to you under the Apache
|
|
* License, Version 2.0 (the "License"); you may not use this file
|
|
* except in compliance with the License. You may obtain a copy of
|
|
* the License at http://www.apache.org/licenses/LICENSE-2.0 .
|
|
*/
|
|
|
|
#include "taborder.hxx"
|
|
|
|
#include "modulepcr.hxx"
|
|
#include "formresid.hrc"
|
|
#include "formstrings.hxx"
|
|
#include <comphelper/types.hxx>
|
|
#include <comphelper/property.hxx>
|
|
#include <cppuhelper/implbase.hxx>
|
|
#include <com/sun/star/form/FormComponentType.hpp>
|
|
#include <com/sun/star/form/runtime/FormController.hpp>
|
|
#include <vcl/scrbar.hxx>
|
|
#include <svtools/treelistentry.hxx>
|
|
#include <vcl/builderfactory.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;
|
|
|
|
namespace {
|
|
|
|
Image GetImage( const Reference< XPropertySet >& _rxSet )
|
|
{
|
|
sal_uInt16 nImageId = RID_EXTBMP_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_EXTBMP_BUTTON; break;
|
|
case FormComponentType::FIXEDTEXT: nImageId = RID_EXTBMP_FIXEDTEXT; break;
|
|
case FormComponentType::TEXTFIELD: nImageId = RID_EXTBMP_EDITBOX; break;
|
|
case FormComponentType::RADIOBUTTON: nImageId = RID_EXTBMP_RADIOBUTTON; break;
|
|
case FormComponentType::CHECKBOX: nImageId = RID_EXTBMP_CHECKBOX; break;
|
|
case FormComponentType::LISTBOX: nImageId = RID_EXTBMP_LISTBOX; break;
|
|
case FormComponentType::COMBOBOX: nImageId = RID_EXTBMP_COMBOBOX; break;
|
|
case FormComponentType::GROUPBOX: nImageId = RID_EXTBMP_GROUPBOX; break;
|
|
case FormComponentType::IMAGEBUTTON: nImageId = RID_EXTBMP_IMAGEBUTTON; break;
|
|
case FormComponentType::FILECONTROL: nImageId = RID_EXTBMP_FILECONTROL; break;
|
|
case FormComponentType::HIDDENCONTROL: nImageId = RID_EXTBMP_HIDDEN; break;
|
|
case FormComponentType::DATEFIELD: nImageId = RID_EXTBMP_DATEFIELD; break;
|
|
case FormComponentType::TIMEFIELD: nImageId = RID_EXTBMP_TIMEFIELD; break;
|
|
case FormComponentType::NUMERICFIELD: nImageId = RID_EXTBMP_NUMERICFIELD; break;
|
|
case FormComponentType::CURRENCYFIELD: nImageId = RID_EXTBMP_CURRENCYFIELD; break;
|
|
case FormComponentType::PATTERNFIELD: nImageId = RID_EXTBMP_PATTERNFIELD; break;
|
|
case FormComponentType::IMAGECONTROL: nImageId = RID_EXTBMP_IMAGECONTROL; break;
|
|
case FormComponentType::GRIDCONTROL: nImageId = RID_EXTBMP_GRID; break;
|
|
case FormComponentType::SCROLLBAR: nImageId = RID_EXTBMP_SCROLLBAR; break;
|
|
case FormComponentType::SPINBUTTON: nImageId = RID_EXTBMP_SPINBUTTON; break;
|
|
case FormComponentType::NAVIGATIONBAR: nImageId = RID_EXTBMP_NAVIGATIONBAR; break;
|
|
default:
|
|
OSL_FAIL( "TabOrderDialog::GetImage: unknown control type" );
|
|
}
|
|
}
|
|
|
|
return Image(BitmapEx(PcrRes(nImageId)));;
|
|
}
|
|
|
|
}
|
|
|
|
//= OSimpleTabModel
|
|
|
|
class OSimpleTabModel : public ::cppu::WeakImplHelper< XTabControllerModel>
|
|
{
|
|
Sequence< Reference< XControlModel > > m_aModels;
|
|
|
|
public:
|
|
explicit OSimpleTabModel( const Sequence< Reference< XControlModel > >& _rModels )
|
|
:m_aModels( _rModels )
|
|
{
|
|
}
|
|
|
|
// XTabControllerModel
|
|
virtual void SAL_CALL setControlModels(const Sequence< Reference< XControlModel > >& rModels) override {m_aModels = rModels;}
|
|
virtual Sequence< Reference< XControlModel > > SAL_CALL getControlModels() override {return m_aModels;}
|
|
virtual void SAL_CALL setGroup(const Sequence< Reference< XControlModel > >& /*Group*/, const OUString& /*GroupName*/) override {}
|
|
virtual sal_Int32 SAL_CALL getGroupCount() override {return 0;}
|
|
virtual void SAL_CALL getGroup(sal_Int32 /*nGroup*/, Sequence< Reference< XControlModel > >& /*Group*/, OUString& /*Name*/) override {}
|
|
virtual void SAL_CALL getGroupByName(const OUString& /*Name*/, Sequence< Reference< XControlModel > >& /*Group*/) override {}
|
|
virtual sal_Bool SAL_CALL getGroupControl() override {return false;} ;
|
|
virtual void SAL_CALL setGroupControl(sal_Bool /*GroupControl*/) override {};
|
|
};
|
|
|
|
|
|
//= TabOrderDialog
|
|
|
|
|
|
TabOrderDialog::TabOrderDialog( vcl::Window* _pParent, const Reference< XTabControllerModel >& _rxTabModel,
|
|
const Reference< XControlContainer >& _rxControlCont, const Reference< XComponentContext >& _rxORB )
|
|
:ModalDialog( _pParent, "TabOrderDialog", "modules/spropctrlr/ui/taborder.ui")
|
|
,m_xModel( _rxTabModel )
|
|
,m_xControlContainer( _rxControlCont )
|
|
,m_xORB( _rxORB )
|
|
{
|
|
get(m_pLB_Controls, "CTRLtree");
|
|
get(m_pPB_OK, "ok");
|
|
get(m_pPB_MoveUp, "upB");
|
|
get(m_pPB_MoveDown, "downB");
|
|
get(m_pPB_AutoOrder, "autoB");
|
|
|
|
|
|
m_pPB_MoveUp->SetClickHdl( LINK( this, TabOrderDialog, MoveUpClickHdl ) );
|
|
m_pPB_MoveDown->SetClickHdl( LINK( this, TabOrderDialog, MoveDownClickHdl ) );
|
|
m_pPB_AutoOrder->SetClickHdl( LINK( this, TabOrderDialog, AutoOrderClickHdl ) );
|
|
m_pPB_OK->SetClickHdl( LINK( this, TabOrderDialog, OKClickHdl ) );
|
|
m_pPB_OK->Disable();
|
|
|
|
if ( m_xModel.is() )
|
|
m_xTempModel = new OSimpleTabModel( m_xModel->getControlModels() );
|
|
|
|
if ( m_xTempModel.is() && m_xControlContainer.is() )
|
|
FillList();
|
|
|
|
if ( m_pLB_Controls->GetEntryCount() < 2 )
|
|
{
|
|
m_pPB_MoveUp->Disable();
|
|
m_pPB_MoveDown->Disable();
|
|
m_pPB_AutoOrder->Disable();
|
|
}
|
|
|
|
}
|
|
|
|
|
|
void TabOrderDialog::SetModified()
|
|
{
|
|
m_pPB_OK->Enable();
|
|
}
|
|
|
|
|
|
TabOrderDialog::~TabOrderDialog()
|
|
{
|
|
disposeOnce();
|
|
}
|
|
|
|
void TabOrderDialog::dispose()
|
|
{
|
|
m_pLB_Controls->Hide();
|
|
m_pLB_Controls.clear();
|
|
m_pPB_OK.clear();
|
|
m_pPB_MoveUp.clear();
|
|
m_pPB_MoveDown.clear();
|
|
m_pPB_AutoOrder.clear();
|
|
ModalDialog::dispose();
|
|
}
|
|
|
|
void TabOrderDialog::FillList()
|
|
{
|
|
DBG_ASSERT( m_xTempModel.is() && m_xControlContainer.is(), "TabOrderDialog::FillList: invalid call!" );
|
|
if ( !m_xTempModel.is() || !m_xControlContainer.is() )
|
|
return;
|
|
|
|
m_pLB_Controls->Clear();
|
|
|
|
try
|
|
{
|
|
Sequence< Reference< XControlModel > > aControlModels( m_xTempModel->getControlModels() );
|
|
const Reference< XControlModel >* pControlModels = aControlModels.getConstArray();
|
|
|
|
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 );
|
|
m_pLB_Controls->InsertEntry( aName, aImage, aImage, nullptr, false, TREELIST_APPEND, xControl.get() );
|
|
}
|
|
}
|
|
else
|
|
{
|
|
// no property set -> no tab order
|
|
OSL_FAIL( "TabOrderDialog::FillList: invalid control encountered!" );
|
|
m_pLB_Controls->Clear();
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
catch( const Exception& )
|
|
{
|
|
OSL_FAIL( "TabOrderDialog::FillList: caught an exception!" );
|
|
}
|
|
|
|
// select first entry
|
|
SvTreeListEntry* pFirstEntry = m_pLB_Controls->GetEntry( 0 );
|
|
if ( pFirstEntry )
|
|
m_pLB_Controls->Select( pFirstEntry );
|
|
}
|
|
|
|
|
|
IMPL_LINK_NOARG( TabOrderDialog, MoveUpClickHdl, Button*, void )
|
|
{
|
|
m_pLB_Controls->MoveSelection( -1 );
|
|
}
|
|
|
|
|
|
IMPL_LINK_NOARG( TabOrderDialog, MoveDownClickHdl, Button*, void )
|
|
{
|
|
m_pLB_Controls->MoveSelection( 1 );
|
|
}
|
|
|
|
|
|
IMPL_LINK_NOARG( TabOrderDialog, AutoOrderClickHdl, Button*, void )
|
|
{
|
|
try
|
|
{
|
|
Reference< css::form::runtime::XFormController > xTabController = css::form::runtime::FormController::create( m_xORB );
|
|
|
|
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!" );
|
|
}
|
|
}
|
|
|
|
|
|
IMPL_LINK_NOARG( TabOrderDialog, OKClickHdl, Button*, void )
|
|
{
|
|
sal_uLong nEntryCount = m_pLB_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++)
|
|
{
|
|
SvTreeListEntry* pEntry = m_pLB_Controls->GetEntry(i);
|
|
|
|
for( sal_Int32 j=0; j<aControlModels.getLength(); j++ )
|
|
{
|
|
Reference< XPropertySet > xSet(pControlModels[j], UNO_QUERY);
|
|
if (xSet.get() == static_cast<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( RET_OK );
|
|
}
|
|
|
|
|
|
//= TabOrderListBox
|
|
|
|
|
|
TabOrderListBox::TabOrderListBox( vcl::Window* pParent, WinBits nBits )
|
|
:SvTreeListBox( pParent, nBits )
|
|
{
|
|
SetDragDropMode(DragDropMode::ALL/*DragDropMode::CTRL_MOVE*/);
|
|
// Hmm. The flag alone is not enough, so to be on the safe side ...
|
|
|
|
SetSelectionMode( SelectionMode::Multiple );
|
|
}
|
|
|
|
VCL_BUILDER_FACTORY_CONSTRUCTOR(TabOrderListBox, WB_TABSTOP)
|
|
|
|
TabOrderListBox::~TabOrderListBox()
|
|
{
|
|
}
|
|
|
|
|
|
void TabOrderListBox::ModelHasMoved( SvTreeListEntry* _pSource )
|
|
{
|
|
SvTreeListBox::ModelHasMoved( _pSource );
|
|
|
|
static_cast<TabOrderDialog*>(GetParentDialog())->SetModified();
|
|
}
|
|
|
|
|
|
void TabOrderListBox::MoveSelection( long nRelPos )
|
|
{
|
|
OUString aSelEntryPrevText, aSelEntryNextText;
|
|
Image aImage;
|
|
for (long i=0; i<labs(nRelPos); i++)
|
|
{
|
|
static_cast<TabOrderDialog*>(GetParentDialog())->SetModified();
|
|
|
|
|
|
// move entries
|
|
if( nRelPos < 0 )
|
|
{
|
|
SvTreeListEntry* pFirstSelected = FirstSelected();
|
|
if( !pFirstSelected ) return;
|
|
sal_uLong nFirstSelPos = GetModel()->GetAbsPos( pFirstSelected );
|
|
if( nFirstSelPos == 0 ) return;
|
|
|
|
SvTreeListEntry* pSelEntry = pFirstSelected;
|
|
while( pSelEntry )
|
|
{
|
|
sal_uLong nSelEntryPos = GetModel()->GetAbsPos( pSelEntry );
|
|
SvTreeListEntry* pSelEntryPrev = GetEntry( nSelEntryPos-1 );
|
|
aSelEntryPrevText = GetEntryText( pSelEntryPrev );
|
|
aImage = GetExpandedEntryBmp(pSelEntryPrev);
|
|
void* pData = pSelEntryPrev->GetUserData();
|
|
|
|
GetModel()->Remove( pSelEntryPrev );
|
|
InsertEntry( aSelEntryPrevText, aImage, aImage, nullptr, false, nSelEntryPos, pData );
|
|
|
|
pSelEntry = NextSelected( pSelEntry );
|
|
}
|
|
}
|
|
|
|
else if( nRelPos > 0 )
|
|
{
|
|
SvTreeListEntry* 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
|
|
|
|
|
|
SvTreeListEntry* pSelEntry = pLastSelected;
|
|
while( pSelEntry )
|
|
{
|
|
sal_uLong nSelEntryPos = GetModel()->GetAbsPos( pSelEntry );
|
|
SvTreeListEntry* pSelEntryNext = GetEntry( nSelEntryPos+1 );
|
|
void* pData = pSelEntryNext->GetUserData();
|
|
|
|
aSelEntryNextText = GetEntryText( pSelEntryNext );
|
|
aImage = GetExpandedEntryBmp(pSelEntryNext);
|
|
|
|
GetModel()->Remove( pSelEntryNext );
|
|
InsertEntry( aSelEntryNextText, aImage, aImage, nullptr, 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(ScrollType::LineDown);
|
|
else if((nThumbPos+nVisibleSize+1) >= (nFirstVisible))
|
|
GetVScroll()->DoScrollAction(ScrollType::LineUp);
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
} // namespace pcr
|
|
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|