| /************************************************************** |
| * |
| * 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 |
| * |
| * Unless required by applicable law or agreed to in writing, |
| * software distributed under the License is distributed on an |
| * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY |
| * KIND, either express or implied. See the License for the |
| * specific language governing permissions and limitations |
| * under the License. |
| * |
| *************************************************************/ |
| |
| |
| |
| // MARKER(update_precomp.py): autogen include statement, do not remove |
| #include "precompiled_svx.hxx" |
| |
| #include "svx/dbtoolsclient.hxx" |
| #include "formcontrolfactory.hxx" |
| #include "fmcontrollayout.hxx" |
| #include "fmprop.hrc" |
| #include "svx/fmresids.hrc" |
| #include "fmservs.hxx" |
| #include "svx/dialmgr.hxx" |
| #include "svx/svdouno.hxx" |
| |
| /** === begin UNO includes === **/ |
| #include <com/sun/star/form/XFormComponent.hpp> |
| #include <com/sun/star/form/FormComponentType.hpp> |
| #include <com/sun/star/awt/ScrollBarOrientation.hpp> |
| #include <com/sun/star/awt/MouseWheelBehavior.hpp> |
| #include <com/sun/star/form/XGridColumnFactory.hpp> |
| #include <com/sun/star/style/VerticalAlignment.hpp> |
| #include <com/sun/star/awt/LineEndFormat.hpp> |
| #include <com/sun/star/awt/ImageScaleMode.hpp> |
| #include <com/sun/star/sdbc/DataType.hpp> |
| #include <com/sun/star/util/XNumberFormatTypes.hpp> |
| #include <com/sun/star/sdbc/ColumnValue.hpp> |
| #include <com/sun/star/text/WritingMode2.hpp> |
| #include <com/sun/star/awt/FontDescriptor.hpp> |
| /** === end UNO includes === **/ |
| |
| #include <comphelper/componentcontext.hxx> |
| #include <comphelper/numbers.hxx> |
| #include <unotools/syslocale.hxx> |
| #include <tools/gen.hxx> |
| #include <tools/diagnose_ex.h> |
| |
| #include <set> |
| |
| //........................................................................ |
| namespace svxform |
| { |
| //........................................................................ |
| |
| /** === begin UNO using === **/ |
| using ::com::sun::star::uno::Reference; |
| using ::com::sun::star::uno::XInterface; |
| using ::com::sun::star::uno::UNO_QUERY; |
| using ::com::sun::star::uno::UNO_QUERY_THROW; |
| using ::com::sun::star::uno::UNO_SET_THROW; |
| using ::com::sun::star::uno::Exception; |
| using ::com::sun::star::uno::RuntimeException; |
| using ::com::sun::star::uno::Any; |
| using ::com::sun::star::uno::makeAny; |
| using ::com::sun::star::uno::Sequence; |
| using ::com::sun::star::uno::Type; |
| using ::com::sun::star::beans::XPropertySet; |
| using ::com::sun::star::awt::XControlModel; |
| using ::com::sun::star::form::XFormComponent; |
| using ::com::sun::star::container::XIndexAccess; |
| using ::com::sun::star::beans::XPropertySetInfo; |
| using ::com::sun::star::beans::PropertyValue; |
| using ::com::sun::star::container::XChild; |
| using ::com::sun::star::form::XGridColumnFactory; |
| using ::com::sun::star::style::VerticalAlignment_MIDDLE; |
| using ::com::sun::star::beans::Property; |
| using ::com::sun::star::uno::TypeClass_DOUBLE; |
| using ::com::sun::star::uno::TypeClass_LONG; |
| using ::com::sun::star::util::XNumberFormats; |
| using ::com::sun::star::util::XNumberFormatTypes; |
| using ::com::sun::star::awt::FontDescriptor; |
| using ::com::sun::star::lang::Locale; |
| using ::com::sun::star::lang::XServiceInfo; |
| using ::com::sun::star::container::XNameAccess; |
| /** === end UNO using === **/ |
| namespace FormComponentType = ::com::sun::star::form::FormComponentType; |
| namespace ScrollBarOrientation = ::com::sun::star::awt::ScrollBarOrientation; |
| namespace MouseWheelBehavior = ::com::sun::star::awt::MouseWheelBehavior; |
| namespace LineEndFormat = ::com::sun::star::awt::LineEndFormat; |
| namespace ImageScaleMode = ::com::sun::star::awt::ImageScaleMode; |
| namespace DataType = ::com::sun::star::sdbc::DataType; |
| namespace ColumnValue = ::com::sun::star::sdbc::ColumnValue; |
| namespace WritingMode2 = ::com::sun::star::text::WritingMode2; |
| |
| //==================================================================== |
| //= FormControlFactory_Data |
| //==================================================================== |
| struct FormControlFactory_Data |
| { |
| ::comphelper::ComponentContext m_aContext; |
| |
| FormControlFactory_Data( const ::comphelper::ComponentContext& _rContext ) |
| :m_aContext( _rContext ) |
| { |
| } |
| }; |
| |
| //==================================================================== |
| //= FormControlFactory |
| //==================================================================== |
| //-------------------------------------------------------------------- |
| FormControlFactory::FormControlFactory( const ::comphelper::ComponentContext& _rContext ) |
| :m_pData( new FormControlFactory_Data( _rContext ) ) |
| { |
| } |
| |
| //-------------------------------------------------------------------- |
| FormControlFactory::~FormControlFactory() |
| { |
| } |
| |
| //-------------------------------------------------------------------- |
| sal_Int16 FormControlFactory::initializeControlModel( const DocumentType _eDocType, const SdrUnoObj& _rObject ) |
| { |
| return initializeControlModel( |
| _eDocType, |
| Reference< XPropertySet >( _rObject.GetUnoControlModel(), UNO_QUERY ), |
| _rObject.GetCurrentBoundRect() |
| ); |
| } |
| |
| //-------------------------------------------------------------------- |
| sal_Int16 FormControlFactory::initializeControlModel( const DocumentType _eDocType, const Reference< XPropertySet >& _rxControlModel ) |
| { |
| return initializeControlModel( |
| _eDocType, _rxControlModel, Rectangle() |
| ); |
| } |
| |
| // ----------------------------------------------------------------------------- |
| namespace |
| { |
| //.................................................................... |
| static ::rtl::OUString lcl_getUniqueLabel_nothrow( const Reference< XPropertySet >& _rxControlModel, const ::rtl::OUString& _rBaseLabel ) |
| { |
| ::rtl::OUString sLabel( _rBaseLabel ); |
| try |
| { |
| typedef ::std::set< ::rtl::OUString > StringBag; |
| StringBag aUsedLabels; |
| |
| Reference< XFormComponent > xFormComponent( _rxControlModel, UNO_QUERY_THROW ); |
| Reference< XIndexAccess > xContainer( xFormComponent->getParent(), UNO_QUERY_THROW ); |
| // loop through all siblings of the control model, and collect their labels |
| for ( sal_Int32 index=xContainer->getCount(); index>0; ) |
| { |
| Reference< XPropertySet > xElement( xContainer->getByIndex( --index ), UNO_QUERY_THROW ); |
| if ( xElement == _rxControlModel ) |
| continue; |
| |
| Reference< XPropertySetInfo > xPSI( xElement->getPropertySetInfo(), UNO_SET_THROW ); |
| if ( !xPSI->hasPropertyByName( FM_PROP_LABEL ) ) |
| continue; |
| |
| ::rtl::OUString sElementLabel; |
| OSL_VERIFY( xElement->getPropertyValue( FM_PROP_LABEL ) >>= sElementLabel ); |
| aUsedLabels.insert( sElementLabel ); |
| } |
| |
| // now find a free label |
| sal_Int32 i=2; |
| while ( aUsedLabels.find( sLabel ) != aUsedLabels.end() ) |
| { |
| ::rtl::OUStringBuffer aBuffer( _rBaseLabel ); |
| aBuffer.appendAscii( " " ); |
| aBuffer.append( (sal_Int32)i++ ); |
| sLabel = aBuffer.makeStringAndClear(); |
| } |
| } |
| catch( const Exception& ) |
| { |
| DBG_UNHANDLED_EXCEPTION(); |
| } |
| return sLabel; |
| } |
| |
| //.................................................................... |
| static Sequence< PropertyValue > lcl_getDataSourceIndirectProperties( const Reference< XPropertySet >& _rxControlModel, |
| const ::comphelper::ComponentContext& _rContext ) |
| { |
| OSL_PRECOND( _rxControlModel.is(), "lcl_getDataSourceIndirectProperties: invalid model!" ); |
| |
| Sequence< PropertyValue > aInfo; |
| try |
| { |
| Reference< XChild > xChild( _rxControlModel, UNO_QUERY ); |
| Reference< XPropertySet > xForm; |
| if ( xChild.is() ) |
| xForm = xForm.query( xChild->getParent() ); |
| |
| if ( Reference< XGridColumnFactory >( xForm, UNO_QUERY ).is() ) |
| { // hmm. the model is a grid column, in real |
| xChild = xChild.query( xForm ); |
| xForm = xForm.query( xChild->getParent() ); |
| } |
| |
| OSL_ENSURE( xForm.is(), "lcl_getDataSourceIndirectProperties: could not determine the form!" ); |
| if ( !xForm.is() ) |
| return aInfo; |
| ::rtl::OUString sDataSourceName; |
| xForm->getPropertyValue( FM_PROP_DATASOURCE ) >>= sDataSourceName; |
| |
| Reference< XPropertySet > xDsProperties; |
| if ( sDataSourceName.getLength() ) |
| xDsProperties = xDsProperties.query( OStaticDataAccessTools().getDataSource( sDataSourceName, _rContext.getLegacyServiceFactory() ) ); |
| if ( xDsProperties.is() ) |
| xDsProperties->getPropertyValue( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "Info" ) ) ) >>= aInfo; |
| } |
| catch( const Exception& ) |
| { |
| OSL_ENSURE( sal_False, "lcl_getDataSourceIndirectProperties: caught an exception!" ); |
| } |
| return aInfo; |
| } |
| |
| //.................................................................... |
| static const sal_Char* aCharacterAndParagraphProperties[] = |
| { |
| "CharFontName", |
| "CharFontStyleName", |
| "CharFontFamily", |
| "CharFontCharSet", |
| "CharFontPitch", |
| "CharColor", |
| "CharEscapement", |
| "CharHeight", |
| "CharUnderline", |
| "CharWeight", |
| "CharPosture", |
| "CharAutoKerning", |
| "CharBackColor", |
| "CharBackTransparent", |
| "CharCaseMap", |
| "CharCrossedOut", |
| "CharFlash", |
| "CharStrikeout", |
| "CharWordMode", |
| "CharKerning", |
| "CharLocale", |
| "CharKeepTogether", |
| "CharNoLineBreak", |
| "CharShadowed", |
| "CharFontType", |
| "CharStyleName", |
| "CharContoured", |
| "CharCombineIsOn", |
| "CharCombinePrefix", |
| "CharCombineSuffix", |
| "CharEmphasize", |
| "CharRelief", |
| "RubyText", |
| "RubyAdjust", |
| "RubyCharStyleName", |
| "RubyIsAbove", |
| "CharRotation", |
| "CharRotationIsFitToLine", |
| "CharScaleWidth", |
| "HyperLinkURL", |
| "HyperLinkTarget", |
| "HyperLinkName", |
| "VisitedCharStyleName", |
| "UnvisitedCharStyleName", |
| "CharEscapementHeight", |
| "CharNoHyphenation", |
| "CharUnderlineColor", |
| "CharUnderlineHasColor", |
| "CharStyleNames", |
| "CharHeightAsian", |
| "CharWeightAsian", |
| "CharFontNameAsian", |
| "CharFontStyleNameAsian", |
| "CharFontFamilyAsian", |
| "CharFontCharSetAsian", |
| "CharFontPitchAsian", |
| "CharPostureAsian", |
| "CharLocaleAsian", |
| "ParaIsCharacterDistance", |
| "ParaIsForbiddenRules", |
| "ParaIsHangingPunctuation", |
| "CharHeightComplex", |
| "CharWeightComplex", |
| "CharFontNameComplex", |
| "CharFontStyleNameComplex", |
| "CharFontFamilyComplex", |
| "CharFontCharSetComplex", |
| "CharFontPitchComplex", |
| "CharPostureComplex", |
| "CharLocaleComplex", |
| "ParaAdjust", |
| "ParaLineSpacing", |
| "ParaBackColor", |
| "ParaBackTransparent", |
| "ParaBackGraphicURL", |
| "ParaBackGraphicFilter", |
| "ParaBackGraphicLocation", |
| "ParaLastLineAdjust", |
| "ParaExpandSingleWord", |
| "ParaLeftMargin", |
| "ParaRightMargin", |
| "ParaTopMargin", |
| "ParaBottomMargin", |
| "ParaLineNumberCount", |
| "ParaLineNumberStartValue", |
| "PageDescName", |
| "PageNumberOffset", |
| "ParaRegisterModeActive", |
| "ParaTabStops", |
| "ParaStyleName", |
| "DropCapFormat", |
| "DropCapWholeWord", |
| "ParaKeepTogether", |
| "Setting", |
| "ParaSplit", |
| "Setting", |
| "NumberingLevel", |
| "NumberingRules", |
| "NumberingStartValue", |
| "ParaIsNumberingRestart", |
| "NumberingStyleName", |
| "ParaOrphans", |
| "ParaWidows", |
| "ParaShadowFormat", |
| "LeftBorder", |
| "RightBorder", |
| "TopBorder", |
| "BottomBorder", |
| "BorderDistance", |
| "LeftBorderDistance", |
| "RightBorderDistance", |
| "TopBorderDistance", |
| "BottomBorderDistance", |
| "BreakType", |
| "DropCapCharStyleName", |
| "ParaFirstLineIndent", |
| "ParaIsAutoFirstLineIndent", |
| "ParaIsHyphenation", |
| "ParaHyphenationMaxHyphens", |
| "ParaHyphenationMaxLeadingChars", |
| "ParaHyphenationMaxTrailingChars", |
| "ParaVertAlignment", |
| "ParaUserDefinedAttributes", |
| "NumberingIsNumber", |
| "ParaIsConnectBorder", |
| NULL |
| }; |
| |
| //.................................................................... |
| static void lcl_initializeCharacterAttributes( const Reference< XPropertySet >& _rxModel ) |
| { |
| try |
| { |
| Reference< XPropertySet > xStyle( ControlLayouter::getDefaultDocumentTextStyle( _rxModel ), UNO_SET_THROW ); |
| |
| // transfer all properties which are described by the style |
| Reference< XPropertySetInfo > xSourcePropInfo( xStyle->getPropertySetInfo(), UNO_SET_THROW ); |
| Reference< XPropertySetInfo > xDestPropInfo( _rxModel->getPropertySetInfo(), UNO_SET_THROW ); |
| |
| ::rtl::OUString sPropertyName; |
| const sal_Char** pCharacterProperty = aCharacterAndParagraphProperties; |
| while ( *pCharacterProperty ) |
| { |
| sPropertyName = ::rtl::OUString::createFromAscii( *pCharacterProperty ); |
| |
| if ( xSourcePropInfo->hasPropertyByName( sPropertyName ) && xDestPropInfo->hasPropertyByName( sPropertyName ) ) |
| _rxModel->setPropertyValue( sPropertyName, xStyle->getPropertyValue( sPropertyName ) ); |
| |
| ++pCharacterProperty; |
| } |
| } |
| catch( const Exception& ) |
| { |
| DBG_UNHANDLED_EXCEPTION(); |
| } |
| } |
| } |
| |
| //-------------------------------------------------------------------- |
| sal_Int16 FormControlFactory::initializeControlModel( const DocumentType _eDocType, const Reference< XPropertySet >& _rxControlModel, |
| const Rectangle& _rControlBoundRect ) |
| { |
| sal_Int16 nClassId = FormComponentType::CONTROL; |
| |
| OSL_ENSURE( _rxControlModel.is(), "FormControlFactory::initializeControlModel: invalid model!" ); |
| if ( !_rxControlModel.is() ) |
| return nClassId; |
| |
| try |
| { |
| ControlLayouter::initializeControlLayout( _rxControlModel, _eDocType ); |
| |
| _rxControlModel->getPropertyValue( FM_PROP_CLASSID ) >>= nClassId; |
| Reference< XPropertySetInfo > xPSI( _rxControlModel->getPropertySetInfo(), UNO_SET_THROW ); |
| switch ( nClassId ) |
| { |
| case FormComponentType::SCROLLBAR: |
| _rxControlModel->setPropertyValue( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "LiveScroll" ) ), makeAny( (sal_Bool)sal_True ) ); |
| // NO break! |
| case FormComponentType::SPINBUTTON: |
| { |
| sal_Int32 eOrientation = ScrollBarOrientation::HORIZONTAL; |
| if ( !_rControlBoundRect.IsEmpty() && ( _rControlBoundRect.GetWidth() < _rControlBoundRect.GetHeight() ) ) |
| eOrientation = ScrollBarOrientation::VERTICAL; |
| _rxControlModel->setPropertyValue( FM_PROP_ORIENTATION, makeAny( eOrientation ) ); |
| } |
| break; |
| |
| case FormComponentType::LISTBOX: |
| case FormComponentType::COMBOBOX: |
| { |
| sal_Bool bDropDown = !_rControlBoundRect.IsEmpty() && ( _rControlBoundRect.GetWidth() >= 3 * _rControlBoundRect.GetHeight() ); |
| if ( xPSI->hasPropertyByName( FM_PROP_DROPDOWN ) ) |
| _rxControlModel->setPropertyValue( FM_PROP_DROPDOWN, makeAny( (sal_Bool)bDropDown ) ); |
| _rxControlModel->setPropertyValue( FM_PROP_LINECOUNT, makeAny( sal_Int16( 20 ) ) ); |
| } |
| break; |
| |
| case FormComponentType::TEXTFIELD: |
| { |
| initializeTextFieldLineEnds( _rxControlModel ); |
| lcl_initializeCharacterAttributes( _rxControlModel ); |
| |
| if ( !_rControlBoundRect.IsEmpty() |
| && !( _rControlBoundRect.GetWidth() > 4 * _rControlBoundRect.GetHeight() ) |
| ) |
| { |
| if ( xPSI->hasPropertyByName( FM_PROP_MULTILINE ) ) |
| _rxControlModel->setPropertyValue( FM_PROP_MULTILINE, makeAny( (sal_Bool)sal_True ) ); |
| } |
| } |
| break; |
| |
| case FormComponentType::RADIOBUTTON: |
| case FormComponentType::CHECKBOX: |
| case FormComponentType::FIXEDTEXT: |
| { |
| ::rtl::OUString sVertAlignPropertyName( RTL_CONSTASCII_USTRINGPARAM( "VerticalAlign" ) ); |
| if ( xPSI->hasPropertyByName( sVertAlignPropertyName ) ) |
| _rxControlModel->setPropertyValue( sVertAlignPropertyName, makeAny( VerticalAlignment_MIDDLE ) ); |
| } |
| break; |
| |
| case FormComponentType::IMAGEBUTTON: |
| case FormComponentType::IMAGECONTROL: |
| { |
| const ::rtl::OUString sScaleModeProperty( RTL_CONSTASCII_USTRINGPARAM( "ScaleMode" ) ); |
| if ( xPSI->hasPropertyByName( sScaleModeProperty ) ) |
| _rxControlModel->setPropertyValue( sScaleModeProperty, makeAny( ImageScaleMode::ISOTROPIC ) ); |
| } |
| break; |
| } |
| |
| // initial default label for the control |
| if ( xPSI->hasPropertyByName( FM_PROP_LABEL ) ) |
| { |
| ::rtl::OUString sExistingLabel; |
| OSL_VERIFY( _rxControlModel->getPropertyValue( FM_PROP_LABEL ) >>= sExistingLabel ); |
| if ( !sExistingLabel.getLength() ) |
| { |
| ::rtl::OUString sInitialLabel; |
| OSL_VERIFY( _rxControlModel->getPropertyValue( FM_PROP_NAME ) >>= sInitialLabel ); |
| |
| sal_uInt16 nTitleResId = 0; |
| switch ( nClassId ) |
| { |
| case FormComponentType::COMMANDBUTTON: nTitleResId = RID_STR_PROPTITLE_PUSHBUTTON; break; |
| case FormComponentType::RADIOBUTTON: nTitleResId = RID_STR_PROPTITLE_RADIOBUTTON; break; |
| case FormComponentType::CHECKBOX: nTitleResId = RID_STR_PROPTITLE_CHECKBOX; break; |
| case FormComponentType::GROUPBOX: nTitleResId = RID_STR_PROPTITLE_GROUPBOX; break; |
| case FormComponentType::FIXEDTEXT: nTitleResId = RID_STR_PROPTITLE_FIXEDTEXT; break; |
| } |
| |
| if ( nTitleResId ) |
| sInitialLabel = String( SVX_RES( nTitleResId ) ); |
| |
| _rxControlModel->setPropertyValue( |
| FM_PROP_LABEL, |
| makeAny( lcl_getUniqueLabel_nothrow( _rxControlModel, sInitialLabel ) ) |
| ); |
| } |
| } |
| |
| // strict format = yes is the default (i93467) |
| if ( xPSI->hasPropertyByName( FM_PROP_STRICTFORMAT ) ) |
| { |
| _rxControlModel->setPropertyValue( FM_PROP_STRICTFORMAT, makeAny( sal_Bool( sal_True ) ) ); |
| } |
| |
| // mouse wheel: don't use it for scrolling by default (i110036) |
| if ( xPSI->hasPropertyByName( FM_PROP_MOUSE_WHEEL_BEHAVIOR ) ) |
| { |
| _rxControlModel->setPropertyValue( FM_PROP_MOUSE_WHEEL_BEHAVIOR, makeAny( MouseWheelBehavior::SCROLL_DISABLED ) ); |
| } |
| |
| if ( xPSI->hasPropertyByName( FM_PROP_WRITING_MODE ) ) |
| _rxControlModel->setPropertyValue( FM_PROP_WRITING_MODE, makeAny( WritingMode2::CONTEXT ) ); |
| } |
| catch( const Exception& ) |
| { |
| DBG_UNHANDLED_EXCEPTION(); |
| } |
| return nClassId; |
| } |
| |
| //------------------------------------------------------------------------------ |
| void FormControlFactory::initializeTextFieldLineEnds( const Reference< XPropertySet >& _rxModel ) |
| { |
| OSL_PRECOND( _rxModel.is(), "initializeTextFieldLineEnds: invalid model!" ); |
| if ( !_rxModel.is() ) |
| return; |
| |
| try |
| { |
| Reference< XPropertySetInfo > xInfo = _rxModel->getPropertySetInfo(); |
| if ( !xInfo.is() || !xInfo->hasPropertyByName( FM_PROP_LINEENDFORMAT ) ) |
| return; |
| |
| // let's see if the data source which the form belongs to (if any) |
| // has a setting for the preferred line end format |
| sal_Bool bDosLineEnds = sal_False; |
| Sequence< PropertyValue > aInfo = lcl_getDataSourceIndirectProperties( _rxModel, m_pData->m_aContext ); |
| const PropertyValue* pInfo = aInfo.getConstArray(); |
| const PropertyValue* pInfoEnd = pInfo + aInfo.getLength(); |
| for ( ; pInfo != pInfoEnd; ++pInfo ) |
| { |
| if ( pInfo->Name.equalsAscii( "PreferDosLikeLineEnds" ) ) |
| { |
| pInfo->Value >>= bDosLineEnds; |
| break; |
| } |
| } |
| |
| sal_Int16 nLineEndFormat = bDosLineEnds ? LineEndFormat::CARRIAGE_RETURN_LINE_FEED : LineEndFormat::LINE_FEED; |
| _rxModel->setPropertyValue( FM_PROP_LINEENDFORMAT, makeAny( nLineEndFormat ) ); |
| } |
| catch( const Exception& ) |
| { |
| DBG_UNHANDLED_EXCEPTION(); |
| } |
| } |
| |
| //------------------------------------------------------------------------------ |
| void FormControlFactory::initializeFieldDependentProperties( const Reference< XPropertySet >& _rxDatabaseField, |
| const Reference< XPropertySet >& _rxControlModel, const Reference< XNumberFormats >& _rxNumberFormats ) |
| { |
| OSL_PRECOND( _rxDatabaseField.is() && _rxControlModel.is(), |
| "FormControlFactory::initializeFieldDependentProperties: illegal params!" ); |
| if ( !_rxDatabaseField.is() || !_rxControlModel.is() ) |
| return; |
| |
| try |
| { |
| //////////////////////////////////////////////////////////////////////// |
| // if the field has a numeric format, and the model has a "Scale" property, sync it |
| Reference< XPropertySetInfo > xFieldPSI( _rxDatabaseField->getPropertySetInfo(), UNO_SET_THROW ); |
| Reference< XPropertySetInfo > xModelPSI( _rxControlModel->getPropertySetInfo(), UNO_SET_THROW ); |
| |
| if ( xModelPSI->hasPropertyByName( FM_PROP_DECIMAL_ACCURACY ) ) |
| { |
| sal_Int32 nFormatKey = 0; |
| if ( xFieldPSI->hasPropertyByName( FM_PROP_FORMATKEY ) ) |
| { |
| _rxDatabaseField->getPropertyValue( FM_PROP_FORMATKEY ) >>= nFormatKey; |
| } |
| else |
| { |
| nFormatKey = OStaticDataAccessTools().getDefaultNumberFormat( |
| _rxDatabaseField, |
| Reference< XNumberFormatTypes >( _rxNumberFormats, UNO_QUERY ), |
| SvtSysLocale().GetLocaleData().getLocale() |
| ); |
| } |
| |
| Any aScaleVal( ::comphelper::getNumberFormatDecimals( _rxNumberFormats, nFormatKey ) ); |
| _rxControlModel->setPropertyValue( FM_PROP_DECIMAL_ACCURACY, aScaleVal ); |
| } |
| |
| //////////////////////////////////////////////////////////////////////// |
| // minimum and maximum of the control according to the type of the database field |
| sal_Int32 nDataType = DataType::OTHER; |
| OSL_VERIFY( _rxDatabaseField->getPropertyValue( FM_PROP_FIELDTYPE ) >>= nDataType ); |
| |
| if ( xModelPSI->hasPropertyByName( FM_PROP_VALUEMIN ) |
| && xModelPSI->hasPropertyByName( FM_PROP_VALUEMAX ) |
| ) |
| { |
| sal_Int32 nMinValue = -1000000000, nMaxValue = 1000000000; |
| switch ( nDataType ) |
| { |
| case DataType::TINYINT : nMinValue = 0; nMaxValue = 255; break; |
| case DataType::SMALLINT : nMinValue = -32768; nMaxValue = 32767; break; |
| case DataType::INTEGER : nMinValue = 0x80000000; nMaxValue = 0x7FFFFFFF; break; |
| // double and singles are ignored |
| } |
| |
| Any aValue; |
| |
| // both the minimum and the maximum value properties can be either Long or Double |
| Property aProperty = xModelPSI->getPropertyByName( FM_PROP_VALUEMIN ); |
| if ( aProperty.Type.getTypeClass() == TypeClass_DOUBLE ) |
| aValue <<= (double)nMinValue; |
| else if ( aProperty.Type.getTypeClass() == TypeClass_LONG ) |
| aValue <<= (sal_Int32)nMinValue; |
| else |
| { |
| DBG_ERROR( "FormControlFactory::initializeFieldDependentProperties: unexpected property type (MinValue)!" ); |
| } |
| _rxControlModel->setPropertyValue( FM_PROP_VALUEMIN, aValue ); |
| |
| // both the minimum and the maximum value properties can be either Long or Double |
| aProperty = xModelPSI->getPropertyByName( FM_PROP_VALUEMAX ); |
| if ( aProperty.Type.getTypeClass() == TypeClass_DOUBLE ) |
| aValue <<= (double)nMaxValue; |
| else if ( aProperty.Type.getTypeClass() == TypeClass_LONG ) |
| aValue <<= (sal_Int32)nMaxValue; |
| else |
| { |
| DBG_ERROR( "FormControlFactory::initializeFieldDependentProperties: unexpected property type (MaxValue)!" ); |
| } |
| _rxControlModel->setPropertyValue( FM_PROP_VALUEMAX, aValue ); |
| } |
| |
| //////////////////////////////////////////////////////////////////////// |
| // a check box can be tristate if and only if the column it is bound to is nullable |
| sal_Int16 nClassId = FormComponentType::CONTROL; |
| OSL_VERIFY( _rxControlModel->getPropertyValue( FM_PROP_CLASSID ) >>= nClassId ); |
| if ( nClassId == FormComponentType::CHECKBOX ) |
| { |
| sal_Int32 nNullable = ColumnValue::NULLABLE_UNKNOWN; |
| OSL_VERIFY( _rxDatabaseField->getPropertyValue( FM_PROP_ISNULLABLE ) >>= nNullable ); |
| _rxControlModel->setPropertyValue( FM_PROP_TRISTATE, makeAny( sal_Bool( ColumnValue::NO_NULLS != nNullable ) ) ); |
| } |
| } |
| catch( const Exception& ) |
| { |
| DBG_UNHANDLED_EXCEPTION(); |
| } |
| } |
| |
| //------------------------------------------------------------------------------ |
| ::rtl::OUString FormControlFactory::getDefaultName( sal_Int16 _nClassId, const Reference< XServiceInfo >& _rxObject ) |
| { |
| sal_uInt16 nResId(0); |
| |
| switch ( _nClassId ) |
| { |
| case FormComponentType::COMMANDBUTTON: nResId = RID_STR_PROPTITLE_PUSHBUTTON; break; |
| case FormComponentType::RADIOBUTTON: nResId = RID_STR_PROPTITLE_RADIOBUTTON; break; |
| case FormComponentType::CHECKBOX: nResId = RID_STR_PROPTITLE_CHECKBOX; break; |
| case FormComponentType::LISTBOX: nResId = RID_STR_PROPTITLE_LISTBOX; break; |
| case FormComponentType::COMBOBOX: nResId = RID_STR_PROPTITLE_COMBOBOX; break; |
| case FormComponentType::GROUPBOX: nResId = RID_STR_PROPTITLE_GROUPBOX; break; |
| case FormComponentType::IMAGEBUTTON: nResId = RID_STR_PROPTITLE_IMAGEBUTTON; break; |
| case FormComponentType::FIXEDTEXT: nResId = RID_STR_PROPTITLE_FIXEDTEXT; break; |
| case FormComponentType::GRIDCONTROL: nResId = RID_STR_PROPTITLE_DBGRID; break; |
| case FormComponentType::FILECONTROL: nResId = RID_STR_PROPTITLE_FILECONTROL; break; |
| case FormComponentType::DATEFIELD: nResId = RID_STR_PROPTITLE_DATEFIELD; break; |
| case FormComponentType::TIMEFIELD: nResId = RID_STR_PROPTITLE_TIMEFIELD; break; |
| case FormComponentType::NUMERICFIELD: nResId = RID_STR_PROPTITLE_NUMERICFIELD; break; |
| case FormComponentType::CURRENCYFIELD: nResId = RID_STR_PROPTITLE_CURRENCYFIELD; break; |
| case FormComponentType::PATTERNFIELD: nResId = RID_STR_PROPTITLE_PATTERNFIELD; break; |
| case FormComponentType::IMAGECONTROL: nResId = RID_STR_PROPTITLE_IMAGECONTROL; break; |
| case FormComponentType::HIDDENCONTROL: nResId = RID_STR_PROPTITLE_HIDDEN; break; |
| case FormComponentType::SCROLLBAR: nResId = RID_STR_PROPTITLE_SCROLLBAR; break; |
| case FormComponentType::SPINBUTTON: nResId = RID_STR_PROPTITLE_SPINBUTTON; break; |
| case FormComponentType::NAVIGATIONBAR: nResId = RID_STR_PROPTITLE_NAVBAR; break; |
| |
| case FormComponentType::TEXTFIELD: |
| nResId = RID_STR_PROPTITLE_EDIT; |
| if ( _rxObject.is() && _rxObject->supportsService( FM_SUN_COMPONENT_FORMATTEDFIELD ) ) |
| nResId = RID_STR_PROPTITLE_FORMATTED; |
| break; |
| |
| default: |
| nResId = RID_STR_CONTROL; break; |
| } |
| |
| return String( SVX_RES( nResId ) ); |
| } |
| |
| //------------------------------------------------------------------------------ |
| ::rtl::OUString FormControlFactory::getDefaultUniqueName_ByComponentType( const Reference< XNameAccess >& _rxContainer, |
| const Reference< XPropertySet >& _rxObject ) |
| { |
| sal_Int16 nClassId = FormComponentType::CONTROL; |
| OSL_VERIFY( _rxObject->getPropertyValue( FM_PROP_CLASSID ) >>= nClassId ); |
| ::rtl::OUString sBaseName = getDefaultName( nClassId, Reference< XServiceInfo >( _rxObject, UNO_QUERY ) ); |
| |
| return getUniqueName( _rxContainer, sBaseName ); |
| } |
| |
| //------------------------------------------------------------------------------ |
| ::rtl::OUString FormControlFactory::getUniqueName( const Reference< XNameAccess >& _rxContainer, const ::rtl::OUString& _rBaseName ) |
| { |
| sal_Int32 n = 0; |
| ::rtl::OUString sName; |
| do |
| { |
| ::rtl::OUStringBuffer aBuf( _rBaseName ); |
| aBuf.appendAscii( " " ); |
| aBuf.append( ++n ); |
| sName = aBuf.makeStringAndClear(); |
| } |
| while ( _rxContainer->hasByName( sName ) ); |
| |
| return sName; |
| } |
| |
| //........................................................................ |
| } // namespace svxform |
| //........................................................................ |
