/* -*- 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 <com/sun/star/awt/XTextArea.hpp>
#include <com/sun/star/awt/XVclWindowPeer.hpp>
#include <com/sun/star/lang/IndexOutOfBoundsException.hpp>
#include <com/sun/star/uno/XComponentContext.hpp>
#include <com/sun/star/awt/VisualEffect.hpp>
#include <com/sun/star/awt/LineEndFormat.hpp>
#include <com/sun/star/graphic/GraphicProvider.hpp>
#include <com/sun/star/graphic/XGraphicProvider.hpp>
#include <com/sun/star/util/Date.hpp>
#include <com/sun/star/awt/ImageScaleMode.hpp>
#include <o3tl/safeint.hxx>
#include <controls/formattedcontrol.hxx>
#include <toolkit/controls/unocontrols.hxx>
#include <tools/urlobj.hxx>
#include <helper/property.hxx>
#include <toolkit/helper/macros.hxx>
#include <unotools/securityoptions.hxx>
// for introspection
#include <awt/vclxwindows.hxx>
#include <cppuhelper/typeprovider.hxx>
#include <cppuhelper/queryinterface.hxx>
#include <comphelper/processfactory.hxx>
#include <comphelper/propertyvalue.hxx>
#include <tools/debug.hxx>
#include <comphelper/diagnose_ex.hxx>
#include <algorithm>
#include <helper/imagealign.hxx>
#include <helper/unopropertyarrayhelper.hxx>
#include <utility>
using namespace css;
using namespace css::awt;
using namespace css::lang;
using namespace css::uno;
using ::com::sun::star::graphic::XGraphic;
using ::com::sun::star::uno::Reference;
using namespace ::toolkit;
uno::Reference< graphic::XGraphic >
ImageHelper::getGraphicAndGraphicObjectFromURL_nothrow( uno::Reference< graphic::XG
raphicObject >& xOutGraphicObj, const OUString& _rURL )
{
xOutGraphicObj = nullptr;
return ImageHelper::getGraphicFromURL_nothrow( _rURL, u"" _ustr );
}
css::uno::Reference< css::graphic::XGraphic >
ImageHelper::getGraphicFromURL_nothrow( const OUString& _rURL, OUString const & referer )
{
uno::Reference< graphic::XGraphic > xGraphic;
if (_rURL.isEmpty() || SvtSecurityOptions::isUntrustedReferer(referer) || INetURLObject(_rURL).IsExoticProtocol())
return xGraphic;
try
{
const uno::Reference< uno::XComponentContext >& xContext( ::comphelper::getProcessComponentContext() );
uno::Reference< graphic::XGraphicProvider > xProvider( graphic::GraphicProvider::create(xContext) );
xGraphic = xProvider->queryGraphic({ comphelper::makePropertyValue(u"URL" _ustr, _rURL) });
}
catch (const Exception&)
{
DBG_UNHANDLED_EXCEPTION("toolkit.controls" );
}
return xGraphic;
}
UnoControlEditModel::UnoControlEditModel( const Reference< XComponentContext >& rxContext )
:UnoControlModel( rxContext )
{
UNO_CONTROL_MODEL_REGISTER_PROPERTIES<VCLXEdit>();
}
OUString UnoControlEditModel::getServiceName( )
{
return u"stardiv.vcl.controlmodel.Edit" _ustr;
}
uno::Any UnoControlEditModel::ImplGetDefaultValue( sal_uInt16 nPropId ) const
{
uno::Any aReturn;
switch ( nPropId )
{
case BASEPROPERTY_LINE_END_FORMAT:
aReturn <<= sal_Int16(awt::LineEndFormat::LINE_FEED); // LF
break ;
case BASEPROPERTY_DEFAULTCONTROL:
aReturn <<= u"stardiv.vcl.control.Edit" _ustr;
break ;
default :
aReturn = UnoControlModel::ImplGetDefaultValue( nPropId );
break ;
}
return aReturn;
}
::cppu::IPropertyArrayHelper& UnoControlEditModel::getInfoHelper()
{
static UnoPropertyArrayHelper aHelper( ImplGetPropertyIds() );
return aHelper;
}
// beans::XMultiPropertySet
uno::Reference< beans::XPropertySetInfo > UnoControlEditModel::getPropertySetInfo( )
{
static uno::Reference< beans::XPropertySetInfo > xInfo( createPropertySetInfo( getInfoHelper() ) );
return xInfo;
}
OUString UnoControlEditModel::getImplementationName()
{
return u"stardiv.Toolkit.UnoControlEditModel" _ustr;
}
css::uno::Sequence<OUString> UnoControlEditModel::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlEditModel" _ustr, u"stardiv.vcl.controlmodel.Edit" _ustr };
return comphelper::concatSequences(UnoControlModel::getSupportedServiceNames(), vals);
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoControlEditModel_get_implementation(
css::uno::XComponentContext *context,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoControlEditModel(context));
}
UnoEditControl::UnoEditControl()
:maTextListeners( *this )
,mnMaxTextLen( 0 )
,mbSetTextInPeer( false )
,mbSetMaxTextLenInPeer( false )
,mbHasTextProperty( false )
{
maComponentInfos.nWidth = 100;
maComponentInfos.nHeight = 12;
}
uno::Any SAL_CALL UnoEditControl::queryAggregation( const uno::Type & rType )
{
uno::Any aReturn = UnoControlBase::queryAggregation( rType );
if ( !aReturn.hasValue() )
aReturn = UnoEditControl_Base::queryInterface( rType );
return aReturn;
}
uno::Any SAL_CALL UnoEditControl::queryInterface( const uno::Type & rType )
{
return UnoControlBase::queryInterface( rType );
}
void SAL_CALL UnoEditControl::acquire( ) noexcept
{
UnoControlBase::acquire();
}
void SAL_CALL UnoEditControl::release( ) noexcept
{
UnoControlBase::release();
}
IMPLEMENT_FORWARD_XTYPEPROVIDER2( UnoEditControl, UnoControlBase, UnoEditControl_Base )
OUString UnoEditControl::GetComponentServiceName() const
{
// by default, we want a simple edit field
OUString sName( u"Edit" _ustr );
// but maybe we are to display multi-line text?
uno::Any aVal = ImplGetPropertyValue( GetPropertyName( BASEPROPERTY_MULTILINE ) );
bool b = bool ();
if ( ( aVal >>= b ) && b )
sName = "MultiLineEdit" ;
return sName;
}
sal_Bool SAL_CALL UnoEditControl::setModel(const uno::Reference< awt::XControlModel >& _rModel)
{
bool bReturn = UnoControlBase::setModel( _rModel );
mbHasTextProperty = ImplHasProperty( BASEPROPERTY_TEXT );
return bReturn;
}
void UnoEditControl::ImplSetPeerProperty( const OUString& rPropName, const uno::Any& rVal )
{
bool bDone = false ;
if ( GetPropertyId( rPropName ) == BASEPROPERTY_TEXT )
{
// #96986# use setText(), or text listener will not be called.
uno::Reference < awt::XTextComponent > xTextComponent( getPeer(), uno::UNO_QUERY );
if ( xTextComponent.is() )
{
OUString sText;
rVal >>= sText;
ImplCheckLocalize( sText );
xTextComponent->setText( sText );
bDone = true ;
}
}
if ( !bDone )
UnoControlBase::ImplSetPeerProperty( rPropName, rVal );
}
void UnoEditControl::dispose()
{
lang::EventObject aEvt( *this );
maTextListeners.disposeAndClear( aEvt );
UnoControl::dispose();
}
void UnoEditControl::createPeer( const uno::Reference< awt::XToolkit > & rxToolkit, const uno::Reference< awt::XWindowPeer > & rParentPeer )
{
UnoControl::createPeer( rxToolkit, rParentPeer );
uno::Reference< awt::XTextComponent > xText( getPeer(), uno::UNO_QUERY );
if ( xText.is() )
{
xText->addTextListener( this );
if ( mbSetMaxTextLenInPeer )
xText->setMaxTextLen( mnMaxTextLen );
if ( mbSetTextInPeer )
xText->setText( maText );
}
}
void UnoEditControl::textChanged(const awt::TextEvent& e)
{
uno::Reference< awt::XTextComponent > xText( getPeer(), uno::UNO_QUERY );
if ( mbHasTextProperty )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_TEXT ), uno::Any(xText->getText()), false );
}
else
{
maText = xText->getText();
}
if ( maTextListeners.getLength() )
maTextListeners.textChanged( e );
}
void UnoEditControl::addTextListener(const uno::Reference< awt::XTextListener > & l)
{
// tdf#150974 some extensions pass null
if (!l)
{
SAL_WARN("toolkit" , "null XTextListener" );
return ;
}
maTextListeners.addInterface( l );
}
void UnoEditControl::removeTextListener(const uno::Reference< awt::XTextListener > & l)
{
// tdf#150974 some extensions pass null
if (!l)
{
SAL_WARN("toolkit" , "null XTextListener" );
return ;
}
maTextListeners.removeInterface( l );
}
void UnoEditControl::setText( const OUString& aText )
{
if ( mbHasTextProperty )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_TEXT ), uno::Any(aText), true );
}
else
{
maText = aText;
mbSetTextInPeer = true ;
uno::Reference < awt::XTextComponent > xText( getPeer(), uno::UNO_QUERY );
if ( xText.is() )
xText->setText( maText );
}
// Setting the property to the VCLXWindow doesn't call textChanged
if ( maTextListeners.getLength() )
{
awt::TextEvent aEvent;
aEvent.Source = *this ;
maTextListeners.textChanged( aEvent );
}
}
namespace
{
void lcl_normalize( awt::Selection& _rSel )
{
if ( _rSel.Min > _rSel.Max )
::std::swap( _rSel.Min, _rSel.Max );
}
}
void UnoEditControl::insertText( const awt::Selection& rSel, const OUString& rNewText )
{
// normalize the selection - OUString::replaceAt has a strange behaviour if the min is greater than the max
awt::Selection aSelection( rSel );
lcl_normalize( aSelection );
OUString aOldText = getText();
if (aSelection.Min < 0 || aOldText.getLength() < aSelection.Max)
{
throw lang::IllegalArgumentException();
}
// preserve the selection resp. cursor position
awt::Selection aNewSelection( getSelection() );
#ifdef ALSO_PRESERVE_COMPLETE_SELECTION
// (not sure - looks uglier ...)
sal_Int32 nDeletedCharacters = ( aSelection.Max - aSelection.Min ) - rNewText.getLength();
if ( aNewSelection.Min > aSelection.Min )
aNewSelection.Min -= nDeletedCharacters;
if ( aNewSelection.Max > aSelection.Max )
aNewSelection.Max -= nDeletedCharacters;
#else
aNewSelection.Max = ::std::min( aNewSelection.Min, aNewSelection.Max ) + rNewText.getLength();
aNewSelection.Min = aNewSelection.Max;
#endif
OUString aNewText = aOldText.replaceAt( aSelection.Min, aSelection.Max - aSelection.Min, rNewText );
setText( aNewText );
setSelection( aNewSelection );
}
OUString UnoEditControl::getText()
{
OUString aText = maText;
if ( mbHasTextProperty )
aText = ImplGetPropertyValue_UString( BASEPROPERTY_TEXT );
else
{
uno::Reference< awt::XTextComponent > xText( getPeer(), uno::UNO_QUERY );
if ( xText.is() )
aText = xText->getText();
}
return aText;
}
OUString UnoEditControl::getSelectedText()
{
OUString sSelected;
uno::Reference< awt::XTextComponent > xText( getPeer(), uno::UNO_QUERY );
if ( xText.is() )
sSelected = xText->getSelectedText();
return sSelected;
}
void UnoEditControl::setSelection( const awt::Selection& aSelection )
{
uno::Reference< awt::XTextComponent > xText( getPeer(), uno::UNO_QUERY );
if ( xText.is() )
xText->setSelection( aSelection );
}
awt::Selection UnoEditControl::getSelection()
{
awt::Selection aSel;
uno::Reference< awt::XTextComponent > xText( getPeer(), uno::UNO_QUERY );
if ( xText.is() )
aSel = xText->getSelection();
return aSel;
}
sal_Bool UnoEditControl::isEditable()
{
return !ImplGetPropertyValue_BOOL( BASEPROPERTY_READONLY );
}
void UnoEditControl::setEditable( sal_Bool bEditable )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_READONLY ), uno::Any(!bEditable), true );
}
sal_Int16 UnoEditControl::getMaxTextLen()
{
sal_Int16 nMaxLen = mnMaxTextLen;
if ( ImplHasProperty( BASEPROPERTY_MAXTEXTLEN ) )
nMaxLen = ImplGetPropertyValue_INT16( BASEPROPERTY_MAXTEXTLEN );
return nMaxLen;
}
void UnoEditControl::setMaxTextLen( sal_Int16 nLen )
{
if ( ImplHasProperty( BASEPROPERTY_MAXTEXTLEN) )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_MAXTEXTLEN ), uno::Any(nLen), true );
}
else
{
mnMaxTextLen = nLen;
mbSetMaxTextLenInPeer = true ;
uno::Reference < awt::XTextComponent > xText( getPeer(), uno::UNO_QUERY );
if ( xText.is() )
xText->setMaxTextLen( mnMaxTextLen );
}
}
awt::Size UnoEditControl::getMinimumSize( )
{
return Impl_getMinimumSize();
}
awt::Size UnoEditControl::getPreferredSize( )
{
return Impl_getPreferredSize();
}
awt::Size UnoEditControl::calcAdjustedSize( const awt::Size& rNewSize )
{
return Impl_calcAdjustedSize( rNewSize );
}
awt::Size UnoEditControl::getMinimumSize( sal_Int16 nCols, sal_Int16 nLines )
{
return Impl_getMinimumSize( nCols, nLines );
}
void UnoEditControl::getColumnsAndLines( sal_Int16& nCols, sal_Int16& nLines )
{
Impl_getColumnsAndLines( nCols, nLines );
}
OUString UnoEditControl::getImplementationName( )
{
return u"stardiv.Toolkit.UnoEditControl" _ustr;
}
uno::Sequence< OUString > UnoEditControl::getSupportedServiceNames()
{
css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlEdit" _ustr, u"stardiv.vcl.control.Edit" _ustr };
return comphelper::concatSequences( UnoControlBase::getSupportedServiceNames( ), vals);
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoEditControl_get_implementation(
css::uno::XComponentContext *,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoEditControl());
}
UnoControlFileControlModel::UnoControlFileControlModel( const Reference< XComponentContext >& rxContext )
:UnoControlModel( rxContext )
{
ImplRegisterProperty( BASEPROPERTY_ALIGN );
ImplRegisterProperty( BASEPROPERTY_BACKGROUNDCOLOR );
ImplRegisterProperty( BASEPROPERTY_BORDER );
ImplRegisterProperty( BASEPROPERTY_BORDERCOLOR );
ImplRegisterProperty( BASEPROPERTY_DEFAULTCONTROL );
ImplRegisterProperty( BASEPROPERTY_ENABLED );
ImplRegisterProperty( BASEPROPERTY_ENABLEVISIBLE );
ImplRegisterProperty( BASEPROPERTY_FONTDESCRIPTOR );
ImplRegisterProperty( BASEPROPERTY_HELPTEXT );
ImplRegisterProperty( BASEPROPERTY_HELPURL );
ImplRegisterProperty( BASEPROPERTY_PRINTABLE );
ImplRegisterProperty( BASEPROPERTY_READONLY );
ImplRegisterProperty( BASEPROPERTY_TABSTOP );
ImplRegisterProperty( BASEPROPERTY_TEXT );
ImplRegisterProperty( BASEPROPERTY_VERTICALALIGN );
ImplRegisterProperty( BASEPROPERTY_WRITING_MODE );
ImplRegisterProperty( BASEPROPERTY_CONTEXT_WRITING_MODE );
ImplRegisterProperty( BASEPROPERTY_HIDEINACTIVESELECTION );
}
OUString UnoControlFileControlModel::getServiceName()
{
return u"stardiv.vcl.controlmodel.FileControl" _ustr;
}
uno::Any UnoControlFileControlModel::ImplGetDefaultValue( sal_uInt16 nPropId ) const
{
if ( nPropId == BASEPROPERTY_DEFAULTCONTROL )
{
return uno::Any( u"stardiv.vcl.control.FileControl" _ustr );
}
return UnoControlModel::ImplGetDefaultValue( nPropId );
}
::cppu::IPropertyArrayHelper& UnoControlFileControlModel::getInfoHelper()
{
static UnoPropertyArrayHelper aHelper( ImplGetPropertyIds() );
return aHelper;
}
// beans::XMultiPropertySet
uno::Reference< beans::XPropertySetInfo > UnoControlFileControlModel::getPropertySetInfo( )
{
static uno::Reference< beans::XPropertySetInfo > xInfo( createPropertySetInfo( getInfoHelper() ) );
return xInfo;
}
OUString UnoControlFileControlModel::getImplementationName()
{
return u"stardiv.Toolkit.UnoControlFileControlModel" _ustr;
}
css::uno::Sequence<OUString>
UnoControlFileControlModel::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlFileControlModel" _ustr, u"stardiv.vcl.controlmodel.FileControl" _ustr };
return comphelper::concatSequences( UnoControlModel::getSupportedServiceNames(), vals);
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoControlFileControlModel_get_implementation(
css::uno::XComponentContext *context,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoControlFileControlModel(context));
}
UnoFileControl::UnoFileControl()
{
}
OUString UnoFileControl::GetComponentServiceName() const
{
return u"filecontrol" _ustr;
}
OUString UnoFileControl::getImplementationName()
{
return u"stardiv.Toolkit.UnoFileControl" _ustr;
}
css::uno::Sequence<OUString> UnoFileControl::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlFileControl" _ustr, u"stardiv.vcl.control.FileControl" _ustr };
return comphelper::concatSequences( UnoEditControl::getSupportedServiceNames(), vals );
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoFileControl_get_implementation(
css::uno::XComponentContext *,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoFileControl());
}
uno::Any GraphicControlModel::ImplGetDefaultValue( sal_uInt16 nPropId ) const
{
if ( nPropId == BASEPROPERTY_GRAPHIC )
return uno::Any( uno::Reference< graphic::XGraphic >() );
return UnoControlModel::ImplGetDefaultValue( nPropId );
}
void GraphicControlModel::setFastPropertyValue_NoBroadcast( std::unique_lock<std::mutex>& rGuard, sal_Int32 nHandle, const css::uno::Any& rValue )
{
UnoControlModel::setFastPropertyValue_NoBroadcast( rGuard, nHandle, rValue );
// - ImageAlign and ImagePosition need to correspond to each other
// - Graphic and ImageURL need to correspond to each other
try
{
switch ( nHandle )
{
case BASEPROPERTY_IMAGEURL:
if ( !mbAdjustingGraphic && ImplHasProperty( BASEPROPERTY_GRAPHIC ) )
{
mbAdjustingGraphic = true ;
OUString sImageURL;
OSL_VERIFY( rValue >>= sImageURL );
css::uno::Any any;
getFastPropertyValue(rGuard, any, BASEPROPERTY_REFERER);
OUString referer;
any >>= referer;
setDependentFastPropertyValue( rGuard, BASEPROPERTY_GRAPHIC, uno::Any( ImageHelper::getGraphicFromURL_nothrow( sImageURL, referer ) ) );
mbAdjustingGraphic = false ;
}
break ;
case BASEPROPERTY_GRAPHIC:
if ( !mbAdjustingGraphic && ImplHasProperty( BASEPROPERTY_IMAGEURL ) )
{
mbAdjustingGraphic = true ;
setDependentFastPropertyValue( rGuard, BASEPROPERTY_IMAGEURL, uno::Any( OUString() ) );
mbAdjustingGraphic = false ;
}
break ;
case BASEPROPERTY_IMAGEALIGN:
if ( !mbAdjustingImagePosition && ImplHasProperty( BASEPROPERTY_IMAGEPOSITION ) )
{
mbAdjustingImagePosition = true ;
sal_Int16 nUNOValue = 0;
OSL_VERIFY( rValue >>= nUNOValue );
setDependentFastPropertyValue( rGuard, BASEPROPERTY_IMAGEPOSITION, uno::Any( getExtendedImagePosition( nUNOValue ) ) );
mbAdjustingImagePosition = false ;
}
break ;
case BASEPROPERTY_IMAGEPOSITION:
if ( !mbAdjustingImagePosition && ImplHasProperty( BASEPROPERTY_IMAGEALIGN ) )
{
mbAdjustingImagePosition = true ;
sal_Int16 nUNOValue = 0;
OSL_VERIFY( rValue >>= nUNOValue );
setDependentFastPropertyValue( rGuard, BASEPROPERTY_IMAGEALIGN, uno::Any( getCompatibleImageAlign( translateImagePosition( nUNOValue ) ) ) );
mbAdjustingImagePosition = false ;
}
break ;
}
}
catch ( const css::uno::Exception& )
{
DBG_UNHANDLED_EXCEPTION("toolkit.controls" );
OSL_FAIL( "GraphicControlModel::setFastPropertyValue_NoBroadcast: caught an exception while aligning the ImagePosition/ImageAlign properties!" );
mbAdjustingImagePosition = false ;
}
}
UnoControlButtonModel::UnoControlButtonModel( const Reference< XComponentContext >& rxContext )
:GraphicControlModel( rxContext )
{
UNO_CONTROL_MODEL_REGISTER_PROPERTIES<VCLXButton>();
osl_atomic_increment( &m_refCount );
{
std::unique_lock aGuard(m_aMutex);
setFastPropertyValue_NoBroadcast( aGuard, BASEPROPERTY_IMAGEPOSITION, ImplGetDefaultValue( BASEPROPERTY_IMAGEPOSITION ) );
// this ensures that our ImagePosition is consistent with our ImageAlign property (since both
// defaults are not per se consistent), since both are coupled in setFastPropertyValue_NoBroadcast
}
osl_atomic_decrement( &m_refCount );
}
OUString UnoControlButtonModel::getServiceName()
{
return u"stardiv.vcl.controlmodel.Button" _ustr;
}
uno::Any UnoControlButtonModel::ImplGetDefaultValue( sal_uInt16 nPropId ) const
{
switch ( nPropId )
{
case BASEPROPERTY_DEFAULTCONTROL:
return uno::Any( u"stardiv.vcl.control.Button" _ustr );
case BASEPROPERTY_TOGGLE:
return uno::Any( false );
case BASEPROPERTY_ALIGN:
return uno::Any( sal_Int16(PROPERTY_ALIGN_CENTER) );
case BASEPROPERTY_FOCUSONCLICK:
return uno::Any( true );
}
return GraphicControlModel::ImplGetDefaultValue( nPropId );
}
::cppu::IPropertyArrayHelper& UnoControlButtonModel::getInfoHelper()
{
static UnoPropertyArrayHelper aHelper( ImplGetPropertyIds() );
return aHelper;
}
// beans::XMultiPropertySet
uno::Reference< beans::XPropertySetInfo > UnoControlButtonModel::getPropertySetInfo( )
{
static uno::Reference< beans::XPropertySetInfo > xInfo( createPropertySetInfo( getInfoHelper() ) );
return xInfo;
}
OUString UnoControlButtonModel::getImplementationName()
{
return u"stardiv.Toolkit.UnoControlButtonModel" _ustr;
}
css::uno::Sequence<OUString> UnoControlButtonModel::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlButtonModel" _ustr, u"stardiv.vcl.controlmodel.Button" _ustr };
return comphelper::concatSequences( GraphicControlModel::getSupportedServiceNames(), vals );
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoControlButtonModel_get_implementation(
css::uno::XComponentContext *context,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoControlButtonModel(context));
}
UnoButtonControl::UnoButtonControl()
:maActionListeners( *this )
,maItemListeners( *this )
{
maComponentInfos.nWidth = 50;
maComponentInfos.nHeight = 14;
}
OUString UnoButtonControl::GetComponentServiceName() const
{
OUString aName( u"pushbutton" _ustr );
uno::Any aVal = ImplGetPropertyValue( GetPropertyName( BASEPROPERTY_PUSHBUTTONTYPE ) );
sal_Int16 n = sal_Int16();
if ( ( aVal >>= n ) && n )
{
// Use PushButtonType later when available...
switch ( n )
{
case 1 /*PushButtonType::OK*/: aName = "okbutton";
break ;
case 2 /*PushButtonType::CANCEL*/: aName = "cancelbutton";
break ;
case 3 /*PushButtonType::HELP*/: aName = "helpbutton";
break ;
default :
{
OSL_FAIL( "Unknown Button Type!" );
}
}
}
return aName;
}
void UnoButtonControl::dispose()
{
lang::EventObject aEvt;
aEvt.Source = getXWeak();
maActionListeners.disposeAndClear( aEvt );
maItemListeners.disposeAndClear( aEvt );
UnoControlBase::dispose();
}
void UnoButtonControl::createPeer( const uno::Reference< awt::XToolkit > & rxToolkit, const uno::Reference< awt::XWindowPeer > & rParentPeer )
{
UnoControlBase::createPeer( rxToolkit, rParentPeer );
uno::Reference < awt::XButton > xButton( getPeer(), uno::UNO_QUERY );
xButton->setActionCommand( maActionCommand );
if ( maActionListeners.getLength() )
xButton->addActionListener( &maActionListeners );
uno::Reference< XToggleButton > xPushButton( getPeer(), uno::UNO_QUERY );
if ( xPushButton.is() )
xPushButton->addItemListener( this );
}
void UnoButtonControl::addActionListener(const uno::Reference< awt::XActionListener > & l)
{
// tdf#150974 some extensions pass null
if (!l)
{
SAL_WARN("toolkit" , "null XActionListener" );
return ;
}
maActionListeners.addInterface( l );
if ( getPeer().is() && maActionListeners.getLength() == 1 )
{
uno::Reference < awt::XButton > xButton( getPeer(), uno::UNO_QUERY );
xButton->addActionListener( &maActionListeners );
}
}
void UnoButtonControl::removeActionListener(const uno::Reference< awt::XActionListener > & l)
{
// tdf#150974 some extensions pass null
if (!l)
{
SAL_WARN("toolkit" , "null XActionListener" );
return ;
}
if ( getPeer().is() && maActionListeners.getLength() == 1 )
{
uno::Reference < awt::XButton > xButton( getPeer(), uno::UNO_QUERY );
xButton->removeActionListener( &maActionListeners );
}
maActionListeners.removeInterface( l );
}
void UnoButtonControl::addItemListener(const uno::Reference< awt::XItemListener > & l)
{
maItemListeners.addInterface( l );
}
void UnoButtonControl::removeItemListener(const uno::Reference< awt::XItemListener > & l)
{
maItemListeners.removeInterface( l );
}
void SAL_CALL UnoButtonControl::disposing( const lang::EventObject& Source )
{
UnoControlBase::disposing( Source );
}
void SAL_CALL UnoButtonControl::itemStateChanged( const awt::ItemEvent& rEvent )
{
// forward to model
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_STATE ), uno::Any(static_cast <sal_Int16>(rEvent.Selected)), false );
// multiplex
ItemEvent aEvent( rEvent );
aEvent.Source = *this ;
maItemListeners.itemStateChanged( aEvent );
}
void UnoButtonControl::setLabel( const OUString& rLabel )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_LABEL ), uno::Any(rLabel), true );
}
void UnoButtonControl::setActionCommand( const OUString& rCommand )
{
maActionCommand = rCommand;
if ( getPeer().is() )
{
uno::Reference < awt::XButton > xButton( getPeer(), uno::UNO_QUERY );
xButton->setActionCommand( rCommand );
}
}
awt::Size UnoButtonControl::getMinimumSize( )
{
return Impl_getMinimumSize();
}
awt::Size UnoButtonControl::getPreferredSize( )
{
return Impl_getPreferredSize();
}
awt::Size UnoButtonControl::calcAdjustedSize( const awt::Size& rNewSize )
{
return Impl_calcAdjustedSize( rNewSize );
}
OUString UnoButtonControl::getImplementationName()
{
return u"stardiv.Toolkit.UnoButtonControl" _ustr;
}
css::uno::Sequence<OUString> UnoButtonControl::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlButton" _ustr, u"stardiv.vcl.control.Button" _ustr };
return comphelper::concatSequences( UnoControlBase::getSupportedServiceNames(), vals);
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoButtonControl_get_implementation(
css::uno::XComponentContext *,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoButtonControl());
}
UnoControlImageControlModel::UnoControlImageControlModel( const Reference< XComponentContext >& rxContext )
:GraphicControlModel( rxContext )
,mbAdjustingImageScaleMode( false )
{
UNO_CONTROL_MODEL_REGISTER_PROPERTIES<VCLXImageControl>();
}
OUString UnoControlImageControlModel::getServiceName()
{
return u"stardiv.vcl.controlmodel.ImageControl" _ustr;
}
OUString UnoControlImageControlModel::getImplementationName()
{
return u"stardiv.Toolkit.UnoControlImageControlModel" _ustr;
}
css::uno::Sequence<OUString>
UnoControlImageControlModel::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals {
u"com.sun.star.awt.UnoControlImageButtonModel" _ustr,
u"com.sun.star.awt.UnoControlImageControlModel" _ustr,
u"stardiv.vcl.controlmodel.ImageButton" _ustr,
u"stardiv.vcl.controlmodel.ImageControl" _ustr
};
return comphelper::concatSequences( GraphicControlModel::getSupportedServiceNames(), vals);
}
uno::Any UnoControlImageControlModel::ImplGetDefaultValue( sal_uInt16 nPropId ) const
{
if ( nPropId == BASEPROPERTY_DEFAULTCONTROL )
return uno::Any( u"stardiv.vcl.control.ImageControl" _ustr );
if ( nPropId == BASEPROPERTY_IMAGE_SCALE_MODE )
return Any( awt::ImageScaleMode::ANISOTROPIC );
return GraphicControlModel::ImplGetDefaultValue( nPropId );
}
::cppu::IPropertyArrayHelper& UnoControlImageControlModel::getInfoHelper()
{
static UnoPropertyArrayHelper aHelper( ImplGetPropertyIds() );
return aHelper;
}
// beans::XMultiPropertySet
uno::Reference< beans::XPropertySetInfo > UnoControlImageControlModel::getPropertySetInfo( )
{
static uno::Reference< beans::XPropertySetInfo > xInfo( createPropertySetInfo( getInfoHelper() ) );
return xInfo;
}
void UnoControlImageControlModel::setFastPropertyValue_NoBroadcast( std::unique_lock<std::mutex>& rGuard, sal_Int32 _nHandle, const css::uno::Any& _rValue )
{
GraphicControlModel::setFastPropertyValue_NoBroadcast( rGuard, _nHandle, _rValue );
// ScaleImage is an older (and less powerful) version of ScaleMode, but keep both in sync as far as possible
try
{
switch ( _nHandle )
{
case BASEPROPERTY_IMAGE_SCALE_MODE:
if ( !mbAdjustingImageScaleMode && ImplHasProperty( BASEPROPERTY_SCALEIMAGE ) )
{
mbAdjustingImageScaleMode = true ;
sal_Int16 nScaleMode( awt::ImageScaleMode::ANISOTROPIC );
OSL_VERIFY( _rValue >>= nScaleMode );
setDependentFastPropertyValue( rGuard, BASEPROPERTY_SCALEIMAGE, uno::Any( nScaleMode != awt::ImageScaleMode::NONE ) );
mbAdjustingImageScaleMode = false ;
}
break ;
case BASEPROPERTY_SCALEIMAGE:
if ( !mbAdjustingImageScaleMode && ImplHasProperty( BASEPROPERTY_IMAGE_SCALE_MODE ) )
{
mbAdjustingImageScaleMode = true ;
bool bScale = true ;
OSL_VERIFY( _rValue >>= bScale );
setDependentFastPropertyValue( rGuard, BASEPROPERTY_IMAGE_SCALE_MODE, uno::Any( bScale ? awt::ImageScaleMode::ANISOTROPIC : awt::ImageScaleMode::NONE ) );
mbAdjustingImageScaleMode = false ;
}
break ;
}
}
catch ( const Exception& )
{
mbAdjustingImageScaleMode = false ;
throw ;
}
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoControlImageControlModel_get_implementation(
css::uno::XComponentContext *context,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoControlImageControlModel(context));
}
UnoImageControlControl::UnoImageControlControl()
:maActionListeners( *this )
{
// TODO: Where should I look for defaults?
maComponentInfos.nWidth = 100;
maComponentInfos.nHeight = 100;
}
OUString UnoImageControlControl::GetComponentServiceName() const
{
return u"fixedimage" _ustr;
}
void UnoImageControlControl::dispose()
{
lang::EventObject aEvt;
aEvt.Source = getXWeak();
maActionListeners.disposeAndClear( aEvt );
UnoControl::dispose();
}
sal_Bool UnoImageControlControl::isTransparent()
{
return true ;
}
awt::Size UnoImageControlControl::getMinimumSize( )
{
return Impl_getMinimumSize();
}
awt::Size UnoImageControlControl::getPreferredSize( )
{
return Impl_getPreferredSize();
}
awt::Size UnoImageControlControl::calcAdjustedSize( const awt::Size& rNewSize )
{
return Impl_calcAdjustedSize( rNewSize );
}
OUString UnoImageControlControl::getImplementationName()
{
return u"stardiv.Toolkit.UnoImageControlControl" _ustr;
}
css::uno::Sequence<OUString> UnoImageControlControl::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals {
u"com.sun.star.awt.UnoControlImageButton" _ustr,
u"com.sun.star.awt.UnoControlImageControl" _ustr,
u"stardiv.vcl.control.ImageButton" _ustr,
u"stardiv.vcl.control.ImageControl" _ustr
};
return comphelper::concatSequences( UnoControlBase::getSupportedServiceNames(), vals);
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoImageControlControl_get_implementation(
css::uno::XComponentContext *,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoImageControlControl());
}
UnoControlRadioButtonModel::UnoControlRadioButtonModel( const Reference< XComponentContext >& rxContext )
:GraphicControlModel( rxContext )
{
UNO_CONTROL_MODEL_REGISTER_PROPERTIES<VCLXRadioButton>();
}
OUString UnoControlRadioButtonModel::getServiceName()
{
return u"stardiv.vcl.controlmodel.RadioButton" _ustr;
}
uno::Any UnoControlRadioButtonModel::ImplGetDefaultValue( sal_uInt16 nPropId ) const
{
switch ( nPropId )
{
case BASEPROPERTY_DEFAULTCONTROL:
return uno::Any( u"stardiv.vcl.control.RadioButton" _ustr );
case BASEPROPERTY_VISUALEFFECT:
return uno::Any( sal_Int16(awt::VisualEffect::LOOK3D) );
}
return GraphicControlModel::ImplGetDefaultValue( nPropId );
}
::cppu::IPropertyArrayHelper& UnoControlRadioButtonModel::getInfoHelper()
{
static UnoPropertyArrayHelper aHelper( ImplGetPropertyIds() );
return aHelper;
}
// beans::XMultiPropertySet
uno::Reference< beans::XPropertySetInfo > UnoControlRadioButtonModel::getPropertySetInfo( )
{
static uno::Reference< beans::XPropertySetInfo > xInfo( createPropertySetInfo( getInfoHelper() ) );
return xInfo;
}
OUString UnoControlRadioButtonModel::getImplementationName()
{
return u"stardiv.Toolkit.UnoControlRadioButtonModel" _ustr;
}
css::uno::Sequence<OUString>
UnoControlRadioButtonModel::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlRadioButtonModel" _ustr, u"stardiv.vcl.controlmodel.RadioButton" _ustr };
return comphelper::concatSequences( GraphicControlModel::getSupportedServiceNames(), vals);
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoControlRadioButtonModel_get_implementation(
css::uno::XComponentContext *context,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoControlRadioButtonModel(context));
}
UnoRadioButtonControl::UnoRadioButtonControl()
:maItemListeners( *this )
,maActionListeners( *this )
{
maComponentInfos.nWidth = 100;
maComponentInfos.nHeight = 12;
}
OUString UnoRadioButtonControl::GetComponentServiceName() const
{
return u"radiobutton" _ustr;
}
void UnoRadioButtonControl::dispose()
{
lang::EventObject aEvt;
aEvt.Source = getXWeak();
maItemListeners.disposeAndClear( aEvt );
UnoControlBase::dispose();
}
sal_Bool UnoRadioButtonControl::isTransparent()
{
return true ;
}
void UnoRadioButtonControl::createPeer( const uno::Reference< awt::XToolkit > & rxToolkit, const uno::Reference< awt::XWindowPeer > & rParentPeer )
{
UnoControlBase::createPeer( rxToolkit, rParentPeer );
uno::Reference < awt::XRadioButton > xRadioButton( getPeer(), uno::UNO_QUERY );
xRadioButton->addItemListener( this );
uno::Reference < awt::XButton > xButton( getPeer(), uno::UNO_QUERY );
xButton->setActionCommand( maActionCommand );
if ( maActionListeners.getLength() )
xButton->addActionListener( &maActionListeners );
// as default, set the "AutoToggle" to true
// (it is set to false in VCLXToolkit::ImplCreateWindow because of #87254#, but we want to
// have it enabled by default because of 85071)
uno::Reference< awt::XVclWindowPeer > xVclWindowPeer( getPeer(), uno::UNO_QUERY );
if ( xVclWindowPeer.is() )
xVclWindowPeer->setProperty( GetPropertyName( BASEPROPERTY_AUTOTOGGLE ), css::uno::Any(true ) );
}
void UnoRadioButtonControl::addItemListener(const uno::Reference < awt::XItemListener > & l)
{
maItemListeners.addInterface( l );
}
void UnoRadioButtonControl::removeItemListener(const uno::Reference < awt::XItemListener > & l)
{
maItemListeners.removeInterface( l );
}
void UnoRadioButtonControl::addActionListener(const uno::Reference< awt::XActionListener > & l)
{
maActionListeners.addInterface( l );
if ( getPeer().is() && maActionListeners.getLength() == 1 )
{
uno::Reference < awt::XButton > xButton( getPeer(), uno::UNO_QUERY );
xButton->addActionListener( &maActionListeners );
}
}
void UnoRadioButtonControl::removeActionListener(const uno::Reference< awt::XActionListener > & l)
{
if ( getPeer().is() && maActionListeners.getLength() == 1 )
{
uno::Reference < awt::XButton > xButton( getPeer(), uno::UNO_QUERY );
xButton->removeActionListener( &maActionListeners );
}
maActionListeners.removeInterface( l );
}
void UnoRadioButtonControl::setLabel( const OUString& rLabel )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_LABEL ), uno::Any(rLabel), true );
}
void UnoRadioButtonControl::setActionCommand( const OUString& rCommand )
{
maActionCommand = rCommand;
if ( getPeer().is() )
{
uno::Reference < awt::XButton > xButton( getPeer(), uno::UNO_QUERY );
xButton->setActionCommand( rCommand );
}
}
void UnoRadioButtonControl::setState( sal_Bool bOn )
{
sal_Int16 nState = bOn ? 1 : 0;
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_STATE ), uno::Any(nState), true );
}
sal_Bool UnoRadioButtonControl::getState()
{
sal_Int16 nState = 0;
uno::Any aVal = ImplGetPropertyValue( GetPropertyName( BASEPROPERTY_STATE ) );
aVal >>= nState;
return nState != 0;
}
void UnoRadioButtonControl::itemStateChanged( const awt::ItemEvent& rEvent )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_STATE ), uno::Any(static_cast <sal_Int16>(rEvent.Selected)), false );
// compatibility:
// in OOo 1.0.x, when the user clicked a radio button in a group of buttons, this resulted
// in _one_ itemStateChanged call for exactly the radio button which's state changed from
// "0" to "1".
// Nowadays, since the listener handling changed a lot towards 1.1 (the VCLXWindow reacts on more
// basic events from the VCL-windows, not anymore on the Link-based events like in 1.0.x), this
// isn't the case anymore: For instance, this method here gets called for the radio button
// which is being implicitly _de_selected, too. This is pretty bad for compatibility.
// Thus, we suppress all events with a new state other than "1". This is unlogical, and weird, when looking
// from a pure API perspective, but it's _compatible_ with older product versions, and this is
// all which matters here.
// #i14703#
if ( 1 == rEvent.Selected )
{
if ( maItemListeners.getLength() )
maItemListeners.itemStateChanged( rEvent );
}
// note that speaking strictly, this is wrong: When in 1.0.x, the user would have de-selected
// a radio button _without_ selecting another one, this would have caused a notification.
// With the change done here, this today won't cause a notification anymore.
// Fortunately, it's not possible for the user to de-select a radio button without selecting another on,
// at least not via the regular UI. It _would_ be possible via the Accessibility API, which
// counts as "user input", too. But in 1.0.x, there was no Accessibility API, so there is nothing
// to be inconsistent with.
}
awt::Size UnoRadioButtonControl::getMinimumSize( )
{
return Impl_getMinimumSize();
}
awt::Size UnoRadioButtonControl::getPreferredSize( )
{
return Impl_getPreferredSize();
}
awt::Size UnoRadioButtonControl::calcAdjustedSize( const awt::Size& rNewSize )
{
return Impl_calcAdjustedSize( rNewSize );
}
OUString UnoRadioButtonControl::getImplementationName()
{
return u"stardiv.Toolkit.UnoRadioButtonControl" _ustr;
}
css::uno::Sequence<OUString> UnoRadioButtonControl::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlRadioButton" _ustr, u"stardiv.vcl.control.RadioButton" _ustr };
return comphelper::concatSequences( UnoControlBase::getSupportedServiceNames(), vals );
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoRadioButtonControl_get_implementation(
css::uno::XComponentContext *,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoRadioButtonControl());
}
UnoControlCheckBoxModel::UnoControlCheckBoxModel( const Reference< XComponentContext >& rxContext )
:GraphicControlModel( rxContext )
{
UNO_CONTROL_MODEL_REGISTER_PROPERTIES<VCLXCheckBox>();
}
OUString UnoControlCheckBoxModel::getServiceName()
{
return u"stardiv.vcl.controlmodel.CheckBox" _ustr;
}
uno::Any UnoControlCheckBoxModel::ImplGetDefaultValue( sal_uInt16 nPropId ) const
{
switch ( nPropId )
{
case BASEPROPERTY_DEFAULTCONTROL:
return uno::Any( u"stardiv.vcl.control.CheckBox" _ustr );
case BASEPROPERTY_VISUALEFFECT:
return uno::Any( sal_Int16(awt::VisualEffect::LOOK3D) );
}
return GraphicControlModel::ImplGetDefaultValue( nPropId );
}
::cppu::IPropertyArrayHelper& UnoControlCheckBoxModel::getInfoHelper()
{
static UnoPropertyArrayHelper aHelper( ImplGetPropertyIds() );
return aHelper;
}
// beans::XMultiPropertySet
uno::Reference< beans::XPropertySetInfo > UnoControlCheckBoxModel::getPropertySetInfo( )
{
static uno::Reference< beans::XPropertySetInfo > xInfo( createPropertySetInfo( getInfoHelper() ) );
return xInfo;
}
OUString UnoControlCheckBoxModel::getImplementationName()
{
return u"stardiv.Toolkit.UnoControlCheckBoxModel" _ustr;
}
css::uno::Sequence<OUString> UnoControlCheckBoxModel::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlCheckBoxModel" _ustr, u"stardiv.vcl.controlmodel.CheckBox" _ustr };
return comphelper::concatSequences( GraphicControlModel::getSupportedServiceNames(), vals );
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoControlCheckBoxModel_get_implementation(
css::uno::XComponentContext *context,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoControlCheckBoxModel(context));
}
UnoCheckBoxControl::UnoCheckBoxControl()
:maItemListeners( *this ), maActionListeners( *this )
{
maComponentInfos.nWidth = 100;
maComponentInfos.nHeight = 12;
}
OUString UnoCheckBoxControl::GetComponentServiceName() const
{
return u"checkbox" _ustr;
}
void UnoCheckBoxControl::dispose()
{
lang::EventObject aEvt;
aEvt.Source = getXWeak();
maItemListeners.disposeAndClear( aEvt );
UnoControlBase::dispose();
}
sal_Bool UnoCheckBoxControl::isTransparent()
{
return true ;
}
void UnoCheckBoxControl::createPeer( const uno::Reference< awt::XToolkit > & rxToolkit, const uno::Reference< awt::XWindowPeer > & rParentPeer )
{
UnoControlBase::createPeer( rxToolkit, rParentPeer );
uno::Reference < awt::XCheckBox > xCheckBox( getPeer(), uno::UNO_QUERY );
xCheckBox->addItemListener( this );
uno::Reference < awt::XButton > xButton( getPeer(), uno::UNO_QUERY );
xButton->setActionCommand( maActionCommand );
if ( maActionListeners.getLength() )
xButton->addActionListener( &maActionListeners );
}
void UnoCheckBoxControl::addItemListener(const uno::Reference < awt::XItemListener > & l)
{
maItemListeners.addInterface( l );
}
void UnoCheckBoxControl::removeItemListener(const uno::Reference < awt::XItemListener > & l)
{
maItemListeners.removeInterface( l );
}
void UnoCheckBoxControl::addActionListener(const uno::Reference< awt::XActionListener > & l)
{
maActionListeners.addInterface( l );
if ( getPeer().is() && maActionListeners.getLength() == 1 )
{
uno::Reference < awt::XButton > xButton( getPeer(), uno::UNO_QUERY );
xButton->addActionListener( &maActionListeners );
}
}
void UnoCheckBoxControl::removeActionListener(const uno::Reference< awt::XActionListener > & l)
{
if ( getPeer().is() && maActionListeners.getLength() == 1 )
{
uno::Reference < awt::XButton > xButton( getPeer(), uno::UNO_QUERY );
xButton->removeActionListener( &maActionListeners );
}
maActionListeners.removeInterface( l );
}
void UnoCheckBoxControl::setActionCommand( const OUString& rCommand )
{
maActionCommand = rCommand;
if ( getPeer().is() )
{
uno::Reference < awt::XButton > xButton( getPeer(), uno::UNO_QUERY );
xButton->setActionCommand( rCommand );
}
}
void UnoCheckBoxControl::setLabel( const OUString& rLabel )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_LABEL ), uno::Any(rLabel), true );
}
void UnoCheckBoxControl::setState( sal_Int16 n )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_STATE ), uno::Any(n), true );
}
sal_Int16 UnoCheckBoxControl::getState()
{
sal_Int16 nState = 0;
uno::Any aVal = ImplGetPropertyValue( GetPropertyName( BASEPROPERTY_STATE ) );
aVal >>= nState;
return nState;
}
void UnoCheckBoxControl::enableTriState( sal_Bool b )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_TRISTATE ), uno::Any(b), true );
}
void UnoCheckBoxControl::itemStateChanged( const awt::ItemEvent& rEvent )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_STATE ), uno::Any(static_cast <sal_Int16>(rEvent.Selected)), false );
if ( maItemListeners.getLength() )
maItemListeners.itemStateChanged( rEvent );
}
awt::Size UnoCheckBoxControl::getMinimumSize( )
{
return Impl_getMinimumSize();
}
awt::Size UnoCheckBoxControl::getPreferredSize( )
{
return Impl_getPreferredSize();
}
awt::Size UnoCheckBoxControl::calcAdjustedSize( const awt::Size& rNewSize )
{
return Impl_calcAdjustedSize( rNewSize );
}
OUString UnoCheckBoxControl::getImplementationName()
{
return u"stardiv.Toolkit.UnoCheckBoxControl" _ustr;
}
css::uno::Sequence<OUString> UnoCheckBoxControl::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlCheckBox" _ustr, u"stardiv.vcl.control.CheckBox" _ustr };
return comphelper::concatSequences( UnoControlBase::getSupportedServiceNames(), vals );
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoCheckBoxControl_get_implementation(
css::uno::XComponentContext *,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoCheckBoxControl());
}
UnoControlFixedHyperlinkModel::UnoControlFixedHyperlinkModel( const Reference< XComponentContext >& rxContext )
:UnoControlModel( rxContext )
{
UNO_CONTROL_MODEL_REGISTER_PROPERTIES<VCLXFixedHyperlink>();
}
OUString UnoControlFixedHyperlinkModel::getServiceName()
{
return u"com.sun.star.awt.UnoControlFixedHyperlinkModel" _ustr;
}
uno::Any UnoControlFixedHyperlinkModel::ImplGetDefaultValue( sal_uInt16 nPropId ) const
{
if ( nPropId == BASEPROPERTY_DEFAULTCONTROL )
{
return uno::Any( u"com.sun.star.awt.UnoControlFixedHyperlink" _ustr );
}
else if ( nPropId == BASEPROPERTY_BORDER )
{
return uno::Any(sal_Int16(0));
}
else if ( nPropId == BASEPROPERTY_URL )
{
return uno::Any( OUString() );
}
return UnoControlModel::ImplGetDefaultValue( nPropId );
}
::cppu::IPropertyArrayHelper& UnoControlFixedHyperlinkModel::getInfoHelper()
{
static UnoPropertyArrayHelper aHelper( ImplGetPropertyIds() );
return aHelper;
}
// beans::XMultiPropertySet
uno::Reference< beans::XPropertySetInfo > UnoControlFixedHyperlinkModel::getPropertySetInfo( )
{
static uno::Reference< beans::XPropertySetInfo > xInfo( createPropertySetInfo( getInfoHelper() ) );
return xInfo;
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoControlFixedHyperlinkModel_get_implementation(
css::uno::XComponentContext *context,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoControlFixedHyperlinkModel(context));
}
UnoFixedHyperlinkControl::UnoFixedHyperlinkControl()
:maActionListeners( *this )
{
maComponentInfos.nWidth = 100;
maComponentInfos.nHeight = 12;
}
OUString UnoFixedHyperlinkControl::GetComponentServiceName() const
{
return u"fixedhyperlink" _ustr;
}
// uno::XInterface
uno::Any UnoFixedHyperlinkControl::queryAggregation( const uno::Type & rType )
{
uno::Any aRet = ::cppu::queryInterface( rType,
static_cast < awt::XFixedHyperlink* >(this ),
static_cast < awt::XLayoutConstrains* >(this ) );
return (aRet.hasValue() ? aRet : UnoControlBase::queryAggregation( rType ));
}
IMPL_IMPLEMENTATION_ID( UnoFixedHyperlinkControl )
// lang::XTypeProvider
css::uno::Sequence< css::uno::Type > UnoFixedHyperlinkControl::getTypes()
{
static const ::cppu::OTypeCollection aTypeList(
cppu::UnoType<css::lang::XTypeProvider>::get(),
cppu::UnoType<awt::XFixedHyperlink>::get(),
cppu::UnoType<awt::XLayoutConstrains>::get(),
UnoControlBase::getTypes()
);
return aTypeList.getTypes();
}
sal_Bool UnoFixedHyperlinkControl::isTransparent()
{
return true ;
}
void UnoFixedHyperlinkControl::setText( const OUString& Text )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_LABEL ), uno::Any(Text), true );
}
OUString UnoFixedHyperlinkControl::getText()
{
return ImplGetPropertyValue_UString( BASEPROPERTY_LABEL );
}
void UnoFixedHyperlinkControl::setURL( const OUString& URL )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_URL ), uno::Any(URL), true );
}
OUString UnoFixedHyperlinkControl::getURL( )
{
return ImplGetPropertyValue_UString( BASEPROPERTY_URL );
}
void UnoFixedHyperlinkControl::setAlignment( sal_Int16 nAlign )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_ALIGN ), uno::Any(nAlign), true );
}
sal_Int16 UnoFixedHyperlinkControl::getAlignment()
{
sal_Int16 nAlign = 0;
if ( mxModel.is() )
{
uno::Any aVal = ImplGetPropertyValue( GetPropertyName( BASEPROPERTY_ALIGN ) );
aVal >>= nAlign;
}
return nAlign;
}
awt::Size UnoFixedHyperlinkControl::getMinimumSize( )
{
return Impl_getMinimumSize();
}
awt::Size UnoFixedHyperlinkControl::getPreferredSize( )
{
return Impl_getPreferredSize();
}
awt::Size UnoFixedHyperlinkControl::calcAdjustedSize( const awt::Size& rNewSize )
{
return Impl_calcAdjustedSize( rNewSize );
}
void UnoFixedHyperlinkControl::dispose()
{
lang::EventObject aEvt;
aEvt.Source = getXWeak();
maActionListeners.disposeAndClear( aEvt );
UnoControlBase::dispose();
}
void UnoFixedHyperlinkControl::createPeer( const uno::Reference< awt::XToolkit > & rxToolkit, const uno::Reference< awt::XWindowPeer > & rParentPeer )
{
UnoControlBase::createPeer( rxToolkit, rParentPeer );
uno::Reference < awt::XFixedHyperlink > xFixedHyperlink( getPeer(), uno::UNO_QUERY );
if ( maActionListeners.getLength() )
xFixedHyperlink->addActionListener( &maActionListeners );
}
void UnoFixedHyperlinkControl::addActionListener(const uno::Reference< awt::XActionListener > & l)
{
maActionListeners.addInterface( l );
if ( getPeer().is() && maActionListeners.getLength() == 1 )
{
uno::Reference < awt::XFixedHyperlink > xFixedHyperlink( getPeer(), uno::UNO_QUERY );
xFixedHyperlink->addActionListener( &maActionListeners );
}
}
void UnoFixedHyperlinkControl::removeActionListener(const uno::Reference< awt::XActionListener > & l)
{
if ( getPeer().is() && maActionListeners.getLength() == 1 )
{
uno::Reference < awt::XFixedHyperlink > xFixedHyperlink( getPeer(), uno::UNO_QUERY );
xFixedHyperlink->removeActionListener( &maActionListeners );
}
maActionListeners.removeInterface( l );
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoFixedHyperlinkControl_get_implementation(
css::uno::XComponentContext *,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoFixedHyperlinkControl());
}
UnoControlFixedTextModel::UnoControlFixedTextModel( const Reference< XComponentContext >& rxContext )
:UnoControlModel( rxContext )
{
UNO_CONTROL_MODEL_REGISTER_PROPERTIES<VCLXFixedText>();
}
OUString UnoControlFixedTextModel::getServiceName()
{
return u"stardiv.vcl.controlmodel.FixedText" _ustr;
}
uno::Any UnoControlFixedTextModel::ImplGetDefaultValue( sal_uInt16 nPropId ) const
{
if ( nPropId == BASEPROPERTY_DEFAULTCONTROL )
{
return uno::Any( u"stardiv.vcl.control.FixedText" _ustr );
}
else if ( nPropId == BASEPROPERTY_BORDER )
{
return uno::Any(sal_Int16(0));
}
return UnoControlModel::ImplGetDefaultValue( nPropId );
}
::cppu::IPropertyArrayHelper& UnoControlFixedTextModel::getInfoHelper()
{
static UnoPropertyArrayHelper aHelper( ImplGetPropertyIds() );
return aHelper;
}
// beans::XMultiPropertySet
uno::Reference< beans::XPropertySetInfo > UnoControlFixedTextModel::getPropertySetInfo( )
{
static uno::Reference< beans::XPropertySetInfo > xInfo( createPropertySetInfo( getInfoHelper() ) );
return xInfo;
}
OUString UnoControlFixedTextModel::getImplementationName()
{
return u"stardiv.Toolkit.UnoControlFixedTextModel" _ustr;
}
css::uno::Sequence<OUString>
UnoControlFixedTextModel::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlFixedTextModel" _ustr, u"stardiv.vcl.controlmodel.FixedText" _ustr };
return comphelper::concatSequences( UnoControlModel::getSupportedServiceNames(), vals );
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoControlFixedTextModel_get_implementation(
css::uno::XComponentContext *context,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoControlFixedTextModel(context));
}
UnoFixedTextControl::UnoFixedTextControl()
{
maComponentInfos.nWidth = 100;
maComponentInfos.nHeight = 12;
}
OUString UnoFixedTextControl::GetComponentServiceName() const
{
return u"fixedtext" _ustr;
}
// uno::XInterface
uno::Any UnoFixedTextControl::queryAggregation( const uno::Type & rType )
{
uno::Any aRet = ::cppu::queryInterface( rType,
static_cast < awt::XFixedText* >(this ),
static_cast < awt::XLayoutConstrains* >(this ) );
return (aRet.hasValue() ? aRet : UnoControlBase::queryAggregation( rType ));
}
IMPL_IMPLEMENTATION_ID( UnoFixedTextControl )
// lang::XTypeProvider
css::uno::Sequence< css::uno::Type > UnoFixedTextControl::getTypes()
{
static const ::cppu::OTypeCollection aTypeList(
cppu::UnoType<css::lang::XTypeProvider>::get(),
cppu::UnoType<awt::XFixedText>::get(),
cppu::UnoType<awt::XLayoutConstrains>::get(),
UnoControlBase::getTypes()
);
return aTypeList.getTypes();
}
sal_Bool UnoFixedTextControl::isTransparent()
{
return true ;
}
void UnoFixedTextControl::setText( const OUString& Text )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_LABEL ), uno::Any(Text), true );
}
OUString UnoFixedTextControl::getText()
{
return ImplGetPropertyValue_UString( BASEPROPERTY_LABEL );
}
void UnoFixedTextControl::setAlignment( sal_Int16 nAlign )
{
ImplSetPropertyValue( GetPropertyName( BASEPROPERTY_ALIGN ), uno::Any(nAlign), true );
}
sal_Int16 UnoFixedTextControl::getAlignment()
{
sal_Int16 nAlign = 0;
if ( mxModel.is() )
{
uno::Any aVal = ImplGetPropertyValue( GetPropertyName( BASEPROPERTY_ALIGN ) );
aVal >>= nAlign;
}
return nAlign;
}
awt::Size UnoFixedTextControl::getMinimumSize( )
{
return Impl_getMinimumSize();
}
awt::Size UnoFixedTextControl::getPreferredSize( )
{
return Impl_getPreferredSize();
}
awt::Size UnoFixedTextControl::calcAdjustedSize( const awt::Size& rNewSize )
{
return Impl_calcAdjustedSize( rNewSize );
}
OUString UnoFixedTextControl::getImplementationName()
{
return u"stardiv.Toolkit.UnoFixedTextControl" _ustr;
}
css::uno::Sequence<OUString> UnoFixedTextControl::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlFixedText" _ustr, u"stardiv.vcl.control.FixedText" _ustr };
return comphelper::concatSequences( UnoControlBase::getSupportedServiceNames(), vals );
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoFixedTextControl_get_implementation(
css::uno::XComponentContext *,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoFixedTextControl());
}
UnoControlGroupBoxModel::UnoControlGroupBoxModel( const Reference< XComponentContext >& rxContext )
:UnoControlModel( rxContext )
{
ImplRegisterProperty( BASEPROPERTY_DEFAULTCONTROL );
ImplRegisterProperty( BASEPROPERTY_ENABLED );
ImplRegisterProperty( BASEPROPERTY_ENABLEVISIBLE );
ImplRegisterProperty( BASEPROPERTY_FONTDESCRIPTOR );
ImplRegisterProperty( BASEPROPERTY_HELPTEXT );
ImplRegisterProperty( BASEPROPERTY_HELPURL );
ImplRegisterProperty( BASEPROPERTY_LABEL );
ImplRegisterProperty( BASEPROPERTY_PRINTABLE );
ImplRegisterProperty( BASEPROPERTY_WRITING_MODE );
ImplRegisterProperty( BASEPROPERTY_CONTEXT_WRITING_MODE );
}
OUString UnoControlGroupBoxModel::getServiceName()
{
return u"stardiv.vcl.controlmodel.GroupBox" _ustr;
}
uno::Any UnoControlGroupBoxModel::ImplGetDefaultValue( sal_uInt16 nPropId ) const
{
if ( nPropId == BASEPROPERTY_DEFAULTCONTROL )
{
return uno::Any(u"stardiv.vcl.control.GroupBox" _ustr );
}
return UnoControlModel::ImplGetDefaultValue( nPropId );
}
::cppu::IPropertyArrayHelper& UnoControlGroupBoxModel::getInfoHelper()
{
static UnoPropertyArrayHelper aHelper( ImplGetPropertyIds() );
return aHelper;
}
// beans::XMultiPropertySet
uno::Reference< beans::XPropertySetInfo > UnoControlGroupBoxModel::getPropertySetInfo( )
{
static uno::Reference< beans::XPropertySetInfo > xInfo( createPropertySetInfo( getInfoHelper() ) );
return xInfo;
}
OUString UnoControlGroupBoxModel::getImplementationName()
{
return u"stardiv.Toolkit.UnoControlGroupBoxModel" _ustr;
}
css::uno::Sequence<OUString> UnoControlGroupBoxModel::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlGroupBoxModel" _ustr, u"stardiv.vcl.controlmodel.GroupBox" _ustr };
return comphelper::concatSequences( UnoControlModel::getSupportedServiceNames(), vals );
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoControlGroupBoxModel_get_implementation(
css::uno::XComponentContext *context,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoControlGroupBoxModel(context));
}
UnoGroupBoxControl::UnoGroupBoxControl()
{
maComponentInfos.nWidth = 100;
maComponentInfos.nHeight = 100;
}
OUString UnoGroupBoxControl::GetComponentServiceName() const
{
return u"groupbox" _ustr;
}
sal_Bool UnoGroupBoxControl::isTransparent()
{
return true ;
}
OUString UnoGroupBoxControl::getImplementationName()
{
return u"stardiv.Toolkit.UnoGroupBoxControl" _ustr;
}
css::uno::Sequence<OUString> UnoGroupBoxControl::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlGroupBox" _ustr, u"stardiv.vcl.control.GroupBox" _ustr };
return comphelper::concatSequences( UnoControlBase::getSupportedServiceNames(), vals );
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
stardiv_Toolkit_UnoGroupBoxControl_get_implementation(
css::uno::XComponentContext *,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new UnoGroupBoxControl());
}
// = UnoControlListBoxModel_Data
namespace {
struct ListItem
{
OUString ItemText;
OUString ItemImageURL;
Any ItemData;
ListItem()
{
}
explicit ListItem( OUString i_ItemText )
:ItemText(std::move( i_ItemText ))
{
}
};
}
typedef beans::Pair< OUString, OUString > UnoListItem;
namespace {
struct StripItemData
{
UnoListItem operator ()( const ListItem& i_rItem )
{
return UnoListItem( i_rItem.ItemText, i_rItem.ItemImageURL );
}
};
}
struct UnoControlListBoxModel_Data
{
explicit UnoControlListBoxModel_Data( UnoControlListBoxModel& i_rAntiImpl )
:m_bSettingLegacyProperty( false )
,m_rAntiImpl( i_rAntiImpl )
{
}
sal_Int32 getItemCount() const { return sal_Int32( m_aListItems.size() ); }
const ListItem& getItem( const sal_Int32 i_nIndex ) const
{
if ( ( i_nIndex < 0 ) || ( o3tl::make_unsigned(i_nIndex) >= m_aListItems.size() ) )
throw IndexOutOfBoundsException( OUString(), m_rAntiImpl );
return m_aListItems[ i_nIndex ];
}
ListItem& getItem( const sal_Int32 i_nIndex )
{
return const_cast < ListItem& >( static_cast < const UnoControlListBoxModel_Data* >( this )->getItem( i_nIndex ) );
}
ListItem& insertItem( const sal_Int32 i_nIndex )
{
if ( ( i_nIndex < 0 ) || ( o3tl::make_unsigned(i_nIndex) > m_aListItems.size() ) )
throw IndexOutOfBoundsException( OUString(), m_rAntiImpl );
return *m_aListItems.insert( m_aListItems.begin() + i_nIndex, ListItem() );
}
Sequence< UnoListItem > getAllItems() const
{
Sequence< UnoListItem > aItems( sal_Int32( m_aListItems.size() ) );
::std::transform( m_aListItems.begin(), m_aListItems.end(), aItems.getArray(), StripItemData() );
return aItems;
}
void copyItems( const UnoControlListBoxModel_Data& i_copySource )
{
m_aListItems = i_copySource.m_aListItems;
}
void setAllItems( ::std::vector< ListItem >&& i_rItems )
{
m_aListItems = std::move(i_rItems);
}
void removeItem( const sal_Int32 i_nIndex )
{
if ( ( i_nIndex < 0 ) || ( o3tl::make_unsigned(i_nIndex) >= m_aListItems.size() ) )
throw IndexOutOfBoundsException( OUString(), m_rAntiImpl );
m_aListItems.erase( m_aListItems.begin() + i_nIndex );
}
void removeAllItems()
{
std::vector<ListItem>().swap(m_aListItems);
}
public :
bool m_bSettingLegacyProperty;
private :
UnoControlListBoxModel& m_rAntiImpl;
::std::vector< ListItem > m_aListItems;
};
// = UnoControlListBoxModel
UnoControlListBoxModel::UnoControlListBoxModel( const Reference< XComponentContext >& rxContext, ConstructorMode const i_mode )
:UnoControlListBoxModel_Base( rxContext )
,m_xData( new UnoControlListBoxModel_Data( *this ) )
{
if ( i_mode == ConstructDefault )
{
UNO_CONTROL_MODEL_REGISTER_PROPERTIES<VCLXListBox>();
}
}
UnoControlListBoxModel::UnoControlListBoxModel( const UnoControlListBoxModel& i_rSource )
:UnoControlListBoxModel_Base( i_rSource )
,m_xData( new UnoControlListBoxModel_Data( *this ) )
{
m_xData->copyItems( *i_rSource.m_xData );
}
UnoControlListBoxModel::~UnoControlListBoxModel()
{
}
OUString UnoControlListBoxModel::getImplementationName()
{
return u"stardiv.Toolkit.UnoControlListBoxModel" _ustr;
}
css::uno::Sequence<OUString> UnoControlListBoxModel::getSupportedServiceNames()
{
const css::uno::Sequence<OUString> vals { u"com.sun.star.awt.UnoControlListBoxModel" _ustr, u"stardiv.vcl.controlmodel.ListBox" _ustr };
return comphelper::concatSequences( UnoControlModel::getSupportedServiceNames(), vals );
}
OUString UnoControlListBoxModel::getServiceName()
{
return u"stardiv.vcl.controlmodel.ListBox" _ustr;
}
uno::Any UnoControlListBoxModel::ImplGetDefaultValue( sal_uInt16 nPropId ) const
{
if ( nPropId == BASEPROPERTY_DEFAULTCONTROL )
{
return uno::Any( u"stardiv.vcl.control.ListBox" _ustr );
}
return UnoControlModel::ImplGetDefaultValue( nPropId );
}
::cppu::IPropertyArrayHelper& UnoControlListBoxModel::getInfoHelper()
{
static UnoPropertyArrayHelper aHelper( ImplGetPropertyIds() );
return aHelper;
}
// beans::XMultiPropertySet
uno::Reference< beans::XPropertySetInfo > UnoControlListBoxModel::getPropertySetInfo( )
{
static uno::Reference< beans::XPropertySetInfo > xInfo( createPropertySetInfo( getInfoHelper() ) );
return xInfo;
}
namespace
{
--> --------------------
--> maximum size reached
--> --------------------
Messung V0.5 C=96 H=94 G=94
¤ Dauer der Verarbeitung: 0.23 Sekunden
(vorverarbeitet)
¤
*© Formatika GbR, Deutschland