mir/libreoffice
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
24a129b9f559f79df1d88e159760f907f4fdd37c
libreoffice/sw/source/ui/vba/vbarows.cxx
Sebastian Spaeth 61355e51b8 Add vim/emacs modelines to all source files 
Fixes #fdo30794 Based on bin/add-modelines script (originally posted
in mail 1286706307.1871.1399280959@webmail.messagingengine.com)

Signed-off-by: Sebastian Spaeth <Sebastian@SSpaeth.de>
2010-10-14 17:16:56 +02:00

372 lines
15 KiB
C++
Raw Blame History

/* -*- 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 2008 by Sun Microsystems, Inc.
*
* OpenOffice.org - a multi-platform office productivity suite
*
* $RCSfile:
* $Revision:
*
* 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.
*
************************************************************************/
#include "vbarows.hxx"
#include "vbarow.hxx"
#include <com/sun/star/text/HoriOrientation.hpp>
#include <com/sun/star/table/XCellRange.hpp>
#include <ooo/vba/word/WdRowAlignment.hpp>
#include <ooo/vba/word/WdConstants.hpp>
#include <ooo/vba/word/WdRulerStyle.hpp>
#include "wordvbahelper.hxx"
#include "vbacolumns.hxx"
#include "vbatablehelper.hxx"
using namespace ::ooo::vba;
using namespace ::com::sun::star;
class RowsEnumWrapper : public EnumerationHelper_BASE
{
uno::WeakReference< XHelperInterface > mxParent;
uno::Reference< uno::XComponentContext > mxContext;
uno::Reference< text::XTextTable > mxTextTable;
uno::Reference< container::XIndexAccess > mxIndexAccess;
sal_Int32 nIndex;
public:
RowsEnumWrapper( const uno::Reference< XHelperInterface >& xParent, const uno::Reference< uno::XComponentContext >& xContext, const uno::Reference< text::XTextTable >& xTextTable ) : mxParent( xParent ), mxContext( xContext ), mxTextTable( xTextTable ), nIndex( 0 )
{
mxIndexAccess.set( mxTextTable->getRows(), uno::UNO_QUERY );
}
virtual ::sal_Bool SAL_CALL hasMoreElements( ) throw (uno::RuntimeException)
{
return ( nIndex < mxIndexAccess->getCount() );
}
virtual uno::Any SAL_CALL nextElement( ) throw (container::NoSuchElementException, lang::WrappedTargetException, uno::RuntimeException)
{
if( nIndex < mxIndexAccess->getCount() )
{
return uno::makeAny( uno::Reference< word::XRow > ( new SwVbaRow( mxParent, mxContext, mxTextTable, nIndex++ ) ) );
}
throw container::NoSuchElementException();
}
};
SwVbaRows::SwVbaRows( const uno::Reference< XHelperInterface >& xParent, const uno::Reference< uno::XComponentContext > & xContext, const uno::Reference< text::XTextTable >& xTextTable, const uno::Reference< table::XTableRows >& xTableRows ) throw (uno::RuntimeException) : SwVbaRows_BASE( xParent, xContext, uno::Reference< container::XIndexAccess >( xTableRows, uno::UNO_QUERY_THROW ) ), mxTextTable( xTextTable ), mxTableRows( xTableRows )
{
mnStartRowIndex = 0;
mnEndRowIndex = m_xIndexAccess->getCount() - 1;
}
SwVbaRows::SwVbaRows( const uno::Reference< XHelperInterface >& xParent, const uno::Reference< uno::XComponentContext > & xContext, const uno::Reference< text::XTextTable >& xTextTable, const uno::Reference< table::XTableRows >& xTableRows, sal_Int32 nStarIndex, sal_Int32 nEndIndex ) throw (uno::RuntimeException) : SwVbaRows_BASE( xParent, xContext, uno::Reference< container::XIndexAccess >( xTableRows, uno::UNO_QUERY_THROW ) ), mxTextTable( xTextTable ), mxTableRows( xTableRows ), mnStartRowIndex( nStarIndex ), mnEndRowIndex( nEndIndex )
{
if( mnEndRowIndex < mnStartRowIndex )
throw uno::RuntimeException();
}
/**
* get the alignment of the rows: SO format com.sun.star.text.HoriOrientation
* is mapped to WdRowAlignment in Word
* @return the alignment
*/
::sal_Int32 SAL_CALL SwVbaRows::getAlignment() throw (uno::RuntimeException)
{
sal_Int16 nAlignment = text::HoriOrientation::LEFT;
uno::Reference< beans::XPropertySet > xTableProps( mxTextTable, uno::UNO_QUERY_THROW );
xTableProps->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("HoriOrient") ) ) >>= nAlignment;
sal_Int32 nRet = 0;
switch( nAlignment )
{
case text::HoriOrientation::CENTER:
{
nRet = word::WdRowAlignment::wdAlignRowCenter;
break;
}
case text::HoriOrientation::RIGHT:
{
nRet = word::WdRowAlignment::wdAlignRowRight;
break;
}
default:
{
nRet = word::WdRowAlignment::wdAlignRowLeft;
}
}
return nRet;
}
void SAL_CALL SwVbaRows::setAlignment( ::sal_Int32 _alignment ) throw (uno::RuntimeException)
{
sal_Int16 nAlignment = text::HoriOrientation::LEFT;
switch( _alignment )
{
case word::WdRowAlignment::wdAlignRowCenter:
{
nAlignment = text::HoriOrientation::CENTER;
break;
}
case word::WdRowAlignment::wdAlignRowRight:
{
nAlignment = text::HoriOrientation::RIGHT;
break;
}
default:
{
nAlignment = text::HoriOrientation::LEFT;
}
}
uno::Reference< beans::XPropertySet > xTableProps( mxTextTable, uno::UNO_QUERY_THROW );
xTableProps->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("HoriOrient") ), uno::makeAny( nAlignment ) );
}
uno::Any SAL_CALL SwVbaRows::getAllowBreakAcrossPages() throw (uno::RuntimeException)
{
sal_Bool bAllowBreak = sal_False;
uno::Reference< container::XIndexAccess > xRowsAccess( mxTableRows, uno::UNO_QUERY_THROW );
for( sal_Int32 index = mnStartRowIndex; index <= mnEndRowIndex; ++index )
{
uno::Reference< beans::XPropertySet > xRowProps( xRowsAccess->getByIndex( index ), uno::UNO_QUERY_THROW );
sal_Bool bSplit = sal_False;
xRowProps->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("IsSplitAllowed") ) ) >>= bSplit;
if( index == 0 )
{
bAllowBreak = bSplit;
}
if( bSplit != bAllowBreak )
{
sal_Int32 nRet = word::WdConstants::wdUndefined;
return uno::makeAny( nRet );
}
}
return uno::makeAny( bAllowBreak );
}
void SAL_CALL SwVbaRows::setAllowBreakAcrossPages( const uno::Any& _allowbreakacrosspages ) throw (uno::RuntimeException)
{
sal_Bool bAllowBreak = sal_False;
_allowbreakacrosspages >>= bAllowBreak;
uno::Reference< container::XIndexAccess > xRowsAccess( mxTableRows, uno::UNO_QUERY_THROW );
for( sal_Int32 index = mnStartRowIndex; index <= mnEndRowIndex; ++index )
{
uno::Reference< beans::XPropertySet > xRowProps( xRowsAccess->getByIndex( index ), uno::UNO_QUERY_THROW );
xRowProps->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("IsSplitAllowed") ), uno::makeAny( bAllowBreak ) );
}
}
float SAL_CALL SwVbaRows::getSpaceBetweenColumns() throw (uno::RuntimeException)
{
// just get the first spacing of the first cell
uno::Reference< table::XCellRange > xCellRange( mxTextTable, uno::UNO_QUERY_THROW );
uno::Reference< beans::XPropertySet > xCellProps( xCellRange->getCellByPosition( 0, mnStartRowIndex ), uno::UNO_QUERY_THROW );
sal_Int32 nLeftBorderDistance = 0;
sal_Int32 nRightBorderDistance = 0;
xCellProps->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("LeftBorderDistance") ) ) >>= nLeftBorderDistance;
xCellProps->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("RightBorderDistance") ) ) >>= nRightBorderDistance;
return static_cast< float >( Millimeter::getInPoints( nLeftBorderDistance + nRightBorderDistance ) );
}
void SAL_CALL SwVbaRows::setSpaceBetweenColumns( float _spacebetweencolumns ) throw (uno::RuntimeException)
{
sal_Int32 nSpace = Millimeter::getInHundredthsOfOneMillimeter( _spacebetweencolumns ) / 2;
uno::Reference< container::XIndexAccess > xColumnAccess( mxTextTable->getColumns(), uno::UNO_QUERY_THROW );
uno::Reference< table::XCellRange > xCellRange( mxTextTable, uno::UNO_QUERY_THROW );
SwVbaTableHelper aTableHelper( mxTextTable );
for( sal_Int32 row = mnStartRowIndex; row <= mnEndRowIndex; ++row )
{
sal_Int32 nColumns = aTableHelper.getTabColumnsCount( row );
for( sal_Int32 column = 0; column < nColumns; ++column )
{
uno::Reference< beans::XPropertySet > xCellProps( xCellRange->getCellByPosition( column, row ), uno::UNO_QUERY_THROW );
xCellProps->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("LeftBorderDistance") ), uno::makeAny( nSpace ) );
xCellProps->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("RightBorderDistance") ), uno::makeAny( nSpace ) );
}
}
}
void SAL_CALL SwVbaRows::Delete( ) throw (uno::RuntimeException)
{
mxTableRows->removeByIndex( mnStartRowIndex, getCount() );
}
void SAL_CALL SwVbaRows::SetLeftIndent( float LeftIndent, ::sal_Int32 RulerStyle ) throw (uno::RuntimeException)
{
uno::Reference< word::XColumns > xColumns( new SwVbaColumns( getParent(), mxContext, mxTextTable, mxTextTable->getColumns() ) );
sal_Int32 nIndent = (sal_Int32)( LeftIndent );
switch( RulerStyle )
{
case word::WdRulerStyle::wdAdjustFirstColumn:
{
setIndentWithAdjustFirstColumn( xColumns, nIndent );
break;
}
case word::WdRulerStyle::wdAdjustNone:
{
setIndentWithAdjustNone( nIndent );
break;
}
case word::WdRulerStyle::wdAdjustProportional:
{
setIndentWithAdjustProportional( xColumns, nIndent );
break;
}
case word::WdRulerStyle::wdAdjustSameWidth:
{
setIndentWithAdjustSameWidth( xColumns, nIndent );
break;
}
default:
{
DebugHelper::exception(SbERR_BAD_ARGUMENT, rtl::OUString());
}
}
}
void SwVbaRows::setIndentWithAdjustNone( sal_Int32 indent ) throw (uno::RuntimeException)
{
uno::Reference< beans::XPropertySet > xTableProps( mxTextTable, uno::UNO_QUERY_THROW );
sal_Int32 nMargin = 0;
xTableProps->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("LeftMargin") ) ) >>= nMargin;
nMargin += indent;
xTableProps->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("LeftMargin") ), uno::makeAny( nMargin ) );
}
void SwVbaRows::setIndentWithAdjustFirstColumn( const uno::Reference< word::XColumns >& xColumns, sal_Int32 indent ) throw (uno::RuntimeException)
{
sal_Int32 nIndex = 1;
uno::Reference< XCollection > xCol( xColumns, uno::UNO_QUERY_THROW );
uno::Reference< word::XColumn > xColumn( xCol->Item( uno::makeAny( nIndex ), uno::Any() ), uno::UNO_QUERY_THROW );
sal_Int32 nWidth = xColumn->getWidth();
nWidth -= indent;
xColumn->setWidth( nWidth );
setIndentWithAdjustNone( indent );
}
void SwVbaRows::setIndentWithAdjustProportional( const uno::Reference< word::XColumns >& xColumns, sal_Int32 indent ) throw (uno::RuntimeException)
{
// calculate the new width and get the proportion between old and new
uno::Reference< beans::XPropertySet > xTableProps( mxTextTable, uno::UNO_QUERY_THROW );
sal_Int32 nWidth = 0;
xTableProps->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("Width") ) ) >>= nWidth;
sal_Int32 nNewWidth = nWidth - indent;
double propFactor = (double)nNewWidth/(double)nWidth;
// get all columns, calculate and set the new width of the columns
uno::Reference< XCollection > xCol( xColumns, uno::UNO_QUERY_THROW );
sal_Int32 nColCount = xCol->getCount();
for( sal_Int32 i = 0; i < nColCount; i++ )
{
uno::Reference< word::XColumn > xColumn( xCol->Item( uno::makeAny( i ), uno::Any() ), uno::UNO_QUERY_THROW );
sal_Int32 nColWidth = xColumn->getWidth();
sal_Int32 nNewColWidth = ( sal_Int32 )( propFactor * nColWidth );
xColumn->setWidth( nNewColWidth );
}
// set the width and position of the table
setIndentWithAdjustNone( indent );
xTableProps->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("Width") ), uno::makeAny( nNewWidth ) );
}
void SwVbaRows::setIndentWithAdjustSameWidth( const uno::Reference< word::XColumns >& xColumns, sal_Int32 indent ) throw (uno::RuntimeException)
{
// calculate the new width and get the width of all columns
uno::Reference< beans::XPropertySet > xTableProps( mxTextTable, uno::UNO_QUERY_THROW );
sal_Int32 nWidth = 0;
xTableProps->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("Width") ) ) >>= nWidth;
sal_Int32 nNewWidth = nWidth - indent;
// get all columns, calculate and set the new width of the columns
uno::Reference< XCollection > xCol( xColumns, uno::UNO_QUERY_THROW );
sal_Int32 nColCount = xCol->getCount();
sal_Int32 nNewColWidth = (sal_Int32)( double( nNewWidth )/nColCount );
for( sal_Int32 i = 0; i < nColCount; i++ )
{
uno::Reference< word::XColumn > xColumn( xCol->Item( uno::makeAny( i ), uno::Any() ), uno::UNO_QUERY_THROW );
xColumn->setWidth( nNewColWidth );
}
// set the width and position of the table
setIndentWithAdjustNone( indent );
xTableProps->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("Width") ), uno::makeAny( nNewWidth ) );
}
void SAL_CALL SwVbaRows::Select( ) throw (uno::RuntimeException)
{
SwVbaRow::SelectRow( getCurrentWordDoc(mxContext), mxTextTable, mnStartRowIndex, mnEndRowIndex );
}
::sal_Int32 SAL_CALL SwVbaRows::getCount() throw (uno::RuntimeException)
{
return ( mnEndRowIndex - mnStartRowIndex + 1 );
}
uno::Any SAL_CALL SwVbaRows::Item( const uno::Any& Index1, const uno::Any& /*not processed in this base class*/ ) throw (uno::RuntimeException)
{
sal_Int32 nIndex = 0;
if( ( Index1 >>= nIndex ) == sal_True )
{
if( nIndex <= 0 || nIndex > getCount() )
{
throw lang::IndexOutOfBoundsException( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("Index out of bounds") ), uno::Reference< uno::XInterface >() );
}
return uno::makeAny( uno::Reference< word::XRow >( new SwVbaRow( this, mxContext, mxTextTable, nIndex - 1 ) ) );
}
throw uno::RuntimeException( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("Index out of bounds") ), uno::Reference< uno::XInterface >() );
}
// XEnumerationAccess
uno::Type
SwVbaRows::getElementType() throw (uno::RuntimeException)
{
return word::XRow::static_type(0);
}
uno::Reference< container::XEnumeration >
SwVbaRows::createEnumeration() throw (uno::RuntimeException)
{
return new RowsEnumWrapper( this, mxContext, mxTextTable );
}
uno::Any
SwVbaRows::createCollectionObject( const uno::Any& aSource )
{
return aSource;
}
rtl::OUString&
SwVbaRows::getServiceImplName()
{
static rtl::OUString sImplName( RTL_CONSTASCII_USTRINGPARAM("SwVbaRows") );
return sImplName;
}
uno::Sequence<rtl::OUString>
SwVbaRows::getServiceNames()
{
static uno::Sequence< rtl::OUString > sNames;
if ( sNames.getLength() == 0 )
{
sNames.realloc( 1 );
sNames[0] = rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("ooo.vba.word.Rows") );
}
return sNames;
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
Reference in New Issue View Git Blame Copy Permalink