svx/source/fmcomp/gridcell.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20
  21 #include <memory>
  22 #include <sal/log.hxx>
  23 #include <fmprop.hxx>
  24 #include <svx/strings.hrc>
  25 #include <svx/fmtools.hxx>
  26 #include <gridcell.hxx>
  27 #include <gridcols.hxx>
  28 #include <sdbdatacolumn.hxx>
  29
  30 #include <com/sun/star/awt/LineEndFormat.hpp>
  31 #include <com/sun/star/awt/MouseWheelBehavior.hpp>
  32 #include <com/sun/star/awt/VisualEffect.hpp>
  33 #include <com/sun/star/container/XChild.hpp>
  34 #include <com/sun/star/container/XIndexAccess.hpp>
  35 #include <com/sun/star/form/FormComponentType.hpp>
  36 #include <com/sun/star/form/XBoundComponent.hpp>
  37 #include <com/sun/star/script/XEventAttacherManager.hpp>
  38 #include <com/sun/star/sdbcx/XTablesSupplier.hpp>
  39 #include <com/sun/star/sdbcx/XColumnsSupplier.hpp>
  40 #include <com/sun/star/sdbc/DataType.hpp>
  41 #include <com/sun/star/sdbc/SQLException.hpp>
  42 #include <com/sun/star/sdbc/XRowSet.hpp>
  43 #include <com/sun/star/sdbc/XStatement.hpp>
  44 #include <com/sun/star/util/XNumberFormatsSupplier.hpp>
  45 #include <com/sun/star/util/XNumberFormatter.hpp>
  46 #include <com/sun/star/util/Time.hpp>
  47 #include <com/sun/star/util/Date.hpp>
  48
  49 #include <comphelper/numbers.hxx>
  50 #include <comphelper/property.hxx>
  51 #include <comphelper/servicehelper.hxx>
  52 #include <comphelper/string.hxx>
  53 #include <comphelper/types.hxx>
  54 #include <connectivity/formattedcolumnvalue.hxx>
  55 #include <i18nlangtag/lang.h>
  56 #include <o3tl/safeint.hxx>
  57 #include <svl/numformat.hxx>
  58 #include <svl/numuno.hxx>
  59 #include <svx/dialmgr.hxx>
  60 #include <toolkit/helper/listenermultiplexer.hxx>
  61 #include <toolkit/helper/vclunohelper.hxx>
  62 #include <tools/debug.hxx>
  63 #include <tools/fract.hxx>
  64 #include <comphelper/diagnose_ex.hxx>
  65 #include <vcl/settings.hxx>
  66 #include <vcl/svapp.hxx>
  67 #include <connectivity/dbtools.hxx>
  68 #include <connectivity/dbconversion.hxx>
  69 #include <connectivity/sqlnode.hxx>
  70
  71 using namespace ::connectivity;
  72 using namespace ::svxform;
  73 using namespace ::comphelper;
  74 using namespace ::svt;
  75 using namespace ::com::sun::star;
  76 using namespace ::com::sun::star::uno;
  77 using namespace ::com::sun::star::sdbc;
  78 using namespace ::com::sun::star::sdbcx;
  79 using namespace ::com::sun::star::sdb;
  80 using namespace ::com::sun::star::beans;
  81 using namespace ::com::sun::star::form;
  82 using namespace ::dbtools::DBTypeConversion;
  83 using namespace ::dbtools;
  84
  85 using ::com::sun::star::util::XNumberFormatter;
  86
  87 constexpr OUStringLiteral INVALIDTEXT = u"###";
  88 constexpr OUStringLiteral OBJECTTEXT = u"<OBJECT>";
  89
  90
  91 //= helper
  92
  93 namespace
  94 {
  95     LineEnd getModelLineEndSetting( const Reference< XPropertySet >& _rxModel )
  96     {
  97         LineEnd eFormat = LINEEND_LF;
  98
  99         try
 100         {
 101             sal_Int16 nLineEndFormat = awt::LineEndFormat::LINE_FEED;
 102
 103             Reference< XPropertySetInfo > xPSI;
 104             if ( _rxModel.is() )
 105                 xPSI = _rxModel->getPropertySetInfo();
 106
 107             OSL_ENSURE( xPSI.is(), "getModelLineEndSetting: invalid column model!" );
 108             if ( xPSI.is() && xPSI->hasPropertyByName( FM_PROP_LINEENDFORMAT ) )
 109             {
 110                 OSL_VERIFY( _rxModel->getPropertyValue( FM_PROP_LINEENDFORMAT ) >>= nLineEndFormat );
 111
 112                 switch ( nLineEndFormat )
 113                 {
 114                 case awt::LineEndFormat::CARRIAGE_RETURN:            eFormat = LINEEND_CR; break;
 115                 case awt::LineEndFormat::LINE_FEED:                  eFormat = LINEEND_LF; break;
 116                 case awt::LineEndFormat::CARRIAGE_RETURN_LINE_FEED:  eFormat = LINEEND_CRLF; break;
 117                 default:
 118                     OSL_FAIL( "getModelLineEndSetting: what's this?" );
 119                 }
 120             }
 121         }
 122         catch( const Exception& )
 123         {
 124             TOOLS_WARN_EXCEPTION( "svx", "getModelLineEndSetting" );
 125         }
 126         return eFormat;
 127     }
 128 }
 129
 130
 131 //= DbGridColumn
 132
 133
 134 CellControllerRef DbGridColumn::s_xEmptyController;
 135
 136
 137 void DbGridColumn::CreateControl(sal_Int32 _nFieldPos, const Reference< css::beans::XPropertySet >& xField, sal_Int32 nTypeId)
 138 {
 139     Clear();
 140
 141     m_nTypeId = static_cast<sal_Int16>(nTypeId);
 142     if (xField != m_xField)
 143     {
 144         // initial setting
 145         m_xField = xField;
 146         xField->getPropertyValue(FM_PROP_FORMATKEY) >>= m_nFormatKey;
 147         m_nFieldPos   = static_cast<sal_Int16>(_nFieldPos);
 148         m_bReadOnly   = ::comphelper::getBOOL(xField->getPropertyValue(FM_PROP_ISREADONLY));
 149         m_bAutoValue  = ::comphelper::getBOOL(xField->getPropertyValue(FM_PROP_AUTOINCREMENT));
 150         m_nFieldType  = static_cast<sal_Int16>(::comphelper::getINT32(xField->getPropertyValue(FM_PROP_FIELDTYPE)));
 151
 152         switch (m_nFieldType)
 153         {
 154             case DataType::DATE:
 155             case DataType::TIME:
 156             case DataType::TIMESTAMP:
 157             case DataType::BIT:
 158             case DataType::BOOLEAN:
 159             case DataType::TINYINT:
 160             case DataType::SMALLINT:
 161             case DataType::INTEGER:
 162             case DataType::BIGINT:
 163             case DataType::FLOAT:
 164             case DataType::REAL:
 165             case DataType::DOUBLE:
 166             case DataType::NUMERIC:
 167             case DataType::DECIMAL:
 168                 m_nAlign = css::awt::TextAlign::RIGHT;
 169                 m_bNumeric = true;
 170                 break;
 171             default:
 172                 m_nAlign = css::awt::TextAlign::LEFT;
 173                 break;
 174         }
 175     }
 176
 177     std::unique_ptr<DbCellControl> pCellControl;
 178     if (m_rParent.IsFilterMode())
 179     {
 180         pCellControl.reset(new DbFilterField(m_rParent.getContext(),*this));
 181     }
 182     else
 183     {
 184
 185         switch (nTypeId)
 186         {
 187             case TYPE_CHECKBOX: pCellControl.reset(new DbCheckBox(*this));   break;
 188             case TYPE_COMBOBOX: pCellControl.reset(new DbComboBox(*this)); break;
 189             case TYPE_CURRENCYFIELD: pCellControl.reset(new DbCurrencyField(*this)); break;
 190             case TYPE_DATEFIELD: pCellControl.reset(new DbDateField(*this)); break;
 191             case TYPE_LISTBOX: pCellControl.reset(new DbListBox(*this)); break;
 192             case TYPE_NUMERICFIELD: pCellControl.reset(new DbNumericField(*this)); break;
 193             case TYPE_PATTERNFIELD: pCellControl.reset(new DbPatternField( *this, m_rParent.getContext() )); break;
 194             case TYPE_TEXTFIELD: pCellControl.reset(new DbTextField(*this)); break;
 195             case TYPE_TIMEFIELD: pCellControl.reset(new DbTimeField(*this)); break;
 196             case TYPE_FORMATTEDFIELD: pCellControl.reset(new DbFormattedField(*this)); break;
 197             default:
 198                 OSL_FAIL("DbGridColumn::CreateControl: Unknown Column");
 199                 return;
 200         }
 201
 202     }
 203     Reference< XRowSet >  xCur;
 204     if (m_rParent.getDataSource())
 205         xCur.set(Reference< XInterface >(*m_rParent.getDataSource()), UNO_QUERY);
 206         // TODO : the cursor wrapper should use an XRowSet interface, too
 207
 208     pCellControl->Init( m_rParent.GetDataWindow(), xCur );
 209
 210     // now create the control wrapper
 211     auto pTempCellControl = pCellControl.get();
 212     if (m_rParent.IsFilterMode())
 213         m_pCell = new FmXFilterCell(this, std::unique_ptr<DbFilterField>(static_cast<DbFilterField*>(pCellControl.release())));
 214     else
 215     {
 216         switch (nTypeId)
 217         {
 218             case TYPE_CHECKBOX: m_pCell = new FmXCheckBoxCell( this, std::move(pCellControl) );  break;
 219             case TYPE_LISTBOX: m_pCell = new FmXListBoxCell( this, std::move(pCellControl) );    break;
 220             case TYPE_COMBOBOX: m_pCell = new FmXComboBoxCell( this, std::move(pCellControl) );    break;
 221             default:
 222                 m_pCell = new FmXEditCell( this, std::move(pCellControl) );
 223         }
 224     }
 225     m_pCell->init();
 226
 227     impl_toggleScriptManager_nothrow( true );
 228
 229     // only if we use have a bound field, we use a controller for displaying the
 230     // window in the grid
 231     if (m_xField.is())
 232         m_xController = pTempCellControl->CreateController();
 233 }
 234
 235
 236 void DbGridColumn::impl_toggleScriptManager_nothrow( bool _bAttach )
 237 {
 238     try
 239     {
 240         Reference< container::XChild > xChild( m_xModel, UNO_QUERY_THROW );
 241         Reference< script::XEventAttacherManager > xManager( xChild->getParent(), UNO_QUERY_THROW );
 242         Reference< container::XIndexAccess > xContainer( xChild->getParent(), UNO_QUERY_THROW );
 243
 244         sal_Int32 nIndexInParent( getElementPos( xContainer, m_xModel ) );
 245
 246         Reference< XInterface > xCellInterface( *m_pCell, UNO_QUERY );
 247         if ( _bAttach )
 248             xManager->attach( nIndexInParent, xCellInterface, Any( xCellInterface ) );
 249         else
 250             xManager->detach( nIndexInParent, xCellInterface );
 251     }
 252     catch( const Exception& )
 253     {
 254         DBG_UNHANDLED_EXCEPTION("svx");
 255     }
 256 }
 257
 258 void DbGridColumn::UpdateFromField(const DbGridRow* pRow, const Reference< XNumberFormatter >& xFormatter)
 259 {
 260     if (FmXFilterCell* pCell = dynamic_cast<FmXFilterCell*>(m_pCell.get()))
 261         pCell->Update();
 262     else if (pRow && pRow->IsValid() && m_nFieldPos >= 0 && m_pCell.is() && pRow->HasField(m_nFieldPos))
 263     {
 264         dynamic_cast<FmXDataCell&>(*m_pCell).UpdateFromField( pRow->GetField( m_nFieldPos ).getColumn(), xFormatter  );
 265     }
 266 }
 267
 268 bool DbGridColumn::Commit()
 269 {
 270     bool bResult = true;
 271     if (!m_bInSave && m_pCell.is())
 272     {
 273         m_bInSave = true;
 274         bResult = m_pCell->Commit();
 275
 276         // store the data into the model
 277         FmXDataCell* pDataCell = dynamic_cast<FmXDataCell*>( m_pCell.get() );
 278         if (bResult && pDataCell)
 279         {
 280             Reference< css::form::XBoundComponent >  xComp(m_xModel, UNO_QUERY);
 281             if (xComp.is())
 282                 bResult = xComp->commit();
 283         }
 284         m_bInSave = false;
 285     }
 286     return bResult;
 287 }
 288
 289 DbGridColumn::~DbGridColumn()
 290 {
 291     Clear();
 292 }
 293
 294 void DbGridColumn::setModel(const css::uno::Reference< css::beans::XPropertySet >&  _xModel)
 295 {
 296     if ( m_pCell.is() )
 297         impl_toggleScriptManager_nothrow( false );
 298
 299     m_xModel = _xModel;
 300
 301     if ( m_pCell.is() )
 302         impl_toggleScriptManager_nothrow( true );
 303 }
 304
 305
 306 void DbGridColumn::Clear()
 307 {
 308     if ( m_pCell.is() )
 309     {
 310         impl_toggleScriptManager_nothrow( false );
 311
 312         m_pCell->dispose();
 313         m_pCell.clear();
 314     }
 315
 316     m_xController = nullptr;
 317     m_xField = nullptr;
 318
 319     m_nFormatKey = 0;
 320     m_nFieldPos = -1;
 321     m_bReadOnly = true;
 322     m_bAutoValue = false;
 323     m_nFieldType = DataType::OTHER;
 324 }
 325
 326
 327 sal_Int16 DbGridColumn::SetAlignment(sal_Int16 _nAlign)
 328 {
 329     if (_nAlign == -1)
 330     {   // 'Standard'
 331         if (m_xField.is())
 332         {
 333             sal_Int32 nType = 0;
 334             m_xField->getPropertyValue(FM_PROP_FIELDTYPE) >>= nType;
 335
 336             switch (nType)
 337             {
 338                 case DataType::NUMERIC:
 339                 case DataType::DECIMAL:
 340                 case DataType::DOUBLE:
 341                 case DataType::REAL:
 342                 case DataType::BIGINT:
 343                 case DataType::INTEGER:
 344                 case DataType::SMALLINT:
 345                 case DataType::TINYINT:
 346                 case DataType::DATE:
 347                 case DataType::TIME:
 348                 case DataType::TIMESTAMP:
 349                     _nAlign = css::awt::TextAlign::RIGHT;
 350                     break;
 351                 case DataType::BIT:
 352                 case DataType::BOOLEAN:
 353                     _nAlign = css::awt::TextAlign::CENTER;
 354                     break;
 355                 default:
 356                     _nAlign = css::awt::TextAlign::LEFT;
 357                     break;
 358             }
 359         }
 360         else
 361             _nAlign = css::awt::TextAlign::LEFT;
 362     }
 363
 364     m_nAlign = _nAlign;
 365     if (m_pCell.is() && m_pCell->isAlignedController())
 366         m_pCell->AlignControl(m_nAlign);
 367
 368     return m_nAlign;
 369 }
 370
 371
 372 sal_Int16 DbGridColumn::SetAlignmentFromModel(sal_Int16 nStandardAlign)
 373 {
 374     Any aAlign( m_xModel->getPropertyValue(FM_PROP_ALIGN));
 375     if (aAlign.hasValue())
 376     {
 377         sal_Int16 nTest = sal_Int16();
 378         if (aAlign >>= nTest)
 379             nStandardAlign = nTest;
 380     }
 381     return SetAlignment(nStandardAlign);
 382 }
 383
 384
 385 void DbGridColumn::setLock(bool _bLock)
 386 {
 387     if (m_bLocked == _bLock)
 388         return;
 389     m_bLocked = _bLock;
 390
 391     // is the column we represent active ?
 392     if (m_bHidden)
 393         return;     // no, it isn't (or at least it shouldn't be ...)
 394
 395     if (m_rParent.GetCurColumnId() == m_nId)
 396     {
 397         m_rParent.DeactivateCell();
 398         m_rParent.ActivateCell(m_rParent.GetCurRow(), m_rParent.GetCurColumnId());
 399     }
 400 }
 401
 402
 403 OUString DbGridColumn::GetCellText(const DbGridRow* pRow, const Reference< XNumberFormatter >& xFormatter) const
 404 {
 405     OUString aText;
 406     if (m_pCell.is() && dynamic_cast<const FmXFilterCell*>( m_pCell.get() ) !=  nullptr)
 407         return aText;
 408
 409     if (!pRow || !pRow->IsValid())
 410         aText = INVALIDTEXT;
 411     else if (pRow->HasField(m_nFieldPos))
 412     {
 413         aText = GetCellText( pRow->GetField( m_nFieldPos ).getColumn(), xFormatter );
 414     }
 415     return aText;
 416 }
 417
 418 OUString DbGridColumn::GetCellText(const Reference< css::sdb::XColumn >& xField, const Reference< XNumberFormatter >& xFormatter) const
 419 {
 420     OUString aText;
 421     if (xField.is())
 422     {
 423         FmXTextCell* pTextCell = dynamic_cast<FmXTextCell*>( m_pCell.get() );
 424         if (pTextCell)
 425             aText = pTextCell->GetText(xField, xFormatter);
 426         else if (m_bObject)
 427             aText = OBJECTTEXT;
 428     }
 429     return aText;
 430 }
 431
 432 Reference< css::sdb::XColumn >  DbGridColumn::GetCurrentFieldValue() const
 433 {
 434     Reference< css::sdb::XColumn >  xField;
 435     const DbGridRowRef xRow = m_rParent.GetCurrentRow();
 436     if (xRow.is() && xRow->HasField(m_nFieldPos))
 437     {
 438         xField = xRow->GetField(m_nFieldPos).getColumn();
 439     }
 440     return xField;
 441 }
 442
 443
 444 void DbGridColumn::Paint(OutputDevice& rDev,
 445                          const tools::Rectangle& rRect,
 446                          const DbGridRow* pRow,
 447                          const Reference< XNumberFormatter >& xFormatter)
 448 {
 449     bool bEnabled = ( rDev.GetOutDevType() != OUTDEV_WINDOW )
 450                 ||  ( rDev.GetOwnerWindow()->IsEnabled() );
 451
 452     FmXDataCell* pDataCell = dynamic_cast<FmXDataCell*>( m_pCell.get() );
 453     if (pDataCell)
 454     {
 455         if (!pRow || !pRow->IsValid())
 456         {
 457             DrawTextFlags nStyle = DrawTextFlags::Clip | DrawTextFlags::Center;
 458             if ( !bEnabled )
 459                 nStyle |= DrawTextFlags::Disable;
 460
 461             rDev.DrawText(rRect, OUString(INVALIDTEXT), nStyle);
 462         }
 463         else if (m_bAutoValue && pRow->IsNew())
 464         {
 465             DrawTextFlags nStyle = DrawTextFlags::Clip | DrawTextFlags::VCenter;
 466             if ( !bEnabled )
 467                 nStyle |= DrawTextFlags::Disable;
 468
 469             switch (GetAlignment())
 470             {
 471                 case css::awt::TextAlign::RIGHT:
 472                     nStyle |= DrawTextFlags::Right;
 473                     break;
 474                 case css::awt::TextAlign::CENTER:
 475                     nStyle |= DrawTextFlags::Center;
 476                     break;
 477                 default:
 478                     nStyle |= DrawTextFlags::Left;
 479             }
 480
 481             rDev.DrawText(rRect, SvxResId(RID_STR_AUTOFIELD), nStyle);
 482         }
 483         else if (pRow->HasField(m_nFieldPos))
 484         {
 485             pDataCell->PaintFieldToCell(rDev, rRect, pRow->GetField( m_nFieldPos ).getColumn(), xFormatter);
 486         }
 487     }
 488     else if (!m_pCell.is())
 489     {
 490         if (!pRow || !pRow->IsValid())
 491         {
 492             DrawTextFlags nStyle = DrawTextFlags::Clip | DrawTextFlags::Center;
 493             if ( !bEnabled )
 494                 nStyle |= DrawTextFlags::Disable;
 495
 496             rDev.DrawText(rRect, OUString(INVALIDTEXT), nStyle);
 497         }
 498         else if (pRow->HasField(m_nFieldPos) && m_bObject)
 499         {
 500             DrawTextFlags nStyle = DrawTextFlags::Clip | DrawTextFlags::Center;
 501             if ( !bEnabled )
 502                 nStyle |= DrawTextFlags::Disable;
 503             rDev.DrawText(rRect, OUString(OBJECTTEXT), nStyle);
 504         }
 505     }
 506     else if ( auto pFilterCell = dynamic_cast<FmXFilterCell*>( m_pCell.get() ) )
 507         pFilterCell->PaintCell( rDev, rRect );
 508 }
 509
 510
 511 void DbGridColumn::ImplInitWindow( vcl::Window const & rParent, const InitWindowFacet _eInitWhat )
 512 {
 513     if ( m_pCell.is() )
 514         m_pCell->ImplInitWindow( rParent, _eInitWhat );
 515 }
 516
 517
 518 //= cell controls
 519
 520
 521 DbCellControl::DbCellControl( DbGridColumn& _rColumn )
 522     :OPropertyChangeListener(m_aMutex)
 523     ,m_bTransparent( false )
 524     ,m_bAlignedController( true )
 525     ,m_bAccessingValueProperty( false )
 526     ,m_rColumn( _rColumn )
 527     ,m_pPainter( nullptr )
 528     ,m_pWindow( nullptr )
 529 {
 530     Reference< XPropertySet > xColModelProps = _rColumn.getModel();
 531     if ( !xColModelProps.is() )
 532         return;
 533
 534     // if our model's format key changes we want to propagate the new value to our windows
 535     m_pModelChangeBroadcaster = new ::comphelper::OPropertyChangeMultiplexer(this, _rColumn.getModel());
 536
 537     // be listener for some common properties
 538     implDoPropertyListening( FM_PROP_READONLY, false );
 539     implDoPropertyListening( FM_PROP_ENABLED, false );
 540
 541     // add as listener for all known "value" properties
 542     implDoPropertyListening( FM_PROP_VALUE, false );
 543     implDoPropertyListening( FM_PROP_STATE, false );
 544     implDoPropertyListening( FM_PROP_TEXT, false );
 545     implDoPropertyListening( FM_PROP_EFFECTIVE_VALUE, false );
 546     implDoPropertyListening( FM_PROP_SELECT_SEQ, false );
 547     implDoPropertyListening( FM_PROP_DATE, false );
 548     implDoPropertyListening( FM_PROP_TIME, false );
 549
 550     // be listener at the bound field as well
 551     try
 552     {
 553         Reference< XPropertySetInfo > xPSI( xColModelProps->getPropertySetInfo(), UNO_SET_THROW );
 554         if ( xPSI->hasPropertyByName( FM_PROP_BOUNDFIELD ) )
 555         {
 556             Reference< XPropertySet > xField;
 557             xColModelProps->getPropertyValue( FM_PROP_BOUNDFIELD ) >>= xField;
 558             if ( xField.is() )
 559             {
 560                 m_pFieldChangeBroadcaster = new ::comphelper::OPropertyChangeMultiplexer(this, xField);
 561                 m_pFieldChangeBroadcaster->addProperty( FM_PROP_ISREADONLY );
 562             }
 563         }
 564     }
 565     catch( const Exception& )
 566     {
 567         TOOLS_WARN_EXCEPTION( "svx", "DbCellControl::doPropertyListening" );
 568     }
 569 }
 570
 571
 572 void DbCellControl::implDoPropertyListening(const OUString& _rPropertyName, bool _bWarnIfNotExistent)
 573 {
 574     try
 575     {
 576         Reference< XPropertySet > xColModelProps = m_rColumn.getModel();
 577         Reference< XPropertySetInfo > xPSI;
 578         if ( xColModelProps.is() )
 579             xPSI = xColModelProps->getPropertySetInfo();
 580
 581         DBG_ASSERT( !_bWarnIfNotExistent || ( xPSI.is() && xPSI->hasPropertyByName( _rPropertyName ) ),
 582             "DbCellControl::doPropertyListening: no property set info or non-existent property!" );
 583
 584         if ( xPSI.is() && xPSI->hasPropertyByName( _rPropertyName ) )
 585             m_pModelChangeBroadcaster->addProperty( _rPropertyName );
 586     }
 587     catch( const Exception& )
 588     {
 589         TOOLS_WARN_EXCEPTION( "svx", "DbCellControl::doPropertyListening" );
 590     }
 591 }
 592
 593
 594 void DbCellControl::doPropertyListening(const OUString& _rPropertyName)
 595 {
 596     implDoPropertyListening( _rPropertyName, true );
 597 }
 598
 599 static void lcl_clearBroadCaster(rtl::Reference<::comphelper::OPropertyChangeMultiplexer>& _pBroadcaster)
 600 {
 601     if ( _pBroadcaster.is() )
 602     {
 603         _pBroadcaster->dispose();
 604         _pBroadcaster.clear();
 605         // no delete, this is done implicitly
 606     }
 607 }
 608
 609 DbCellControl::~DbCellControl()
 610 {
 611     lcl_clearBroadCaster(m_pModelChangeBroadcaster);
 612     lcl_clearBroadCaster(m_pFieldChangeBroadcaster);
 613
 614     m_pWindow.disposeAndClear();
 615     m_pPainter.disposeAndClear();
 616 }
 617
 618 void DbCellControl::implValuePropertyChanged( )
 619 {
 620     OSL_ENSURE( !isValuePropertyLocked(),
 621         "DbCellControl::implValuePropertyChanged: not to be called with the value property locked!" );
 622
 623     if ( m_pWindow )
 624     {
 625         if ( m_rColumn.getModel().is() )
 626             updateFromModel( m_rColumn.getModel() );
 627     }
 628 }
 629
 630
 631 void DbCellControl::implAdjustGenericFieldSetting( const Reference< XPropertySet >& /*_rxModel*/ )
 632 {
 633     // nothing to do here
 634 }
 635
 636
 637 void DbCellControl::_propertyChanged(const PropertyChangeEvent& _rEvent)
 638 {
 639     SolarMutexGuard aGuard;
 640
 641     Reference< XPropertySet > xSourceProps( _rEvent.Source, UNO_QUERY );
 642
 643     if  (   _rEvent.PropertyName == FM_PROP_VALUE
 644         ||  _rEvent.PropertyName == FM_PROP_STATE
 645         ||  _rEvent.PropertyName == FM_PROP_TEXT
 646         ||  _rEvent.PropertyName == FM_PROP_EFFECTIVE_VALUE
 647         ||  _rEvent.PropertyName == FM_PROP_SELECT_SEQ
 648         ||  _rEvent.PropertyName == FM_PROP_DATE
 649         ||  _rEvent.PropertyName == FM_PROP_TIME
 650         )
 651     {   // it was one of the known "value" properties
 652         if ( !isValuePropertyLocked() )
 653         {
 654             implValuePropertyChanged( );
 655         }
 656     }
 657     else if ( _rEvent.PropertyName == FM_PROP_READONLY )
 658     {
 659         implAdjustReadOnly( xSourceProps, true);
 660     }
 661     else if ( _rEvent.PropertyName == FM_PROP_ISREADONLY )
 662     {
 663         bool bReadOnly = true;
 664         _rEvent.NewValue >>= bReadOnly;
 665         m_rColumn.SetReadOnly(bReadOnly);
 666         implAdjustReadOnly( xSourceProps, false);
 667     }
 668     else if ( _rEvent.PropertyName == FM_PROP_ENABLED )
 669     {
 670         implAdjustEnabled( xSourceProps );
 671     }
 672     else
 673         implAdjustGenericFieldSetting( xSourceProps );
 674 }
 675
 676 bool DbCellControl::Commit()
 677 {
 678     // lock the listening for value property changes
 679     lockValueProperty();
 680     // commit the content of the control into the model's value property
 681     bool bReturn = false;
 682     try
 683     {
 684         bReturn = commitControl();
 685     }
 686     catch( const Exception& )
 687     {
 688         DBG_UNHANDLED_EXCEPTION("svx");
 689     }
 690     // unlock the listening for value property changes
 691     unlockValueProperty();
 692     // outta here
 693     return bReturn;
 694 }
 695
 696 void DbCellControl::ImplInitWindow( vcl::Window const & rParent, const InitWindowFacet _eInitWhat )
 697 {
 698     svt::ControlBase* pWindows[] = { m_pPainter, m_pWindow };
 699
 700     if (_eInitWhat & InitWindowFacet::WritingMode)
 701     {
 702         for (svt::ControlBase* pWindow : pWindows)
 703         {
 704             if (pWindow)
 705                 pWindow->EnableRTL(rParent.IsRTLEnabled());
 706         }
 707     }
 708
 709     if (_eInitWhat & InitWindowFacet::Font)
 710     {
 711         const StyleSettings& rStyleSettings = Application::GetSettings().GetStyleSettings();
 712         const Fraction& rZoom = rParent.GetZoom();
 713
 714         for (svt::ControlBase* pWindow : pWindows)
 715         {
 716             if (!pWindow)
 717                 continue;
 718
 719             vcl::Font aFont = rStyleSettings.GetFieldFont();
 720             aFont.SetTransparent(isTransparent());
 721
 722             if (rParent.IsControlFont())
 723                 aFont.Merge(rParent.GetControlFont());
 724
 725             if (rZoom.GetNumerator() != rZoom.GetDenominator())
 726             {
 727                 Size aSize = aFont.GetFontSize();
 728                 aSize.setWidth(std::round(double(aSize.Width() * rZoom)));
 729                 aSize.setHeight(std::round(double(aSize.Height() * rZoom)));
 730                 aFont.SetFontSize(aSize);
 731             }
 732
 733             pWindow->SetPointFont(aFont);
 734         }
 735     }
 736
 737     if ((_eInitWhat & InitWindowFacet::Font) || (_eInitWhat & InitWindowFacet::Foreground))
 738     {
 739         Color aTextColor(rParent.IsControlForeground() ? rParent.GetControlForeground() : rParent.GetTextColor());
 740
 741         bool bTextLineColor = rParent.IsTextLineColor();
 742         Color aTextLineColor(rParent.GetTextLineColor());
 743
 744         for (svt::ControlBase* pWindow : pWindows)
 745         {
 746             if (pWindow)
 747             {
 748                 pWindow->SetTextColor(aTextColor);
 749                 if (rParent.IsControlForeground())
 750                     pWindow->SetControlForeground(aTextColor);
 751
 752                 if (bTextLineColor)
 753                     pWindow->SetTextLineColor();
 754                 else
 755                     pWindow->SetTextLineColor(aTextLineColor);
 756             }
 757         }
 758     }
 759
 760     if (!(_eInitWhat & InitWindowFacet::Background))
 761         return;
 762
 763     if (rParent.IsControlBackground())
 764     {
 765         Color aColor(rParent.GetControlBackground());
 766         for (svt::ControlBase* pWindow : pWindows)
 767         {
 768             if (pWindow)
 769             {
 770                 if (isTransparent())
 771                     pWindow->SetBackground();
 772                 else
 773                 {
 774                     pWindow->SetBackground(aColor);
 775                     pWindow->SetControlBackground(aColor);
 776                 }
 777                 pWindow->GetOutDev()->SetFillColor(aColor);
 778             }
 779         }
 780     }
 781     else
 782     {
 783         if (m_pPainter)
 784         {
 785             if (isTransparent())
 786                 m_pPainter->SetBackground();
 787             else
 788                 m_pPainter->SetBackground(rParent.GetBackground());
 789             m_pPainter->GetOutDev()->SetFillColor(rParent.GetOutDev()->GetFillColor());
 790         }
 791
 792         if (m_pWindow)
 793         {
 794             if (isTransparent())
 795                 m_pWindow->SetBackground(rParent.GetBackground());
 796             else
 797                 m_pWindow->GetOutDev()->SetFillColor(rParent.GetOutDev()->GetFillColor());
 798         }
 799     }
 800 }
 801
 802 void DbCellControl::implAdjustReadOnly( const Reference< XPropertySet >& _rxModel,bool i_bReadOnly )
 803 {
 804     DBG_ASSERT( m_pWindow, "DbCellControl::implAdjustReadOnly: not to be called without window!" );
 805     DBG_ASSERT( _rxModel.is(), "DbCellControl::implAdjustReadOnly: invalid model!" );
 806     if ( !(m_pWindow && _rxModel.is()) )
 807         return;
 808
 809     bool bReadOnly = m_rColumn.IsReadOnly();
 810     if ( !bReadOnly )
 811     {
 812         _rxModel->getPropertyValue( i_bReadOnly ? OUString(FM_PROP_READONLY) : OUString(FM_PROP_ISREADONLY)) >>= bReadOnly;
 813     }
 814     m_pWindow->SetEditableReadOnly(bReadOnly);
 815 }
 816
 817 void DbCellControl::implAdjustEnabled( const Reference< XPropertySet >& _rxModel )
 818 {
 819     DBG_ASSERT( m_pWindow, "DbCellControl::implAdjustEnabled: not to be called without window!" );
 820     DBG_ASSERT( _rxModel.is(), "DbCellControl::implAdjustEnabled: invalid model!" );
 821     if ( m_pWindow && _rxModel.is() )
 822     {
 823         bool bEnable = true;
 824         _rxModel->getPropertyValue( FM_PROP_ENABLED ) >>= bEnable;
 825         m_pWindow->Enable( bEnable );
 826     }
 827 }
 828
 829 void DbCellControl::Init(BrowserDataWin& rParent, const Reference< XRowSet >& _rxCursor)
 830 {
 831     ImplInitWindow( rParent, InitWindowFacet::All );
 832
 833     if ( m_pWindow )
 834     {
 835         // align the control
 836         if ( isAlignedController() )
 837             AlignControl( m_rColumn.GetAlignment() );
 838
 839         try
 840         {
 841             // some other common properties
 842             Reference< XPropertySet > xModel( m_rColumn.getModel(), UNO_SET_THROW );
 843             Reference< XPropertySetInfo > xModelPSI( xModel->getPropertySetInfo(), UNO_SET_THROW );
 844
 845             if ( xModelPSI->hasPropertyByName( FM_PROP_READONLY ) )
 846             {
 847                 implAdjustReadOnly( xModel,true );
 848             }
 849
 850             if ( xModelPSI->hasPropertyByName( FM_PROP_ENABLED ) )
 851             {
 852                 implAdjustEnabled( xModel );
 853             }
 854
 855             if ( xModelPSI->hasPropertyByName( FM_PROP_MOUSE_WHEEL_BEHAVIOR ) )
 856             {
 857                 sal_Int16 nWheelBehavior = css::awt::MouseWheelBehavior::SCROLL_FOCUS_ONLY;
 858                 OSL_VERIFY( xModel->getPropertyValue( FM_PROP_MOUSE_WHEEL_BEHAVIOR ) >>= nWheelBehavior );
 859                 MouseWheelBehaviour nVclSetting = MouseWheelBehaviour::FocusOnly;
 860                 switch ( nWheelBehavior )
 861                 {
 862                 case css::awt::MouseWheelBehavior::SCROLL_DISABLED:   nVclSetting = MouseWheelBehaviour::Disable; break;
 863                 case css::awt::MouseWheelBehavior::SCROLL_FOCUS_ONLY: nVclSetting = MouseWheelBehaviour::FocusOnly; break;
 864                 case css::awt::MouseWheelBehavior::SCROLL_ALWAYS:     nVclSetting = MouseWheelBehaviour::ALWAYS; break;
 865                 default:
 866                     OSL_FAIL( "DbCellControl::Init: invalid MouseWheelBehavior!" );
 867                     break;
 868                 }
 869
 870                 AllSettings aSettings = m_pWindow->GetSettings();
 871                 MouseSettings aMouseSettings = aSettings.GetMouseSettings();
 872                 aMouseSettings.SetWheelBehavior( nVclSetting );
 873                 aSettings.SetMouseSettings( aMouseSettings );
 874                 m_pWindow->SetSettings( aSettings, true );
 875             }
 876         }
 877         catch( const Exception& )
 878         {
 879             DBG_UNHANDLED_EXCEPTION("svx");
 880         }
 881     }
 882     m_xCursor = _rxCursor;
 883     if ( m_rColumn.getModel().is() )
 884         updateFromModel( m_rColumn.getModel() );
 885 }
 886
 887
 888 void DbCellControl::SetTextLineColor()
 889 {
 890     if (m_pWindow)
 891         m_pWindow->SetTextLineColor();
 892     if (m_pPainter)
 893         m_pPainter->SetTextLineColor();
 894 }
 895
 896
 897 void DbCellControl::SetTextLineColor(const Color& _rColor)
 898 {
 899     if (m_pWindow)
 900         m_pWindow->SetTextLineColor(_rColor);
 901     if (m_pPainter)
 902         m_pPainter->SetTextLineColor(_rColor);
 903 }
 904
 905 namespace
 906 {
 907     void lcl_implAlign( vcl::Window* _pWindow, WinBits _nAlignmentBit )
 908     {
 909         if (EditControlBase* pControl = dynamic_cast<EditControlBase*>(_pWindow))
 910         {
 911             switch (_nAlignmentBit)
 912             {
 913                 case WB_LEFT:
 914                     pControl->get_widget().set_alignment(TxtAlign::Left);
 915                     break;
 916                 case WB_CENTER:
 917                     pControl->get_widget().set_alignment(TxtAlign::Center);
 918                     break;
 919                 case WB_RIGHT:
 920                     pControl->get_widget().set_alignment(TxtAlign::Right);
 921                     break;
 922             }
 923             return;
 924         }
 925
 926         WinBits nStyle = _pWindow->GetStyle();
 927         nStyle &= ~(WB_LEFT | WB_RIGHT | WB_CENTER);
 928         _pWindow->SetStyle( nStyle | _nAlignmentBit );
 929     }
 930 }
 931
 932 void DbCellControl::AlignControl(sal_Int16 nAlignment)
 933 {
 934     WinBits nAlignmentBit = 0;
 935     switch (nAlignment)
 936     {
 937         case css::awt::TextAlign::RIGHT:
 938             nAlignmentBit = WB_RIGHT;
 939             break;
 940         case css::awt::TextAlign::CENTER:
 941             nAlignmentBit = WB_CENTER;
 942             break;
 943         default:
 944             nAlignmentBit = WB_LEFT;
 945             break;
 946     }
 947     lcl_implAlign( m_pWindow, nAlignmentBit );
 948     if ( m_pPainter )
 949         lcl_implAlign( m_pPainter, nAlignmentBit );
 950 }
 951
 952 void DbCellControl::PaintCell(OutputDevice& rDev, const tools::Rectangle& rRect)
 953 {
 954     m_pPainter->SetSizePixel(rRect.GetSize());
 955     m_pPainter->Draw(&rDev, rRect.TopLeft(), SystemTextColorFlags::NONE);
 956 }
 957
 958 void DbCellControl::PaintFieldToCell( OutputDevice& _rDev, const tools::Rectangle& _rRect, const Reference< XColumn >& _rxField, const Reference< XNumberFormatter >& _rxFormatter )
 959 {
 960     m_pPainter->SetText( GetFormatText( _rxField, _rxFormatter ) );
 961     PaintCell( _rDev, _rRect );
 962 }
 963
 964 double DbCellControl::GetValue(const Reference< css::sdb::XColumn >& _rxField, const Reference< XNumberFormatter >& xFormatter) const
 965 {
 966     double fValue = 0;
 967     if (m_rColumn.IsNumeric())
 968     {
 969         try
 970         {
 971             fValue = _rxField->getDouble();
 972         }
 973         catch(const Exception&) { }
 974     }
 975     else
 976     {
 977         bool bSuccess = false;
 978         try
 979         {
 980             fValue = _rxField->getDouble();
 981             bSuccess = true;
 982         }
 983         catch(const Exception&) { }
 984         if (!bSuccess)
 985         {
 986             try
 987             {
 988                 fValue = xFormatter->convertStringToNumber(m_rColumn.GetKey(), _rxField->getString());
 989             }
 990             catch(const Exception&) { }
 991         }
 992     }
 993     return fValue;
 994 }
 995
 996 void DbCellControl::invalidatedController()
 997 {
 998     m_rColumn.GetParent().refreshController(m_rColumn.GetId(), DbGridControl::GrantControlAccess());
 999 }
1000
1001 // CellModels
1002
1003 DbLimitedLengthField::DbLimitedLengthField( DbGridColumn& _rColumn )
1004     :DbCellControl( _rColumn )
1005 {
1006     doPropertyListening( FM_PROP_MAXTEXTLEN );
1007 }
1008
1009
1010 void DbLimitedLengthField::implAdjustGenericFieldSetting( const Reference< XPropertySet >& _rxModel )
1011 {
1012     DBG_ASSERT( m_pWindow, "DbLimitedLengthField::implAdjustGenericFieldSetting: not to be called without window!" );
1013     DBG_ASSERT( _rxModel.is(), "DbLimitedLengthField::implAdjustGenericFieldSetting: invalid model!" );
1014     if ( m_pWindow && _rxModel.is() )
1015     {
1016         sal_Int16 nMaxLen = 0;
1017         _rxModel->getPropertyValue( FM_PROP_MAXTEXTLEN ) >>= nMaxLen;
1018         implSetMaxTextLen( nMaxLen );
1019     }
1020 }
1021
1022 void DbLimitedLengthField::implSetEffectiveMaxTextLen(sal_Int32 nMaxLen)
1023 {
1024     dynamic_cast<EditControlBase&>(*m_pWindow).get_widget().set_max_length(nMaxLen);
1025     if (m_pPainter)
1026         dynamic_cast<EditControlBase&>(*m_pPainter).get_widget().set_max_length(nMaxLen);
1027 }
1028
1029 DbTextField::DbTextField(DbGridColumn& _rColumn)
1030             :DbLimitedLengthField(_rColumn)
1031             ,m_bIsMultiLineEdit(false)
1032 {
1033 }
1034
1035 DbTextField::~DbTextField( )
1036 {
1037     m_pPainterImplementation.reset();
1038     m_pEdit.reset();
1039 }
1040
1041 void DbTextField::Init(BrowserDataWin& rParent, const Reference< XRowSet >& xCursor)
1042 {
1043     sal_Int16 nAlignment = m_rColumn.SetAlignmentFromModel(-1);
1044
1045     Reference< XPropertySet > xModel( m_rColumn.getModel() );
1046
1047     bool bLeftAlign = true;
1048
1049     // is this a multi-line field?
1050     bool bIsMultiLine = false;
1051     try
1052     {
1053         if ( xModel.is() )
1054         {
1055             OSL_VERIFY( xModel->getPropertyValue( FM_PROP_MULTILINE ) >>= bIsMultiLine );
1056         }
1057     }
1058     catch( const Exception& )
1059     {
1060         TOOLS_WARN_EXCEPTION("svx",
1061                              "caught an exception while determining the multi-line capabilities!");
1062     }
1063
1064     m_bIsMultiLineEdit = bIsMultiLine;
1065     if ( bIsMultiLine )
1066     {
1067         auto xEditControl = VclPtr<MultiLineTextCell>::Create(&rParent);
1068         auto xEditPainter = VclPtr<MultiLineTextCell>::Create(&rParent);
1069
1070         switch (nAlignment)
1071         {
1072             case awt::TextAlign::RIGHT:
1073                 xEditControl->get_widget().set_alignment(TxtAlign::Right);
1074                 xEditPainter->get_widget().set_alignment(TxtAlign::Right);
1075                 bLeftAlign = false;
1076                 break;
1077             case awt::TextAlign::CENTER:
1078                 xEditControl->get_widget().set_alignment(TxtAlign::Center);
1079                 xEditPainter->get_widget().set_alignment(TxtAlign::Center);
1080                 bLeftAlign = false;
1081                 break;
1082         }
1083
1084         m_pWindow = xEditControl;
1085         m_pEdit.reset(new MultiLineEditImplementation(*xEditControl));
1086
1087         m_pPainter = xEditPainter;
1088         m_pPainterImplementation.reset(new MultiLineEditImplementation(*xEditPainter));
1089     }
1090     else
1091     {
1092         auto xEditControl = VclPtr<EditControl>::Create(&rParent);
1093         auto xEditPainter = VclPtr<EditControl>::Create(&rParent);
1094
1095         switch (nAlignment)
1096         {
1097             case awt::TextAlign::RIGHT:
1098                 xEditControl->get_widget().set_alignment(TxtAlign::Right);
1099                 xEditPainter->get_widget().set_alignment(TxtAlign::Right);
1100                 bLeftAlign = false;
1101                 break;
1102             case awt::TextAlign::CENTER:
1103                 xEditControl->get_widget().set_alignment(TxtAlign::Center);
1104                 xEditPainter->get_widget().set_alignment(TxtAlign::Center);
1105                 bLeftAlign = false;
1106                 break;
1107         }
1108
1109         m_pWindow = xEditControl;
1110         m_pEdit.reset(new EntryImplementation(*xEditControl));
1111
1112         m_pPainter = xEditPainter;
1113         m_pPainterImplementation.reset(new EntryImplementation(*xEditPainter));
1114     }
1115
1116     if (bLeftAlign)
1117     {
1118         // this is so that when getting the focus, the selection is oriented left-to-right
1119         AllSettings aSettings = m_pWindow->GetSettings();
1120         StyleSettings aStyleSettings = aSettings.GetStyleSettings();
1121         aStyleSettings.SetSelectionOptions(
1122             aStyleSettings.GetSelectionOptions() | SelectionOptions::ShowFirst);
1123         aSettings.SetStyleSettings(aStyleSettings);
1124         m_pWindow->SetSettings(aSettings);
1125     }
1126
1127     implAdjustGenericFieldSetting( xModel );
1128
1129     DbLimitedLengthField::Init( rParent, xCursor );
1130 }
1131
1132 CellControllerRef DbTextField::CreateController() const
1133 {
1134     return new EditCellController( m_pEdit.get() );
1135 }
1136
1137 void DbTextField::PaintFieldToCell( OutputDevice& _rDev, const tools::Rectangle& _rRect, const Reference< XColumn >& _rxField, const Reference< XNumberFormatter >& _rxFormatter )
1138 {
1139     if ( m_pPainterImplementation )
1140         m_pPainterImplementation->SetText( GetFormatText( _rxField, _rxFormatter ) );
1141
1142     DbLimitedLengthField::PaintFieldToCell( _rDev, _rRect, _rxField, _rxFormatter );
1143 }
1144
1145 OUString DbTextField::GetFormatText(const Reference< XColumn >& _rxField, const Reference< XNumberFormatter >& xFormatter, const Color** /*ppColor*/)
1146 {
1147     if (!_rxField.is())
1148         return OUString();
1149
1150     const css::uno::Reference<css::beans::XPropertySet> xPS(_rxField, UNO_QUERY);
1151     FormattedColumnValue fmter( xFormatter, xPS );
1152
1153     try
1154     {
1155         return fmter.getFormattedValue();
1156     }
1157     catch( const Exception& )
1158     {
1159         DBG_UNHANDLED_EXCEPTION("svx");
1160     }
1161     return OUString();
1162
1163 }
1164
1165 void DbTextField::UpdateFromField(const Reference< css::sdb::XColumn >& _rxField, const Reference< XNumberFormatter >& xFormatter)
1166 {
1167     m_pEdit->SetText( GetFormatText( _rxField, xFormatter ) );
1168     m_pEdit->SetSelection( Selection( SELECTION_MAX, SELECTION_MIN ) );
1169 }
1170
1171 void DbTextField::updateFromModel( Reference< XPropertySet > _rxModel )
1172 {
1173     OSL_ENSURE( _rxModel.is() && m_pWindow, "DbTextField::updateFromModel: invalid call!" );
1174
1175     OUString sText;
1176     _rxModel->getPropertyValue( FM_PROP_TEXT ) >>= sText;
1177
1178     sal_Int32 nMaxTextLen = m_pEdit->GetMaxTextLen();
1179     if (nMaxTextLen > 0 && sText.getLength() > nMaxTextLen)
1180     {
1181         sal_Int32 nDiff = sText.getLength() - nMaxTextLen;
1182         sText = sText.replaceAt(sText.getLength() - nDiff,nDiff, u"");
1183     }
1184
1185     m_pEdit->SetText( sText );
1186     m_pEdit->SetSelection( Selection( SELECTION_MAX, SELECTION_MIN ) );
1187 }
1188
1189 bool DbTextField::commitControl()
1190 {
1191     OUString aText( m_pEdit->GetText( getModelLineEndSetting( m_rColumn.getModel() ) ) );
1192     // we have to check if the length before we can decide if the value was modified
1193     sal_Int32 nMaxTextLen = m_pEdit->GetMaxTextLen();
1194     if (nMaxTextLen > 0)
1195     {
1196         OUString sOldValue;
1197         m_rColumn.getModel()->getPropertyValue( FM_PROP_TEXT ) >>= sOldValue;
1198         // if the new value didn't change we must set the old long value again
1199         if ( sOldValue.getLength() > nMaxTextLen && sOldValue.compareTo(aText,nMaxTextLen) == 0 )
1200             aText = sOldValue;
1201     }
1202     m_rColumn.getModel()->setPropertyValue( FM_PROP_TEXT, Any( aText ) );
1203     return true;
1204 }
1205
1206 void DbTextField::implSetEffectiveMaxTextLen( sal_Int32 _nMaxLen )
1207 {
1208     if ( m_pEdit )
1209         m_pEdit->SetMaxTextLen( _nMaxLen );
1210     if ( m_pPainterImplementation )
1211         m_pPainterImplementation->SetMaxTextLen( _nMaxLen );
1212 }
1213
1214 DbFormattedField::DbFormattedField(DbGridColumn& _rColumn)
1215     :DbLimitedLengthField(_rColumn)
1216 {
1217     // if our model's format key changes we want to propagate the new value to our windows
1218     doPropertyListening( FM_PROP_FORMATKEY );
1219 }
1220
1221 DbFormattedField::~DbFormattedField()
1222 {
1223 }
1224
1225 void DbFormattedField::Init( BrowserDataWin& rParent, const Reference< XRowSet >& xCursor)
1226 {
1227     sal_Int16 nAlignment = m_rColumn.SetAlignmentFromModel(-1);
1228
1229     Reference< css::beans::XPropertySet >  xUnoModel = m_rColumn.getModel();
1230
1231     auto xEditControl = VclPtr<FormattedControl>::Create(&rParent, false);
1232     auto xEditPainter = VclPtr<FormattedControl>::Create(&rParent, false);
1233
1234     weld::EntryFormatter& rControlFormatter = xEditControl->get_formatter();
1235     weld::EntryFormatter& rPainterFormatter = xEditPainter->get_formatter();
1236
1237     m_pWindow = xEditControl.get();
1238     m_pPainter = xEditPainter.get();
1239
1240     switch (nAlignment)
1241     {
1242         case awt::TextAlign::RIGHT:
1243             xEditControl->get_widget().set_alignment(TxtAlign::Right);
1244             xEditPainter->get_widget().set_alignment(TxtAlign::Right);
1245             break;
1246         case awt::TextAlign::CENTER:
1247             xEditControl->get_widget().set_alignment(TxtAlign::Center);
1248             xEditPainter->get_widget().set_alignment(TxtAlign::Center);
1249             break;
1250         default:
1251         {
1252             // Everything just so that the selection goes from right to left when getting focus
1253             SelectionOptions eOptions = rControlFormatter.GetEntrySelectionOptions();
1254             rControlFormatter.SetEntrySelectionOptions(eOptions | SelectionOptions::ShowFirst);
1255             break;
1256         }
1257     }
1258
1259     implAdjustGenericFieldSetting( xUnoModel );
1260
1261     rControlFormatter.SetStrictFormat(false);
1262     rPainterFormatter.SetStrictFormat(false);
1263         // if one allows any formatting, one cannot make an entry check anyway
1264         // (the FormattedField does not support that anyway, only derived classes)
1265
1266     // get the formatter from the uno model
1267     // (I could theoretically also go via the css::util::NumberFormatter, which the cursor would
1268     // surely give me. The problem is that I can not really rely on the fact that the two
1269     // formatters are the same. Clean is the whole thing if I go via the UNO model.)
1270     sal_Int32 nFormatKey = -1;
1271
1272     // let's see if the model has one ...
1273     DBG_ASSERT(::comphelper::hasProperty(FM_PROP_FORMATSSUPPLIER, xUnoModel), "DbFormattedField::Init : invalid UNO model !");
1274     Any aSupplier( xUnoModel->getPropertyValue(FM_PROP_FORMATSSUPPLIER));
1275     if (aSupplier.hasValue())
1276     {
1277         m_xSupplier.set(aSupplier, css::uno::UNO_QUERY);
1278         if (m_xSupplier.is())
1279         {
1280             // if we take the supplier from the model, then also the key
1281             Any aFmtKey( xUnoModel->getPropertyValue(FM_PROP_FORMATKEY));
1282             if (aFmtKey.hasValue())
1283             {
1284                 DBG_ASSERT(aFmtKey.getValueType().getTypeClass() == TypeClass_LONG, "DbFormattedField::Init : invalid format key property (no sal_Int32) !");
1285                 nFormatKey = ::comphelper::getINT32(aFmtKey);
1286             }
1287             else
1288             {
1289                 SAL_INFO("svx.fmcomp", "DbFormattedField::Init : my uno-model has no format-key, but a formats supplier !");
1290                 // the OFormattedModel which we usually are working with ensures that the model has a format key
1291                 // as soon as the form is loaded. Unfortunally this method here is called from within loaded, too.
1292                 // So if our LoadListener is called before the LoadListener of the model, this "else case" is
1293                 // allowed.
1294                 // Of course our property listener for the FormatKey property will notify us if the prop is changed,
1295                 // so this here isn't really bad...
1296                 nFormatKey = 0;
1297             }
1298         }
1299     }
1300
1301     // No? Maybe the css::form::component::Form behind the cursor?
1302     if (!m_xSupplier.is())
1303     {
1304         if (xCursor.is())
1305         {   // If we take the formatter from the cursor, then also the key from the field to which we are bound
1306             m_xSupplier = getNumberFormats(getConnection(xCursor));
1307
1308             if (m_rColumn.GetField().is())
1309                 nFormatKey = ::comphelper::getINT32(m_rColumn.GetField()->getPropertyValue(FM_PROP_FORMATKEY));
1310         }
1311     }
1312
1313     SvNumberFormatter* pFormatterUsed = nullptr;
1314     if (m_xSupplier.is())
1315     {
1316         SvNumberFormatsSupplierObj* pImplementation = comphelper::getFromUnoTunnel<SvNumberFormatsSupplierObj>(m_xSupplier);
1317         if (pImplementation)
1318             pFormatterUsed = pImplementation->GetNumberFormatter();
1319         else
1320             // Everything is invalid: the supplier is of the wrong type, then we can not
1321             // rely on a standard formatter to know the (possibly non-standard) key.
1322             nFormatKey = -1;
1323     }
1324
1325     // a standard formatter ...
1326     if (pFormatterUsed == nullptr)
1327     {
1328         pFormatterUsed = rControlFormatter.StandardFormatter();
1329         DBG_ASSERT(pFormatterUsed != nullptr, "DbFormattedField::Init : no standard formatter given by the numeric field !");
1330     }
1331     // ... and a standard key
1332     if (nFormatKey == -1)
1333         nFormatKey = 0;
1334
1335     rControlFormatter.SetFormatter(pFormatterUsed);
1336     rPainterFormatter.SetFormatter(pFormatterUsed);
1337
1338     rControlFormatter.SetFormatKey(nFormatKey);
1339     rPainterFormatter.SetFormatKey(nFormatKey);
1340
1341     rControlFormatter.TreatAsNumber(m_rColumn.IsNumeric());
1342     rPainterFormatter.TreatAsNumber(m_rColumn.IsNumeric());
1343
1344     // min and max values
1345     if (m_rColumn.IsNumeric())
1346     {
1347         bool bClearMin = true;
1348         if (::comphelper::hasProperty(FM_PROP_EFFECTIVE_MIN, xUnoModel))
1349         {
1350             Any aMin( xUnoModel->getPropertyValue(FM_PROP_EFFECTIVE_MIN));
1351             if (aMin.getValueType().getTypeClass() != TypeClass_VOID)
1352             {
1353                 DBG_ASSERT(aMin.getValueType().getTypeClass() == TypeClass_DOUBLE, "DbFormattedField::Init : the model has an invalid min value !");
1354                 double dMin = ::comphelper::getDouble(aMin);
1355                 rControlFormatter.SetMinValue(dMin);
1356                 rPainterFormatter.SetMinValue(dMin);
1357                 bClearMin = false;
1358             }
1359         }
1360         if (bClearMin)
1361         {
1362             rControlFormatter.ClearMinValue();
1363             rPainterFormatter.ClearMinValue();
1364         }
1365         bool bClearMax = true;
1366         if (::comphelper::hasProperty(FM_PROP_EFFECTIVE_MAX, xUnoModel))
1367         {
1368             Any aMax(xUnoModel->getPropertyValue(FM_PROP_EFFECTIVE_MAX));
1369             if (aMax.getValueType().getTypeClass() != TypeClass_VOID)
1370             {
1371                 DBG_ASSERT(aMax.getValueType().getTypeClass() == TypeClass_DOUBLE, "DbFormattedField::Init : the model has an invalid max value !");
1372                 double dMax = ::comphelper::getDouble(aMax);
1373                 rControlFormatter.SetMaxValue(dMax);
1374                 rPainterFormatter.SetMaxValue(dMax);
1375                 bClearMax = false;
1376             }
1377         }
1378         if (bClearMax)
1379         {
1380             rControlFormatter.ClearMaxValue();
1381             rPainterFormatter.ClearMaxValue();
1382         }
1383     }
1384
1385     // the default value
1386     Any aDefault( xUnoModel->getPropertyValue(FM_PROP_EFFECTIVE_DEFAULT));
1387     if (aDefault.hasValue())
1388     {   // the thing can be a double or a string
1389         switch (aDefault.getValueType().getTypeClass())
1390         {
1391             case TypeClass_DOUBLE:
1392                 if (m_rColumn.IsNumeric())
1393                 {
1394                     rControlFormatter.SetDefaultValue(::comphelper::getDouble(aDefault));
1395                     rPainterFormatter.SetDefaultValue(::comphelper::getDouble(aDefault));
1396                 }
1397                 else
1398                 {
1399                     OUString sConverted;
1400                     const Color* pDummy;
1401                     pFormatterUsed->GetOutputString(::comphelper::getDouble(aDefault), 0, sConverted, &pDummy);
1402                     rControlFormatter.SetDefaultText(sConverted);
1403                     rPainterFormatter.SetDefaultText(sConverted);
1404                 }
1405                 break;
1406             case TypeClass_STRING:
1407             {
1408                 OUString sDefault( ::comphelper::getString(aDefault) );
1409                 if (m_rColumn.IsNumeric())
1410                 {
1411                     double dVal;
1412                     sal_uInt32 nTestFormat(0);
1413                     if (pFormatterUsed->IsNumberFormat(sDefault, nTestFormat, dVal))
1414                     {
1415                         rControlFormatter.SetDefaultValue(dVal);
1416                         rPainterFormatter.SetDefaultValue(dVal);
1417                     }
1418                 }
1419                 else
1420                 {
1421                     rControlFormatter.SetDefaultText(sDefault);
1422                     rPainterFormatter.SetDefaultText(sDefault);
1423                 }
1424             }
1425             break;
1426             default:
1427                 OSL_FAIL( "DbFormattedField::Init: unexpected value type!" );
1428                 break;
1429         }
1430     }
1431     DbLimitedLengthField::Init( rParent, xCursor );
1432 }
1433
1434 CellControllerRef DbFormattedField::CreateController() const
1435 {
1436     return new ::svt::FormattedFieldCellController(static_cast<FormattedControlBase*>(m_pWindow.get()));
1437 }
1438
1439 void DbFormattedField::_propertyChanged( const PropertyChangeEvent& _rEvent )
1440 {
1441     if (_rEvent.PropertyName == FM_PROP_FORMATKEY )
1442     {
1443         sal_Int32 nNewKey = _rEvent.NewValue.hasValue() ? ::comphelper::getINT32(_rEvent.NewValue) : 0;
1444
1445         DBG_ASSERT(m_pWindow && m_pPainter, "DbFormattedField::_propertyChanged : where are my windows ?");
1446         if (m_pWindow)
1447             static_cast<FormattedControlBase*>(m_pWindow.get())->get_formatter().SetFormatKey(nNewKey);
1448         if (m_pPainter)
1449             static_cast<FormattedControlBase*>(m_pPainter.get())->get_formatter().SetFormatKey(nNewKey);
1450     }
1451     else
1452     {
1453         DbLimitedLengthField::_propertyChanged( _rEvent );
1454     }
1455 }
1456
1457 OUString DbFormattedField::GetFormatText(const Reference< css::sdb::XColumn >& _rxField, const Reference< XNumberFormatter >& /*xFormatter*/, const Color** ppColor)
1458 {
1459     // no color specification by default
1460     if (ppColor != nullptr)
1461         *ppColor = nullptr;
1462
1463     // NULL value -> empty text
1464     if (!_rxField.is())
1465         return OUString();
1466
1467     FormattedControlBase* pControl = static_cast<FormattedControlBase*>(m_pPainter.get());
1468     weld::EntryFormatter& rPainterFormatter = pControl->get_formatter();
1469
1470     OUString aText;
1471     try
1472     {
1473         if (m_rColumn.IsNumeric())
1474         {
1475             // The IsNumeric at the column says nothing about the class of the used format, but
1476             // about the class of the field bound to the column. So when you bind a FormattedField
1477             // column to a double field and format it as text, m_rColumn.IsNumeric() returns
1478             // sal_True. So that simply means that I can query the contents of the variant using
1479             // getDouble, and then I can leave the rest (the formatting) to the FormattedField.
1480             double dValue = getValue( _rxField, m_rColumn.GetParent().getNullDate() );
1481             if (_rxField->wasNull())
1482                 return aText;
1483             rPainterFormatter.SetValue(dValue);
1484         }
1485         else
1486         {
1487             // Here I can not work with a double, since the field can not provide it to me.
1488             // So simply bind the text from the css::util::NumberFormatter to the correct css::form::component::Form.
1489             aText = _rxField->getString();
1490             if (_rxField->wasNull())
1491                 return aText;
1492             rPainterFormatter.SetTextFormatted(aText);
1493         }
1494     }
1495     catch( const Exception& )
1496     {
1497         DBG_UNHANDLED_EXCEPTION("svx");
1498     }
1499
1500     aText = pControl->get_widget().get_text();
1501     if (ppColor != nullptr)
1502         *ppColor = rPainterFormatter.GetLastOutputColor();
1503
1504     return aText;
1505 }
1506
1507 void DbFormattedField::UpdateFromField(const Reference< css::sdb::XColumn >& _rxField, const Reference< XNumberFormatter >& /*xFormatter*/)
1508 {
1509     try
1510     {
1511         FormattedControlBase* pEditControl = static_cast<FormattedControlBase*>(m_pWindow.get());
1512         weld::Entry& rEntry = pEditControl->get_widget();
1513         weld::EntryFormatter& rEditFormatter = pEditControl->get_formatter();
1514
1515         if (!_rxField.is())
1516         {
1517             // NULL value -> empty text
1518             rEntry.set_text(OUString());
1519         }
1520         else if (m_rColumn.IsNumeric())
1521         {
1522             // The IsNumeric at the column says nothing about the class of the used format, but
1523             // about the class of the field bound to the column. So when you bind a FormattedField
1524             // column to a double field and format it as text, m_rColumn.IsNumeric() returns
1525             // sal_True. So that simply means that I can query the contents of the variant using
1526             // getDouble, and then I can leave the rest (the formatting) to the FormattedField.
1527             double dValue = getValue( _rxField, m_rColumn.GetParent().getNullDate() );
1528             if (_rxField->wasNull())
1529                 rEntry.set_text(OUString());
1530             else
1531                 rEditFormatter.SetValue(dValue);
1532         }
1533         else
1534         {
1535             // Here I can not work with a double, since the field can not provide it to me.
1536             // So simply bind the text from the css::util::NumberFormatter to the correct css::form::component::Form.
1537             OUString sText( _rxField->getString());
1538
1539             rEditFormatter.SetTextFormatted( sText );
1540             rEntry.select_region(0, -1);
1541         }
1542     }
1543     catch( const Exception& )
1544     {
1545         DBG_UNHANDLED_EXCEPTION("svx");
1546     }
1547 }
1548
1549 void DbFormattedField::updateFromModel( Reference< XPropertySet > _rxModel )
1550 {
1551     OSL_ENSURE( _rxModel.is() && m_pWindow, "DbFormattedField::updateFromModel: invalid call!" );
1552
1553     FormattedControlBase* pEditControl = static_cast<FormattedControlBase*>(m_pWindow.get());
1554     weld::Entry& rEntry = pEditControl->get_widget();
1555     weld::EntryFormatter& rEditFormatter = pEditControl->get_formatter();
1556
1557     OUString sText;
1558     Any aValue = _rxModel->getPropertyValue( FM_PROP_EFFECTIVE_VALUE );
1559     if ( !aValue.hasValue() || (aValue >>= sText) )
1560     {
1561         // our effective value is transferred as string
1562         rEditFormatter.SetTextFormatted( sText );
1563         rEntry.select_region(0, -1);
1564     }
1565     else
1566     {
1567         double dValue = 0;
1568         aValue >>= dValue;
1569         rEditFormatter.SetValue(dValue);
1570     }
1571 }
1572
1573 bool DbFormattedField::commitControl()
1574 {
1575     Any aNewVal;
1576
1577     FormattedControlBase* pEditControl = static_cast<FormattedControlBase*>(m_pWindow.get());
1578     weld::Entry& rEntry = pEditControl->get_widget();
1579     weld::EntryFormatter& rEditFormatter = pEditControl->get_formatter();
1580
1581     if (m_rColumn.IsNumeric())
1582     {
1583         if (!rEntry.get_text().isEmpty())
1584             aNewVal <<= rEditFormatter.GetValue();
1585         // an empty string is passed on as void by default, to start with
1586     }
1587     else
1588         aNewVal <<= rEditFormatter.GetTextValue();
1589
1590     m_rColumn.getModel()->setPropertyValue(FM_PROP_EFFECTIVE_VALUE, aNewVal);
1591     return true;
1592 }
1593
1594 DbCheckBox::DbCheckBox( DbGridColumn& _rColumn )
1595     :DbCellControl( _rColumn )
1596 {
1597     setAlignedController( false );
1598 }
1599
1600 namespace
1601 {
1602     void setCheckBoxStyle( vcl::Window* _pWindow, bool bMono )
1603     {
1604         AllSettings aSettings = _pWindow->GetSettings();
1605         StyleSettings aStyleSettings = aSettings.GetStyleSettings();
1606         if( bMono )
1607             aStyleSettings.SetOptions( aStyleSettings.GetOptions() | StyleSettingsOptions::Mono );
1608         else
1609             aStyleSettings.SetOptions( aStyleSettings.GetOptions() & (~StyleSettingsOptions::Mono) );
1610         aSettings.SetStyleSettings( aStyleSettings );
1611         _pWindow->SetSettings( aSettings );
1612     }
1613 }
1614
1615 void DbCheckBox::Init(BrowserDataWin& rParent, const Reference< XRowSet >& xCursor)
1616 {
1617     setTransparent( true );
1618
1619     m_pWindow  = VclPtr<CheckBoxControl>::Create( &rParent );
1620     m_pPainter = VclPtr<CheckBoxControl>::Create( &rParent );
1621
1622     m_pWindow->SetPaintTransparent( true );
1623     m_pPainter->SetPaintTransparent( true );
1624
1625     m_pPainter->SetBackground();
1626
1627     try
1628     {
1629         Reference< XPropertySet > xModel( m_rColumn.getModel(), UNO_SET_THROW );
1630
1631         sal_Int16 nStyle = awt::VisualEffect::LOOK3D;
1632         OSL_VERIFY( xModel->getPropertyValue( FM_PROP_VISUALEFFECT ) >>= nStyle );
1633
1634         setCheckBoxStyle( m_pWindow, nStyle == awt::VisualEffect::FLAT );
1635         setCheckBoxStyle( m_pPainter, nStyle == awt::VisualEffect::FLAT );
1636
1637         bool bTristate = true;
1638         OSL_VERIFY( xModel->getPropertyValue( FM_PROP_TRISTATE ) >>= bTristate );
1639         static_cast< CheckBoxControl* >( m_pWindow.get() )->EnableTriState( bTristate );
1640         static_cast< CheckBoxControl* >( m_pPainter.get() )->EnableTriState( bTristate );
1641     }
1642     catch( const Exception& )
1643     {
1644         DBG_UNHANDLED_EXCEPTION("svx");
1645     }
1646
1647     DbCellControl::Init( rParent, xCursor );
1648 }
1649
1650 CellControllerRef DbCheckBox::CreateController() const
1651 {
1652     return new CheckBoxCellController(static_cast<CheckBoxControl*>(m_pWindow.get()));
1653 }
1654
1655 static void lcl_setCheckBoxState(   const Reference< css::sdb::XColumn >& _rxField,
1656                         CheckBoxControl* _pCheckBoxControl )
1657 {
1658     TriState eState = TRISTATE_INDET;
1659     if (_rxField.is())
1660     {
1661         try
1662         {
1663             bool bValue = _rxField->getBoolean();
1664             if (!_rxField->wasNull())
1665                 eState = bValue ? TRISTATE_TRUE : TRISTATE_FALSE;
1666         }
1667         catch( const Exception& )
1668         {
1669             DBG_UNHANDLED_EXCEPTION("svx");
1670         }
1671     }
1672     _pCheckBoxControl->SetState(eState);
1673 }
1674
1675 void DbCheckBox::UpdateFromField(const Reference< css::sdb::XColumn >& _rxField, const Reference< XNumberFormatter >& /*xFormatter*/)
1676 {
1677     lcl_setCheckBoxState( _rxField, static_cast<CheckBoxControl*>(m_pWindow.get()) );
1678 }
1679
1680 void DbCheckBox::PaintFieldToCell(OutputDevice& rDev, const tools::Rectangle& rRect,
1681                           const Reference< css::sdb::XColumn >& _rxField,
1682                           const Reference< XNumberFormatter >& xFormatter)
1683 {
1684     CheckBoxControl* pControl = static_cast<CheckBoxControl*>(m_pPainter.get());
1685     lcl_setCheckBoxState( _rxField, pControl );
1686
1687     Size aBoxSize;
1688
1689     switch (rDev.GetOutDevType())
1690     {
1691         case OUTDEV_WINDOW:
1692         case OUTDEV_VIRDEV:
1693             aBoxSize = pControl->GetBox().get_preferred_size();
1694             break;
1695         case OUTDEV_PRINTER:
1696         case OUTDEV_PDF:
1697         {
1698             auto nSize = std::min(rRect.GetWidth(), rRect.GetHeight());
1699             aBoxSize = Size(nSize, nSize);
1700             break;
1701         }
1702     }
1703
1704     tools::Rectangle aRect(Point(rRect.Left() + ((rRect.GetWidth() - aBoxSize.Width()) / 2),
1705                                  rRect.Top() + ((rRect.GetHeight() - aBoxSize.Height()) / 2)),
1706                            aBoxSize);
1707
1708     DbCellControl::PaintFieldToCell(rDev, aRect, _rxField, xFormatter);
1709 }
1710
1711 void DbCheckBox::PaintCell(OutputDevice& rDev, const tools::Rectangle& rRect)
1712 {
1713     switch (rDev.GetOutDevType())
1714     {
1715         case OUTDEV_WINDOW:
1716         case OUTDEV_VIRDEV:
1717             DbCellControl::PaintCell(rDev, rRect);
1718             break;
1719         case OUTDEV_PRINTER:
1720         case OUTDEV_PDF:
1721         {
1722             TriState eState = static_cast<CheckBoxControl*>(m_pWindow.get())->GetState();
1723
1724             MapMode aResMapMode(MapUnit::Map100thMM);
1725             Size aImageSize = rDev.LogicToPixel(Size(300, 300), aResMapMode);
1726             Size aBrd1Size = rDev.LogicToPixel(Size(20, 20), aResMapMode);
1727             Size aBrd2Size = rDev.LogicToPixel(Size(30, 30), aResMapMode);
1728             int nCheckWidth = rDev.LogicToPixel(Size(20, 20), aResMapMode).Width();
1729
1730             tools::Rectangle aStateRect;
1731             aStateRect.SetLeft(rRect.Left() + ((rRect.GetWidth() - aImageSize.Width()) / 2));
1732             aStateRect.SetTop(rRect.Top() + ((rRect.GetHeight() - aImageSize.Height()) / 2));
1733             aStateRect.SetRight(aStateRect.Left() + aImageSize.Width() - 1);
1734             aStateRect.SetBottom(aStateRect.Top() + aImageSize.Height() - 1);
1735
1736             rDev.Push();
1737             rDev.SetMapMode();
1738
1739             rDev.SetLineColor();
1740             rDev.SetFillColor(COL_BLACK);
1741             rDev.DrawRect(aStateRect);
1742             aStateRect.AdjustLeft(aBrd1Size.Width());
1743             aStateRect.AdjustTop(aBrd1Size.Height());
1744             aStateRect.AdjustRight(-aBrd1Size.Width());
1745             aStateRect.AdjustBottom(-aBrd1Size.Height());
1746             if (eState == TRISTATE_INDET)
1747                 rDev.SetFillColor(COL_LIGHTGRAY);
1748             else
1749                 rDev.SetFillColor(COL_WHITE);
1750             rDev.DrawRect(aStateRect);
1751
1752             if (eState == TRISTATE_TRUE)
1753             {
1754                 aStateRect.AdjustLeft(aBrd2Size.Width());
1755                 aStateRect.AdjustTop(aBrd2Size.Height());
1756                 aStateRect.AdjustRight(-aBrd2Size.Width());
1757                 aStateRect.AdjustBottom(-aBrd2Size.Height());
1758                 Point aPos11(aStateRect.TopLeft());
1759                 Point aPos12(aStateRect.BottomRight());
1760                 Point aPos21(aStateRect.TopRight());
1761                 Point aPos22(aStateRect.BottomLeft());
1762                 Point aTempPos11(aPos11);
1763                 Point aTempPos12(aPos12);
1764                 Point aTempPos21(aPos21);
1765                 Point aTempPos22(aPos22);
1766                 rDev.SetLineColor(COL_BLACK);
1767                 int nDX = 0;
1768                 for (int i = 0; i < nCheckWidth; i++)
1769                 {
1770                     if ( !(i % 2) )
1771                     {
1772                         aTempPos11.setX(aPos11.X() + nDX);
1773                         aTempPos12.setX(aPos12.X() + nDX);
1774                         aTempPos21.setX(aPos21.X() + nDX);
1775                         aTempPos22.setX(aPos22.X() + nDX);
1776                     }
1777                     else
1778                     {
1779                         nDX++;
1780                         aTempPos11.setX(aPos11.X() - nDX);
1781                         aTempPos12.setX(aPos12.X() - nDX);
1782                         aTempPos21.setX(aPos21.X() - nDX);
1783                         aTempPos22.setX(aPos22.X() - nDX);
1784                     }
1785                     rDev.DrawLine(aTempPos11, aTempPos12);
1786                     rDev.DrawLine(aTempPos21, aTempPos22);
1787                 }
1788             }
1789
1790             rDev.Pop();
1791             break;
1792         }
1793     }
1794 }
1795
1796 void DbCheckBox::updateFromModel( Reference< XPropertySet > _rxModel )
1797 {
1798     OSL_ENSURE( _rxModel.is() && m_pWindow, "DbCheckBox::updateFromModel: invalid call!" );
1799
1800     sal_Int16 nState = TRISTATE_INDET;
1801     _rxModel->getPropertyValue( FM_PROP_STATE ) >>= nState;
1802     static_cast< CheckBoxControl* >( m_pWindow.get() )->SetState( static_cast< TriState >( nState ) );
1803 }
1804
1805 bool DbCheckBox::commitControl()
1806 {
1807     m_rColumn.getModel()->setPropertyValue( FM_PROP_STATE,
1808                     Any( static_cast<sal_Int16>( static_cast< CheckBoxControl* >( m_pWindow.get() )->GetState() ) ) );
1809     return true;
1810 }
1811
1812 OUString DbCheckBox::GetFormatText(const Reference< XColumn >& /*_rxField*/, const Reference< XNumberFormatter >& /*xFormatter*/, const Color** /*ppColor*/)
1813 {
1814     return OUString();
1815 }
1816
1817 DbPatternField::DbPatternField( DbGridColumn& _rColumn, const Reference<XComponentContext>& _rContext )
1818     :DbCellControl( _rColumn )
1819     ,m_xContext( _rContext )
1820 {
1821     doPropertyListening( FM_PROP_LITERALMASK );
1822     doPropertyListening( FM_PROP_EDITMASK );
1823     doPropertyListening( FM_PROP_STRICTFORMAT );
1824 }
1825
1826 void DbPatternField::implAdjustGenericFieldSetting( const Reference< XPropertySet >& _rxModel )
1827 {
1828     DBG_ASSERT( m_pWindow, "DbPatternField::implAdjustGenericFieldSetting: not to be called without window!" );
1829     DBG_ASSERT( _rxModel.is(), "DbPatternField::implAdjustGenericFieldSetting: invalid model!" );
1830     if ( !m_pWindow || !_rxModel.is() )
1831         return;
1832
1833     OUString aLitMask;
1834     OUString aEditMask;
1835     bool bStrict = false;
1836
1837     _rxModel->getPropertyValue( FM_PROP_LITERALMASK ) >>= aLitMask;
1838     _rxModel->getPropertyValue( FM_PROP_EDITMASK ) >>= aEditMask;
1839     _rxModel->getPropertyValue( FM_PROP_STRICTFORMAT ) >>= bStrict;
1840
1841     OString aAsciiEditMask(OUStringToOString(aEditMask, RTL_TEXTENCODING_ASCII_US));
1842
1843     weld::PatternFormatter& rEditFormatter = static_cast<PatternControl*>(m_pWindow.get())->get_formatter();
1844     rEditFormatter.SetMask(aAsciiEditMask, aLitMask);
1845     rEditFormatter.SetStrictFormat(bStrict);
1846
1847     weld::PatternFormatter& rPaintFormatter = static_cast<PatternControl*>(m_pPainter.get())->get_formatter();
1848     rPaintFormatter.SetMask(aAsciiEditMask, aLitMask);
1849     rPaintFormatter.SetStrictFormat(bStrict);
1850 }
1851
1852 void DbPatternField::Init(BrowserDataWin& rParent, const Reference< XRowSet >& xCursor)
1853 {
1854     m_rColumn.SetAlignmentFromModel(-1);
1855
1856     m_pWindow = VclPtr<PatternControl>::Create(&rParent);
1857     m_pPainter= VclPtr<PatternControl>::Create(&rParent);
1858
1859     Reference< XPropertySet >   xModel( m_rColumn.getModel() );
1860     implAdjustGenericFieldSetting( xModel );
1861
1862     DbCellControl::Init( rParent, xCursor );
1863 }
1864
1865 CellControllerRef DbPatternField::CreateController() const
1866 {
1867     return new EditCellController(static_cast<PatternControl*>(m_pWindow.get()));
1868 }
1869
1870 OUString DbPatternField::impl_formatText( const OUString& _rText )
1871 {
1872     weld::PatternFormatter& rPaintFormatter = static_cast<PatternControl*>(m_pPainter.get())->get_formatter();
1873     rPaintFormatter.get_widget().set_text(_rText);
1874     rPaintFormatter.ReformatAll();
1875     return rPaintFormatter.get_widget().get_text();
1876 }
1877
1878 OUString DbPatternField::GetFormatText(const Reference< css::sdb::XColumn >& _rxField, const Reference< XNumberFormatter >& /*xFormatter*/, const Color** /*ppColor*/)
1879 {
1880     bool bIsForPaint = _rxField != m_rColumn.GetField();
1881     ::std::unique_ptr< FormattedColumnValue >& rpFormatter = bIsForPaint ? m_pPaintFormatter : m_pValueFormatter;
1882
1883     if (!rpFormatter)
1884     {
1885         rpFormatter = std::make_unique< FormattedColumnValue> (
1886             m_xContext, getCursor(), Reference< XPropertySet >( _rxField, UNO_QUERY ) );
1887         OSL_ENSURE(rpFormatter, "DbPatternField::Init: no value formatter!");
1888     }
1889     else
1890         OSL_ENSURE( rpFormatter->getColumn() == _rxField, "DbPatternField::GetFormatText: my value formatter is working for another field ...!" );
1891         // re-creating the value formatter here every time would be quite expensive ...
1892
1893     OUString sText;
1894     if (rpFormatter)
1895         sText = rpFormatter->getFormattedValue();
1896
1897     return impl_formatText( sText );
1898 }
1899
1900 void DbPatternField::UpdateFromField( const Reference< XColumn >& _rxField, const Reference< XNumberFormatter >& _rxFormatter )
1901 {
1902     weld::Entry& rEntry = static_cast<PatternControl*>(m_pWindow.get())->get_widget();
1903     rEntry.set_text(GetFormatText(_rxField, _rxFormatter));
1904     rEntry.select_region(-1, 0);
1905 }
1906
1907 void DbPatternField::updateFromModel( Reference< XPropertySet > _rxModel )
1908 {
1909     OSL_ENSURE( _rxModel.is() && m_pWindow, "DbPatternField::updateFromModel: invalid call!" );
1910
1911     OUString sText;
1912     _rxModel->getPropertyValue( FM_PROP_TEXT ) >>= sText;
1913
1914     weld::Entry& rEntry = static_cast<PatternControl*>(m_pWindow.get())->get_widget();
1915     rEntry.set_text(impl_formatText(sText));
1916     rEntry.select_region(-1, 0);
1917 }
1918
1919 bool DbPatternField::commitControl()
1920 {
1921     weld::Entry& rEntry = static_cast<PatternControl*>(m_pWindow.get())->get_widget();
1922     m_rColumn.getModel()->setPropertyValue(FM_PROP_TEXT, Any(rEntry.get_text()));
1923     return true;
1924 }
1925
1926 DbSpinField::DbSpinField( DbGridColumn& _rColumn, sal_Int16 _nStandardAlign )
1927     :DbCellControl( _rColumn )
1928     ,m_nStandardAlign( _nStandardAlign )
1929 {
1930 }
1931
1932 void DbSpinField::Init(BrowserDataWin& _rParent, const Reference< XRowSet >& _rxCursor)
1933 {
1934     m_rColumn.SetAlignmentFromModel( m_nStandardAlign );
1935
1936     Reference< XPropertySet > xModel( m_rColumn.getModel() );
1937
1938     // determine if we need a spinbutton version
1939     bool bSpinButton(false);
1940     if ( ::comphelper::getBOOL( xModel->getPropertyValue( FM_PROP_SPIN ) ) )
1941         bSpinButton = true;
1942     // create the fields
1943     m_pWindow = createField( &_rParent, bSpinButton, xModel );
1944     m_pPainter = createField( &_rParent, bSpinButton, xModel );
1945
1946     // adjust all other settings which depend on the property values
1947     implAdjustGenericFieldSetting( xModel );
1948
1949     // call the base class
1950     DbCellControl::Init( _rParent, _rxCursor );
1951 }
1952
1953 CellControllerRef DbSpinField::CreateController() const
1954 {
1955     return new ::svt::FormattedFieldCellController(static_cast<FormattedControlBase*>(m_pWindow.get()));
1956 }
1957
1958 DbNumericField::DbNumericField( DbGridColumn& _rColumn )
1959     :DbSpinField( _rColumn )
1960 {
1961     doPropertyListening( FM_PROP_DECIMAL_ACCURACY );
1962     doPropertyListening( FM_PROP_VALUEMIN );
1963     doPropertyListening( FM_PROP_VALUEMAX );
1964     doPropertyListening( FM_PROP_VALUESTEP );
1965     doPropertyListening( FM_PROP_STRICTFORMAT );
1966     doPropertyListening( FM_PROP_SHOWTHOUSANDSEP );
1967 }
1968
1969 void DbNumericField::implAdjustGenericFieldSetting( const Reference< XPropertySet >& _rxModel )
1970 {
1971     DBG_ASSERT( m_pWindow, "DbNumericField::implAdjustGenericFieldSetting: not to be called without window!" );
1972     DBG_ASSERT( _rxModel.is(), "DbNumericField::implAdjustGenericFieldSetting: invalid model!" );
1973     if ( !m_pWindow || !_rxModel.is() )
1974         return;
1975
1976     sal_Int32   nMin        = static_cast<sal_Int32>(getDouble( _rxModel->getPropertyValue( FM_PROP_VALUEMIN ) ));
1977     sal_Int32   nMax        = static_cast<sal_Int32>(getDouble( _rxModel->getPropertyValue( FM_PROP_VALUEMAX ) ));
1978     sal_Int32   nStep       = static_cast<sal_Int32>(getDouble( _rxModel->getPropertyValue( FM_PROP_VALUESTEP ) ));
1979     bool    bStrict     = getBOOL( _rxModel->getPropertyValue( FM_PROP_STRICTFORMAT ) );
1980     sal_Int16   nScale      = getINT16( _rxModel->getPropertyValue( FM_PROP_DECIMAL_ACCURACY ) );
1981     bool    bThousand   = getBOOL( _rxModel->getPropertyValue( FM_PROP_SHOWTHOUSANDSEP ) );
1982
1983     Formatter& rEditFormatter = static_cast<FormattedControlBase*>(m_pWindow.get())->get_formatter();
1984     rEditFormatter.SetMinValue(nMin);
1985     rEditFormatter.SetMaxValue(nMax);
1986     rEditFormatter.SetSpinSize(nStep);
1987     rEditFormatter.SetStrictFormat(bStrict);
1988
1989     Formatter& rPaintFormatter = static_cast<FormattedControlBase*>(m_pPainter.get())->get_formatter();
1990     rPaintFormatter.SetMinValue(nMin);
1991     rPaintFormatter.SetMaxValue(nMax);
1992     rPaintFormatter.SetStrictFormat(bStrict);
1993
1994     // give a formatter to the field and the painter;
1995     // test first if I can get from the service behind a connection
1996     Reference< css::util::XNumberFormatsSupplier >  xSupplier;
1997     Reference< XRowSet > xForm;
1998     if ( m_rColumn.GetParent().getDataSource() )
1999         xForm.set( Reference< XInterface >(*m_rColumn.GetParent().getDataSource()), UNO_QUERY );
2000     if ( xForm.is() )
2001         xSupplier = getNumberFormats( getConnection( xForm ), true );
2002     SvNumberFormatter* pFormatterUsed = nullptr;
2003     if ( xSupplier.is() )
2004     {
2005         SvNumberFormatsSupplierObj* pImplementation = comphelper::getFromUnoTunnel<SvNumberFormatsSupplierObj>( xSupplier );
2006         pFormatterUsed = pImplementation ? pImplementation->GetNumberFormatter() : nullptr;
2007     }
2008     if ( nullptr == pFormatterUsed )
2009     {   // the cursor didn't lead to success -> standard
2010         pFormatterUsed = rEditFormatter.StandardFormatter();
2011         DBG_ASSERT( pFormatterUsed != nullptr, "DbNumericField::implAdjustGenericFieldSetting: no standard formatter given by the numeric field !" );
2012     }
2013     rEditFormatter.SetFormatter( pFormatterUsed );
2014     rPaintFormatter.SetFormatter( pFormatterUsed );
2015
2016     // and then generate a format which has the desired length after the decimal point, etc.
2017     LanguageType aAppLanguage = Application::GetSettings().GetUILanguageTag().getLanguageType();
2018     OUString sFormatString = pFormatterUsed->GenerateFormat(0, aAppLanguage, bThousand, false, nScale);
2019
2020     rEditFormatter.SetFormat( sFormatString, aAppLanguage );
2021     rPaintFormatter.SetFormat( sFormatString, aAppLanguage );
2022 }
2023
2024 VclPtr<svt::ControlBase> DbNumericField::createField(BrowserDataWin* pParent, bool bSpinButton, const Reference<XPropertySet>& /*rxModel*/)
2025 {
2026     return VclPtr<DoubleNumericControl>::Create(pParent, bSpinButton);
2027 }
2028
2029 namespace
2030 {
2031     OUString lcl_setFormattedNumeric_nothrow( FormattedControlBase& _rField, const DbCellControl& _rControl,
2032         const Reference< XColumn >& _rxField, const Reference< XNumberFormatter >& _rxFormatter )
2033     {
2034         OUString sValue;
2035         if ( _rxField.is() )
2036         {
2037             try
2038             {
2039                 double fValue = _rControl.GetValue( _rxField, _rxFormatter );
2040                 if ( !_rxField->wasNull() )
2041                 {
2042                     _rField.get_formatter().SetValue(fValue);
2043                     sValue = _rField.get_widget().get_text();
2044                 }
2045             }
2046             catch( const Exception& )
2047             {
2048                 DBG_UNHANDLED_EXCEPTION("svx");
2049             }
2050         }
2051         return sValue;
2052     }
2053 }
2054
2055 OUString DbNumericField::GetFormatText(const Reference< css::sdb::XColumn >& _rxField, const Reference< css::util::XNumberFormatter >& _rxFormatter, const Color** /*ppColor*/)
2056 {
2057     return lcl_setFormattedNumeric_nothrow(dynamic_cast<FormattedControlBase&>(*m_pPainter), *this, _rxField, _rxFormatter);
2058 }
2059
2060 void DbNumericField::UpdateFromField(const Reference< css::sdb::XColumn >& _rxField, const Reference< css::util::XNumberFormatter >& _rxFormatter)
2061 {
2062     lcl_setFormattedNumeric_nothrow(dynamic_cast<FormattedControlBase&>(*m_pWindow), *this, _rxField, _rxFormatter);
2063 }
2064
2065 void DbNumericField::updateFromModel( Reference< XPropertySet > _rxModel )
2066 {
2067     OSL_ENSURE( _rxModel.is() && m_pWindow, "DbNumericField::updateFromModel: invalid call!" );
2068
2069     FormattedControlBase* pControl = static_cast<FormattedControlBase*>(m_pWindow.get());
2070     Formatter& rFormatter = pControl->get_formatter();
2071
2072     double dValue = 0;
2073     if ( _rxModel->getPropertyValue( FM_PROP_VALUE ) >>= dValue )
2074         rFormatter.SetValue(dValue);
2075     else
2076     {
2077         pControl->get_widget().set_text(OUString());
2078         rFormatter.InvalidateValueState();
2079     }
2080 }
2081
2082 bool DbNumericField::commitControl()
2083 {
2084     FormattedControlBase* pControl = static_cast<FormattedControlBase*>(m_pWindow.get());
2085     OUString aText(pControl->get_widget().get_text());
2086     Any aVal;
2087
2088     if (!aText.isEmpty())   // not empty
2089     {
2090         Formatter& rFormatter = pControl->get_formatter();
2091         double fValue = rFormatter.GetValue();
2092         aVal <<= fValue;
2093     }
2094     m_rColumn.getModel()->setPropertyValue(FM_PROP_VALUE, aVal);
2095     return true;
2096 }
2097
2098 DbCurrencyField::DbCurrencyField(DbGridColumn& _rColumn)
2099     :DbSpinField( _rColumn )
2100 {
2101     doPropertyListening( FM_PROP_DECIMAL_ACCURACY );
2102     doPropertyListening( FM_PROP_VALUEMIN );
2103     doPropertyListening( FM_PROP_VALUEMAX );
2104     doPropertyListening( FM_PROP_VALUESTEP );
2105     doPropertyListening( FM_PROP_STRICTFORMAT );
2106     doPropertyListening( FM_PROP_SHOWTHOUSANDSEP );
2107     doPropertyListening( FM_PROP_CURRENCYSYMBOL );
2108 }
2109
2110 void DbCurrencyField::implAdjustGenericFieldSetting( const Reference< XPropertySet >& _rxModel )
2111 {
2112     DBG_ASSERT( m_pWindow, "DbCurrencyField::implAdjustGenericFieldSetting: not to be called without window!" );
2113     DBG_ASSERT( _rxModel.is(), "DbCurrencyField::implAdjustGenericFieldSetting: invalid model!" );
2114     if ( !m_pWindow || !_rxModel.is() )
2115         return;
2116
2117     sal_Int16 nScale        = getINT16( _rxModel->getPropertyValue( FM_PROP_DECIMAL_ACCURACY ) );
2118     double  nMin            = getDouble( _rxModel->getPropertyValue( FM_PROP_VALUEMIN ) );
2119     double  nMax            = getDouble( _rxModel->getPropertyValue( FM_PROP_VALUEMAX ) );
2120     double  nStep           = getDouble( _rxModel->getPropertyValue( FM_PROP_VALUESTEP ) );
2121     bool    bStrict     = getBOOL( _rxModel->getPropertyValue( FM_PROP_STRICTFORMAT ) );
2122     bool    bThousand   = getBOOL( _rxModel->getPropertyValue( FM_PROP_SHOWTHOUSANDSEP ) );
2123     OUString aStr( getString( _rxModel->getPropertyValue(FM_PROP_CURRENCYSYMBOL ) ) );
2124
2125     Formatter& rEditFormatter = static_cast<FormattedControlBase*>(m_pWindow.get())->get_formatter();
2126     rEditFormatter.SetDecimalDigits(nScale);
2127     rEditFormatter.SetMinValue(nMin);
2128     rEditFormatter.SetMaxValue(nMax);
2129     rEditFormatter.SetSpinSize(nStep);
2130     rEditFormatter.SetStrictFormat(bStrict);
2131     weld::LongCurrencyFormatter& rCurrencyEditFormatter = static_cast<weld::LongCurrencyFormatter&>(rEditFormatter);
2132     rCurrencyEditFormatter.SetUseThousandSep(bThousand);
2133     rCurrencyEditFormatter.SetCurrencySymbol(aStr);
2134
2135     Formatter& rPaintFormatter = static_cast<FormattedControlBase*>(m_pPainter.get())->get_formatter();
2136     rPaintFormatter.SetDecimalDigits(nScale);
2137     rPaintFormatter.SetMinValue(nMin);
2138     rPaintFormatter.SetMaxValue(nMax);
2139     rPaintFormatter.SetStrictFormat(bStrict);
2140     weld::LongCurrencyFormatter& rPaintCurrencyFormatter = static_cast<weld::LongCurrencyFormatter&>(rPaintFormatter);
2141     rPaintCurrencyFormatter.SetUseThousandSep(bThousand);
2142     rPaintCurrencyFormatter.SetCurrencySymbol(aStr);
2143 }
2144
2145 VclPtr<svt::ControlBase> DbCurrencyField::createField(BrowserDataWin* pParent, bool bSpinButton, const Reference< XPropertySet >& /*rxModel*/)
2146 {
2147     return VclPtr<LongCurrencyControl>::Create(pParent, bSpinButton);
2148 }
2149
2150 namespace
2151 {
2152     OUString lcl_setFormattedCurrency_nothrow( FormattedControlBase& _rField, const DbCurrencyField& _rControl,
2153         const Reference< XColumn >& _rxField, const Reference< XNumberFormatter >& _rxFormatter )
2154     {
2155         OUString sValue;
2156         if ( _rxField.is() )
2157         {
2158             try
2159             {
2160                 double fValue = _rControl.GetValue( _rxField, _rxFormatter );
2161                 if ( !_rxField->wasNull() )
2162                 {
2163                     _rField.get_formatter().SetValue(fValue);
2164                     sValue = _rField.get_widget().get_text();
2165                 }
2166             }
2167             catch( const Exception& )
2168             {
2169                 DBG_UNHANDLED_EXCEPTION("svx");
2170             }
2171         }
2172         return sValue;
2173     }
2174 }
2175
2176 OUString DbCurrencyField::GetFormatText(const Reference< css::sdb::XColumn >& _rxField, const Reference< css::util::XNumberFormatter >& _rxFormatter, const Color** /*ppColor*/)
2177 {
2178     return lcl_setFormattedCurrency_nothrow(dynamic_cast<FormattedControlBase&>(*m_pPainter), *this, _rxField, _rxFormatter);
2179 }
2180
2181 void DbCurrencyField::UpdateFromField(const Reference< css::sdb::XColumn >& _rxField, const Reference< css::util::XNumberFormatter >& _rxFormatter)
2182 {
2183     lcl_setFormattedCurrency_nothrow(dynamic_cast<FormattedControlBase&>(*m_pWindow), *this, _rxField, _rxFormatter);
2184 }
2185
2186 void DbCurrencyField::updateFromModel( Reference< XPropertySet > _rxModel )
2187 {
2188     OSL_ENSURE( _rxModel.is() && m_pWindow, "DbCurrencyField::updateFromModel: invalid call!" );
2189
2190     FormattedControlBase* pControl = static_cast<FormattedControlBase*>(m_pWindow.get());
2191     Formatter& rFormatter = pControl->get_formatter();
2192
2193     double dValue = 0;
2194     if ( _rxModel->getPropertyValue( FM_PROP_VALUE ) >>= dValue )
2195         rFormatter.SetValue(dValue);
2196     else
2197     {
2198         pControl->get_widget().set_text(OUString());
2199         rFormatter.InvalidateValueState();
2200     }
2201 }
2202
2203 bool DbCurrencyField::commitControl()
2204 {
2205     FormattedControlBase* pControl = static_cast<FormattedControlBase*>(m_pWindow.get());
2206     OUString aText(pControl->get_widget().get_text());
2207     Any aVal;
2208
2209     if (!aText.isEmpty())   // not empty
2210     {
2211         Formatter& rFormatter = pControl->get_formatter();
2212         double fValue = rFormatter.GetValue();
2213         aVal <<= fValue;
2214     }
2215     m_rColumn.getModel()->setPropertyValue(FM_PROP_VALUE, aVal);
2216     return true;
2217 }
2218
2219 DbDateField::DbDateField( DbGridColumn& _rColumn )
2220     :DbSpinField( _rColumn )
2221 {
2222     doPropertyListening( FM_PROP_DATEFORMAT );
2223     doPropertyListening( FM_PROP_DATEMIN );
2224     doPropertyListening( FM_PROP_DATEMAX );
2225     doPropertyListening( FM_PROP_STRICTFORMAT );
2226     doPropertyListening( FM_PROP_DATE_SHOW_CENTURY );
2227 }
2228
2229 VclPtr<svt::ControlBase> DbDateField::createField(BrowserDataWin* pParent, bool bSpinButton, const Reference< XPropertySet >& rxModel)
2230 {
2231     // check if there is a DropDown property set to TRUE
2232     bool bDropDown =    !hasProperty( FM_PROP_DROPDOWN, rxModel )
2233                         ||  getBOOL( rxModel->getPropertyValue( FM_PROP_DROPDOWN ) );
2234     // given the apparent inability to set a custom up/down action for a gtk
2235     // spinbutton to have different up/down dates depending on the zone the
2236     // mouse is in, show the dropdown calendar for both the spin or dropdown case
2237     return VclPtr<DateControl>::Create(pParent, bSpinButton || bDropDown);
2238 }
2239
2240 void DbDateField::implAdjustGenericFieldSetting( const Reference< XPropertySet >& _rxModel )
2241 {
2242     DBG_ASSERT( m_pWindow, "DbDateField::implAdjustGenericFieldSetting: not to be called without window!" );
2243     DBG_ASSERT( _rxModel.is(), "DbDateField::implAdjustGenericFieldSetting: invalid model!" );
2244     if ( !m_pWindow || !_rxModel.is() )
2245         return;
2246
2247     sal_Int16   nFormat     = getINT16( _rxModel->getPropertyValue( FM_PROP_DATEFORMAT ) );
2248     util::Date  aMin;
2249     OSL_VERIFY( _rxModel->getPropertyValue( FM_PROP_DATEMIN ) >>= aMin );
2250     util::Date  aMax;
2251     OSL_VERIFY( _rxModel->getPropertyValue( FM_PROP_DATEMAX ) >>= aMax );
2252     bool    bStrict     = getBOOL( _rxModel->getPropertyValue( FM_PROP_STRICTFORMAT ) );
2253
2254     FormattedControlBase* pControl = static_cast<FormattedControlBase*>(m_pWindow.get());
2255     weld::DateFormatter& rControlFormatter = static_cast<weld::DateFormatter&>(pControl->get_formatter());
2256
2257     FormattedControlBase* pPainter = static_cast<FormattedControlBase*>(m_pPainter.get());
2258     weld::DateFormatter& rPainterFormatter = static_cast<weld::DateFormatter&>(pPainter->get_formatter());
2259
2260     Any  aCentury = _rxModel->getPropertyValue( FM_PROP_DATE_SHOW_CENTURY );
2261     if ( aCentury.getValueType().getTypeClass() != TypeClass_VOID )
2262     {
2263         bool bShowDateCentury = getBOOL( aCentury );
2264
2265         rControlFormatter.SetShowDateCentury(bShowDateCentury);
2266         rPainterFormatter.SetShowDateCentury(bShowDateCentury);
2267     }
2268
2269     rControlFormatter.SetExtDateFormat( static_cast<ExtDateFieldFormat>(nFormat) );
2270     rControlFormatter.SetMin( aMin );
2271     rControlFormatter.SetMax( aMax );
2272     rControlFormatter.SetStrictFormat( bStrict );
2273     rControlFormatter.EnableEmptyField( true );
2274
2275     rPainterFormatter.SetExtDateFormat( static_cast<ExtDateFieldFormat>(nFormat) );
2276     rPainterFormatter.SetMin( aMin );
2277     rPainterFormatter.SetMax( aMax );
2278     rPainterFormatter.SetStrictFormat( bStrict );
2279     rPainterFormatter.EnableEmptyField( true );
2280 }
2281
2282 namespace
2283 {
2284     OUString lcl_setFormattedDate_nothrow(DateControl& _rField, const Reference<XColumn>& _rxField)
2285     {
2286         OUString sDate;
2287         if ( _rxField.is() )
2288         {
2289             try
2290             {
2291                 css::util::Date aValue = _rxField->getDate();
2292                 if (!_rxField->wasNull())
2293                 {
2294                     _rField.SetDate(::Date(aValue.Day, aValue.Month, aValue.Year));
2295                     sDate = _rField.get_widget().get_text();
2296                 }
2297             }
2298             catch( const Exception& )
2299             {
2300                 DBG_UNHANDLED_EXCEPTION("svx");
2301             }
2302         }
2303         return sDate;
2304     }
2305 }
2306
2307 OUString DbDateField::GetFormatText(const Reference< css::sdb::XColumn >& _rxField, const Reference< css::util::XNumberFormatter >& /*xFormatter*/, const Color** /*ppColor*/)
2308 {
2309      return lcl_setFormattedDate_nothrow(*static_cast<DateControl*>(m_pPainter.get()), _rxField);
2310 }
2311
2312 void DbDateField::UpdateFromField(const Reference< css::sdb::XColumn >& _rxField, const Reference< XNumberFormatter >& /*xFormatter*/)
2313 {
2314     lcl_setFormattedDate_nothrow(*static_cast<DateControl*>(m_pWindow.get()), _rxField);
2315 }
2316
2317 void DbDateField::updateFromModel( Reference< XPropertySet > _rxModel )
2318 {
2319     OSL_ENSURE( _rxModel.is() && m_pWindow, "DbDateField::updateFromModel: invalid call!" );
2320
2321     DateControl* pControl = static_cast<DateControl*>(m_pWindow.get());
2322
2323     util::Date aDate;
2324     if ( _rxModel->getPropertyValue( FM_PROP_DATE ) >>= aDate )
2325         pControl->SetDate(::Date(aDate));
2326     else
2327         pControl->get_widget().set_text(OUString());
2328 }
2329
2330 bool DbDateField::commitControl()
2331 {
2332     FormattedControlBase* pControl = static_cast<FormattedControlBase*>(m_pWindow.get());
2333     OUString aText(pControl->get_widget().get_text());
2334     Any aVal;
2335
2336     if (!aText.isEmpty())   // not empty
2337     {
2338         weld::DateFormatter& rControlFormatter = static_cast<weld::DateFormatter&>(pControl->get_formatter());
2339         aVal <<= rControlFormatter.GetDate().GetUNODate();
2340     }
2341
2342     m_rColumn.getModel()->setPropertyValue(FM_PROP_DATE, aVal);
2343     return true;
2344 }
2345
2346 DbTimeField::DbTimeField( DbGridColumn& _rColumn )
2347     :DbSpinField( _rColumn, css::awt::TextAlign::LEFT )
2348 {
2349     doPropertyListening( FM_PROP_TIMEFORMAT );
2350     doPropertyListening( FM_PROP_TIMEMIN );
2351     doPropertyListening( FM_PROP_TIMEMAX );
2352     doPropertyListening( FM_PROP_STRICTFORMAT );
2353 }
2354
2355 VclPtr<svt::ControlBase> DbTimeField::createField(BrowserDataWin* pParent, bool bSpinButton, const Reference< XPropertySet >& /*rxModel*/ )
2356 {
2357     return VclPtr<TimeControl>::Create(pParent, bSpinButton);
2358 }
2359
2360 void DbTimeField::implAdjustGenericFieldSetting( const Reference< XPropertySet >& _rxModel )
2361 {
2362     DBG_ASSERT( m_pWindow, "DbTimeField::implAdjustGenericFieldSetting: not to be called without window!" );
2363     DBG_ASSERT( _rxModel.is(), "DbTimeField::implAdjustGenericFieldSetting: invalid model!" );
2364     if ( !m_pWindow || !_rxModel.is() )
2365         return;
2366
2367     sal_Int16   nFormat     = getINT16( _rxModel->getPropertyValue( FM_PROP_TIMEFORMAT ) );
2368     util::Time  aMin;
2369     OSL_VERIFY( _rxModel->getPropertyValue( FM_PROP_TIMEMIN ) >>= aMin );
2370     util::Time  aMax;
2371     OSL_VERIFY( _rxModel->getPropertyValue( FM_PROP_TIMEMAX ) >>= aMax );
2372     bool    bStrict     = getBOOL( _rxModel->getPropertyValue( FM_PROP_STRICTFORMAT ) );
2373
2374     FormattedControlBase* pControl = static_cast<FormattedControlBase*>(m_pWindow.get());
2375     weld::TimeFormatter& rControlFormatter = static_cast<weld::TimeFormatter&>(pControl->get_formatter());
2376
2377     rControlFormatter.SetExtFormat(static_cast<ExtTimeFieldFormat>(nFormat));
2378     rControlFormatter.SetMin(aMin);
2379     rControlFormatter.SetMax(aMax);
2380     rControlFormatter.SetStrictFormat(bStrict);
2381     rControlFormatter.EnableEmptyField(true);
2382
2383     FormattedControlBase* pPainter = static_cast<FormattedControlBase*>(m_pPainter.get());
2384     weld::TimeFormatter& rPainterFormatter = static_cast<weld::TimeFormatter&>(pPainter->get_formatter());
2385
2386     rPainterFormatter.SetExtFormat(static_cast<ExtTimeFieldFormat>(nFormat));
2387     rPainterFormatter.SetMin(aMin);
2388     rPainterFormatter.SetMax(aMax);
2389     rPainterFormatter.SetStrictFormat(bStrict);
2390     rPainterFormatter.EnableEmptyField(true);
2391 }
2392
2393 namespace
2394 {
2395     OUString lcl_setFormattedTime_nothrow(TimeControl& _rField, const Reference<XColumn>& _rxField)
2396     {
2397         OUString sTime;
2398         if ( _rxField.is() )
2399         {
2400             try
2401             {
2402                 css::util::Time aValue = _rxField->getTime();
2403                 if (!_rxField->wasNull())
2404                 {
2405                     static_cast<weld::TimeFormatter&>(_rField.get_formatter()).SetTime( ::tools::Time( aValue ) );
2406                     sTime = _rField.get_widget().get_text();
2407                 }
2408             }
2409             catch( const Exception& )
2410             {
2411                 DBG_UNHANDLED_EXCEPTION("svx");
2412             }
2413         }
2414         return sTime;
2415     }
2416 }
2417
2418 OUString DbTimeField::GetFormatText(const Reference< css::sdb::XColumn >& _rxField, const Reference< css::util::XNumberFormatter >& /*xFormatter*/, const Color** /*ppColor*/)
2419 {
2420     return lcl_setFormattedTime_nothrow(*static_cast<TimeControl*>(m_pPainter.get()), _rxField);
2421 }
2422
2423 void DbTimeField::UpdateFromField(const Reference< css::sdb::XColumn >& _rxField, const Reference< XNumberFormatter >& /*xFormatter*/)
2424 {
2425     lcl_setFormattedTime_nothrow(*static_cast<TimeControl*>(m_pWindow.get()), _rxField);
2426 }
2427
2428 void DbTimeField::updateFromModel( Reference< XPropertySet > _rxModel )
2429 {
2430     OSL_ENSURE( _rxModel.is() && m_pWindow, "DbTimeField::updateFromModel: invalid call!" );
2431
2432     FormattedControlBase* pControl = static_cast<FormattedControlBase*>(m_pWindow.get());
2433     weld::TimeFormatter& rControlFormatter = static_cast<weld::TimeFormatter&>(pControl->get_formatter());
2434
2435     util::Time aTime;
2436     if ( _rxModel->getPropertyValue( FM_PROP_TIME ) >>= aTime )
2437         rControlFormatter.SetTime(::tools::Time(aTime));
2438     else
2439         pControl->get_widget().set_text(OUString());
2440 }
2441
2442 bool DbTimeField::commitControl()
2443 {
2444     FormattedControlBase* pControl = static_cast<FormattedControlBase*>(m_pWindow.get());
2445     OUString aText(pControl->get_widget().get_text());
2446     Any aVal;
2447
2448     if (!aText.isEmpty())   // not empty
2449     {
2450         weld::TimeFormatter& rControlFormatter = static_cast<weld::TimeFormatter&>(pControl->get_formatter());
2451         aVal <<= rControlFormatter.GetTime().GetUNOTime();
2452     }
2453
2454     m_rColumn.getModel()->setPropertyValue(FM_PROP_TIME, aVal);
2455     return true;
2456 }
2457
2458 DbComboBox::DbComboBox(DbGridColumn& _rColumn)
2459            :DbCellControl(_rColumn)
2460 {
2461     setAlignedController( false );
2462
2463     doPropertyListening( FM_PROP_STRINGITEMLIST );
2464     doPropertyListening( FM_PROP_LINECOUNT );
2465 }
2466
2467 void DbComboBox::_propertyChanged( const PropertyChangeEvent& _rEvent )
2468 {
2469     if ( _rEvent.PropertyName == FM_PROP_STRINGITEMLIST )
2470     {
2471         SetList(_rEvent.NewValue);
2472     }
2473     else
2474     {
2475         DbCellControl::_propertyChanged( _rEvent ) ;
2476     }
2477 }
2478
2479 void DbComboBox::SetList(const Any& rItems)
2480 {
2481     ComboBoxControl* pField = static_cast<ComboBoxControl*>(m_pWindow.get());
2482     weld::ComboBox& rComboBox = pField->get_widget();
2483     rComboBox.clear();
2484
2485     css::uno::Sequence<OUString> aTest;
2486     if (rItems >>= aTest)
2487     {
2488         for (const OUString& rString : std::as_const(aTest))
2489              rComboBox.append_text(rString);
2490
2491         // tell the grid control that this controller is invalid and has to be re-initialized
2492         invalidatedController();
2493     }
2494 }
2495
2496 void DbComboBox::implAdjustGenericFieldSetting(const Reference<XPropertySet>&)
2497 {
2498     // we no longer pay attention to FM_PROP_LINECOUNT
2499 }
2500
2501 void DbComboBox::Init(BrowserDataWin& rParent, const Reference< XRowSet >& xCursor)
2502 {
2503     m_rColumn.SetAlignmentFromModel(css::awt::TextAlign::LEFT);
2504
2505     m_pWindow = VclPtr<ComboBoxControl>::Create( &rParent );
2506
2507     // selection from right to left
2508     AllSettings     aSettings = m_pWindow->GetSettings();
2509     StyleSettings   aStyleSettings = aSettings.GetStyleSettings();
2510     aStyleSettings.SetSelectionOptions(
2511         aStyleSettings.GetSelectionOptions() | SelectionOptions::ShowFirst);
2512     aSettings.SetStyleSettings(aStyleSettings);
2513     m_pWindow->SetSettings(aSettings, true);
2514
2515     // some initial properties
2516     Reference< XPropertySet >   xModel(m_rColumn.getModel());
2517     SetList( xModel->getPropertyValue( FM_PROP_STRINGITEMLIST ) );
2518     implAdjustGenericFieldSetting( xModel );
2519
2520     DbCellControl::Init( rParent, xCursor );
2521 }
2522
2523 CellControllerRef DbComboBox::CreateController() const
2524 {
2525     return new ComboBoxCellController(static_cast<ComboBoxControl*>(m_pWindow.get()));
2526 }
2527
2528 OUString DbComboBox::GetFormatText(const Reference< css::sdb::XColumn >& _rxField, const Reference< XNumberFormatter >& xFormatter, const Color** /*ppColor*/)
2529 {
2530     const css::uno::Reference<css::beans::XPropertySet> xPS(_rxField, UNO_QUERY);
2531     ::dbtools::FormattedColumnValue fmter( xFormatter, xPS );
2532
2533     return fmter.getFormattedValue();
2534 }
2535
2536 void DbComboBox::UpdateFromField(const Reference< css::sdb::XColumn >& _rxField, const Reference< XNumberFormatter >& xFormatter)
2537 {
2538     ComboBoxControl* pControl = static_cast<ComboBoxControl*>(m_pWindow.get());
2539     pControl->get_widget().set_entry_text(GetFormatText(_rxField, xFormatter));
2540 }
2541
2542 void DbComboBox::updateFromModel( Reference< XPropertySet > _rxModel )
2543 {
2544     OSL_ENSURE( _rxModel.is() && m_pWindow, "DbComboBox::updateFromModel: invalid call!" );
2545
2546     OUString sText;
2547     _rxModel->getPropertyValue( FM_PROP_TEXT ) >>= sText;
2548
2549     ComboBoxControl* pControl = static_cast<ComboBoxControl*>(m_pWindow.get());
2550     weld::ComboBox& rComboBox = pControl->get_widget();
2551
2552     OUString sOldActive = rComboBox.get_active_text();
2553     rComboBox.set_entry_text(sText);
2554     rComboBox.select_entry_region(0, -1);
2555
2556     if (sOldActive != rComboBox.get_active_text())
2557         pControl->TriggerAuxModify();
2558 }
2559
2560 bool DbComboBox::commitControl()
2561 {
2562     ComboBoxControl* pControl = static_cast<ComboBoxControl*>(m_pWindow.get());
2563     weld::ComboBox& rComboBox = pControl->get_widget();
2564     OUString aText(rComboBox.get_active_text());
2565     m_rColumn.getModel()->setPropertyValue(FM_PROP_TEXT, Any(aText));
2566     return true;
2567 }
2568
2569
2570 DbListBox::DbListBox(DbGridColumn& _rColumn)
2571           :DbCellControl(_rColumn)
2572           ,m_bBound(false)
2573 {
2574     setAlignedController( false );
2575
2576     doPropertyListening( FM_PROP_STRINGITEMLIST );
2577     doPropertyListening( FM_PROP_LINECOUNT );
2578 }
2579
2580 void DbListBox::_propertyChanged( const css::beans::PropertyChangeEvent& _rEvent )
2581 {
2582     if ( _rEvent.PropertyName == FM_PROP_STRINGITEMLIST )
2583     {
2584         SetList(_rEvent.NewValue);
2585     }
2586     else
2587     {
2588         DbCellControl::_propertyChanged( _rEvent ) ;
2589     }
2590 }
2591
2592 void DbListBox::SetList(const Any& rItems)
2593 {
2594     ListBoxControl* pField = static_cast<ListBoxControl*>(m_pWindow.get());
2595
2596     weld::ComboBox& rFieldList = pField->get_widget();
2597
2598     rFieldList.clear();
2599     m_bBound = false;
2600
2601     css::uno::Sequence<OUString> aTest;
2602     if (!(rItems >>= aTest))
2603         return;
2604
2605     if (aTest.hasElements())
2606     {
2607         for (const OUString& rString : std::as_const(aTest))
2608              rFieldList.append_text(rString);
2609
2610         m_rColumn.getModel()->getPropertyValue(FM_PROP_VALUE_SEQ) >>= m_aValueList;
2611         m_bBound = m_aValueList.hasElements();
2612
2613         // tell the grid control that this controller is invalid and has to be re-initialized
2614         invalidatedController();
2615     }
2616 }
2617
2618 void DbListBox::Init(BrowserDataWin& rParent, const Reference< XRowSet >& xCursor)
2619 {
2620     m_rColumn.SetAlignment(css::awt::TextAlign::LEFT);
2621
2622     m_pWindow = VclPtr<ListBoxControl>::Create( &rParent );
2623
2624     // some initial properties
2625     Reference< XPropertySet > xModel( m_rColumn.getModel() );
2626     SetList( xModel->getPropertyValue( FM_PROP_STRINGITEMLIST ) );
2627     implAdjustGenericFieldSetting( xModel );
2628
2629     DbCellControl::Init( rParent, xCursor );
2630 }
2631
2632 void DbListBox::implAdjustGenericFieldSetting( const Reference< XPropertySet >& /*rxModel*/ )
2633 {
2634     // ignore FM_PROP_LINECOUNT
2635 }
2636
2637 CellControllerRef DbListBox::CreateController() const
2638 {
2639     return new ListBoxCellController(static_cast<ListBoxControl*>(m_pWindow.get()));
2640 }
2641
2642 OUString DbListBox::GetFormatText(const Reference< css::sdb::XColumn >& _rxField, const Reference< XNumberFormatter >& /*xFormatter*/, const Color** /*ppColor*/)
2643 {
2644     OUString sText;
2645     if ( _rxField.is() )
2646     {
2647         try
2648         {
2649             sText = _rxField->getString();
2650             if ( m_bBound )
2651             {
2652                 sal_Int32 nPos = ::comphelper::findValue( m_aValueList, sText );
2653                 if ( nPos != -1 )
2654                     sText = static_cast<svt::ListBoxControl*>(m_pWindow.get())->get_widget().get_text(nPos);
2655                 else
2656                     sText.clear();
2657             }
2658         }
2659         catch( const Exception& )
2660         {
2661             DBG_UNHANDLED_EXCEPTION("svx");
2662         }
2663     }
2664     return sText;
2665 }
2666
2667 void DbListBox::UpdateFromField(const Reference< css::sdb::XColumn >& _rxField, const Reference< XNumberFormatter >& xFormatter)
2668 {
2669     OUString sFormattedText( GetFormatText( _rxField, xFormatter ) );
2670     weld::ComboBox& rComboBox = static_cast<ListBoxControl*>(m_pWindow.get())->get_widget();
2671     if (!sFormattedText.isEmpty())
2672         rComboBox.set_active_text(sFormattedText);
2673     else
2674         rComboBox.set_active(-1);
2675 }
2676
2677 void DbListBox::updateFromModel( Reference< XPropertySet > _rxModel )
2678 {
2679     OSL_ENSURE( _rxModel.is() && m_pWindow, "DbListBox::updateFromModel: invalid call!" );
2680
2681     Sequence< sal_Int16 > aSelection;
2682     _rxModel->getPropertyValue( FM_PROP_SELECT_SEQ ) >>= aSelection;
2683
2684     sal_Int16 nSelection = -1;
2685     if ( aSelection.hasElements() )
2686         nSelection = aSelection[ 0 ];
2687
2688     ListBoxControl* pControl = static_cast<ListBoxControl*>(m_pWindow.get());
2689     weld::ComboBox& rComboBox = pControl->get_widget();
2690
2691     int nOldActive = rComboBox.get_active();
2692     if (nSelection >= 0 && nSelection < rComboBox.get_count())
2693         rComboBox.set_active(nSelection);
2694     else
2695         rComboBox.set_active(-1);
2696
2697     if (nOldActive != rComboBox.get_active())
2698         pControl->TriggerAuxModify();
2699 }
2700
2701 bool DbListBox::commitControl()
2702 {
2703     Any aVal;
2704     Sequence<sal_Int16> aSelectSeq;
2705     weld::ComboBox& rComboBox = static_cast<ListBoxControl*>(m_pWindow.get())->get_widget();
2706     auto nActive = rComboBox.get_active();
2707     if (nActive != -1)
2708     {
2709         aSelectSeq.realloc(1);
2710         *aSelectSeq.getArray() = static_cast<sal_Int16>(nActive);
2711     }
2712     aVal <<= aSelectSeq;
2713     m_rColumn.getModel()->setPropertyValue(FM_PROP_SELECT_SEQ, aVal);
2714     return true;
2715 }
2716
2717 DbFilterField::DbFilterField(const Reference< XComponentContext >& rxContext,DbGridColumn& _rColumn)
2718               :DbCellControl(_rColumn)
2719               ,OSQLParserClient(rxContext)
2720               ,m_nControlClass(css::form::FormComponentType::TEXTFIELD)
2721               ,m_bFilterList(false)
2722               ,m_bFilterListFilled(false)
2723 {
2724
2725     setAlignedController( false );
2726 }
2727
2728 DbFilterField::~DbFilterField()
2729 {
2730     if (m_nControlClass == css::form::FormComponentType::CHECKBOX)
2731         static_cast<CheckBoxControl*>(m_pWindow.get())->SetToggleHdl(Link<weld::CheckButton&,void>());
2732
2733 }
2734
2735 void DbFilterField::PaintCell(OutputDevice& rDev, const tools::Rectangle& rRect)
2736 {
2737     static const DrawTextFlags nStyle = DrawTextFlags::Clip | DrawTextFlags::VCenter | DrawTextFlags::Left;
2738     switch (m_nControlClass)
2739     {
2740         case FormComponentType::CHECKBOX:
2741         {
2742             // center the checkbox within the space available
2743             CheckBoxControl* pControl = static_cast<CheckBoxControl*>(m_pPainter.get());
2744             Size aBoxSize = pControl->GetBox().get_preferred_size();
2745             tools::Rectangle aRect(Point(rRect.Left() + ((rRect.GetWidth() - aBoxSize.Width()) / 2),
2746                                          rRect.Top() + ((rRect.GetHeight() - aBoxSize.Height()) / 2)),
2747                                    aBoxSize);
2748
2749             DbCellControl::PaintCell(rDev, aRect);
2750             break;
2751         }
2752         case FormComponentType::LISTBOX:
2753             rDev.DrawText(rRect, static_cast<ListBoxControl*>(m_pWindow.get())->get_widget().get_active_text(), nStyle);
2754             break;
2755         default:
2756             rDev.DrawText(rRect, m_aText, nStyle);
2757     }
2758 }
2759
2760 void DbFilterField::SetList(const Any& rItems, bool bComboBox)
2761 {
2762     css::uno::Sequence<OUString> aTest;
2763     rItems >>= aTest;
2764     if (!aTest.hasElements())
2765         return;
2766
2767     if (bComboBox)
2768     {
2769         ComboBoxControl* pField = static_cast<ComboBoxControl*>(m_pWindow.get());
2770         weld::ComboBox& rComboBox = pField->get_widget();
2771         for (const OUString& rString : std::as_const(aTest))
2772             rComboBox.append_text(rString);
2773     }
2774     else
2775     {
2776         ListBoxControl* pField = static_cast<ListBoxControl*>(m_pWindow.get());
2777         weld::ComboBox& rFieldBox = pField->get_widget();
2778         for (const OUString& rString : std::as_const(aTest))
2779             rFieldBox.append_text(rString);
2780
2781         m_rColumn.getModel()->getPropertyValue(FM_PROP_VALUE_SEQ) >>= m_aValueList;
2782     }
2783 }
2784
2785 void DbFilterField::CreateControl(BrowserDataWin* pParent, const Reference< css::beans::XPropertySet >& xModel)
2786 {
2787     switch (m_nControlClass)
2788     {
2789         case css::form::FormComponentType::CHECKBOX:
2790             m_pWindow = VclPtr<CheckBoxControl>::Create(pParent);
2791             m_pWindow->SetPaintTransparent( true );
2792             static_cast<CheckBoxControl*>(m_pWindow.get())->SetToggleHdl(LINK(this, DbFilterField, OnToggle));
2793
2794             m_pPainter = VclPtr<CheckBoxControl>::Create(pParent);
2795             m_pPainter->SetPaintTransparent( true );
2796             m_pPainter->SetBackground();
2797             break;
2798         case css::form::FormComponentType::LISTBOX:
2799         {
2800             m_pWindow = VclPtr<ListBoxControl>::Create(pParent);
2801             Any  aItems = xModel->getPropertyValue(FM_PROP_STRINGITEMLIST);
2802             SetList(aItems, false);
2803         }   break;
2804         case css::form::FormComponentType::COMBOBOX:
2805         {
2806             m_pWindow = VclPtr<ComboBoxControl>::Create(pParent);
2807
2808             AllSettings     aSettings = m_pWindow->GetSettings();
2809             StyleSettings   aStyleSettings = aSettings.GetStyleSettings();
2810             aStyleSettings.SetSelectionOptions(
2811                            aStyleSettings.GetSelectionOptions() | SelectionOptions::ShowFirst);
2812             aSettings.SetStyleSettings(aStyleSettings);
2813             m_pWindow->SetSettings(aSettings, true);
2814
2815             if (!m_bFilterList)
2816             {
2817                 Any aItems = xModel->getPropertyValue(FM_PROP_STRINGITEMLIST);
2818                 SetList(aItems, true);
2819             }
2820
2821         }   break;
2822         default:
2823         {
2824             m_pWindow  = VclPtr<EditControl>::Create(pParent);
2825             AllSettings     aSettings = m_pWindow->GetSettings();
2826             StyleSettings   aStyleSettings = aSettings.GetStyleSettings();
2827             aStyleSettings.SetSelectionOptions(
2828                            aStyleSettings.GetSelectionOptions() | SelectionOptions::ShowFirst);
2829             aSettings.SetStyleSettings(aStyleSettings);
2830             m_pWindow->SetSettings(aSettings, true);
2831         }
2832     }
2833 }
2834
2835 void DbFilterField::Init(BrowserDataWin& rParent, const Reference< XRowSet >& xCursor)
2836 {
2837     Reference< css::beans::XPropertySet >  xModel(m_rColumn.getModel());
2838     m_rColumn.SetAlignment(css::awt::TextAlign::LEFT);
2839
2840     if (xModel.is())
2841     {
2842         m_bFilterList = ::comphelper::hasProperty(FM_PROP_FILTERPROPOSAL, xModel) && ::comphelper::getBOOL(xModel->getPropertyValue(FM_PROP_FILTERPROPOSAL));
2843         if (m_bFilterList)
2844             m_nControlClass = css::form::FormComponentType::COMBOBOX;
2845         else
2846         {
2847             sal_Int16 nClassId = ::comphelper::getINT16(xModel->getPropertyValue(FM_PROP_CLASSID));
2848             switch (nClassId)
2849             {
2850                 case FormComponentType::CHECKBOX:
2851                 case FormComponentType::LISTBOX:
2852                 case FormComponentType::COMBOBOX:
2853                     m_nControlClass = nClassId;
2854                     break;
2855                 default:
2856                     if (m_bFilterList)
2857                         m_nControlClass = FormComponentType::COMBOBOX;
2858                     else
2859                         m_nControlClass = FormComponentType::TEXTFIELD;
2860             }
2861         }
2862     }
2863
2864     CreateControl( &rParent, xModel );
2865     DbCellControl::Init( rParent, xCursor );
2866
2867     // filter cells are never readonly
2868     m_pWindow->SetEditableReadOnly(false);
2869 }
2870
2871 CellControllerRef DbFilterField::CreateController() const
2872 {
2873     CellControllerRef xController;
2874     switch (m_nControlClass)
2875     {
2876         case css::form::FormComponentType::CHECKBOX:
2877             xController = new CheckBoxCellController(static_cast<CheckBoxControl*>(m_pWindow.get()));
2878             break;
2879         case css::form::FormComponentType::LISTBOX:
2880             xController = new ListBoxCellController(static_cast<ListBoxControl*>(m_pWindow.get()));
2881             break;
2882         case css::form::FormComponentType::COMBOBOX:
2883             xController = new ComboBoxCellController(static_cast<ComboBoxControl*>(m_pWindow.get()));
2884             break;
2885         default:
2886             if (m_bFilterList)
2887                 xController = new ComboBoxCellController(static_cast<ComboBoxControl*>(m_pWindow.get()));
2888             else
2889                 xController = new EditCellController(static_cast<EditControlBase*>(m_pWindow.get()));
2890     }
2891     return xController;
2892 }
2893
2894 void DbFilterField::updateFromModel( Reference< XPropertySet > _rxModel )
2895 {
2896     OSL_ENSURE( _rxModel.is() && m_pWindow, "DbFilterField::updateFromModel: invalid call!" );
2897
2898     OSL_FAIL( "DbFilterField::updateFromModel: not implemented yet (how the hell did you reach this?)!" );
2899     // TODO: implement this.
2900     // remember: updateFromModel should be some kind of opposite of commitControl
2901 }
2902
2903 bool DbFilterField::commitControl()
2904 {
2905     OUString aText(m_aText);
2906     switch (m_nControlClass)
2907     {
2908         case css::form::FormComponentType::CHECKBOX:
2909             return true;
2910         case css::form::FormComponentType::LISTBOX:
2911         {
2912             aText.clear();
2913             weld::ComboBox& rComboBox = static_cast<svt::ListBoxControl*>(m_pWindow.get())->get_widget();
2914             auto nActive = rComboBox.get_active();
2915             if (nActive != -1)
2916             {
2917                 sal_Int16 nPos = static_cast<sal_Int16>(nActive);
2918                 if ( ( nPos >= 0 ) && ( nPos < m_aValueList.getLength() ) )
2919                     aText = m_aValueList.getConstArray()[nPos];
2920             }
2921
2922             if (m_aText != aText)
2923             {
2924                 m_aText = aText;
2925                 m_aCommitLink.Call(*this);
2926             }
2927             return true;
2928         }
2929         case css::form::FormComponentType::COMBOBOX:
2930         {
2931             aText = static_cast<ComboBoxControl*>(m_pWindow.get())->get_widget().get_active_text();
2932             break;
2933         }
2934         default:
2935         {
2936             aText = static_cast<EditControlBase*>(m_pWindow.get())->get_widget().get_text();
2937             break;
2938         }
2939     }
2940
2941     if (m_aText != aText)
2942     {
2943         // check the text with the SQL-Parser
2944         OUString aNewText(comphelper::string::stripEnd(aText, ' '));
2945         if (!aNewText.isEmpty())
2946         {
2947             OUString aErrorMsg;
2948             Reference< XNumberFormatter >  xNumberFormatter(m_rColumn.GetParent().getNumberFormatter());
2949
2950             std::unique_ptr< OSQLParseNode > pParseNode = predicateTree(aErrorMsg, aNewText,xNumberFormatter, m_rColumn.GetField());
2951             if (pParseNode != nullptr)
2952             {
2953                 OUString aPreparedText;
2954
2955                 css::lang::Locale aAppLocale = Application::GetSettings().GetUILanguageTag().getLocale();
2956
2957                 Reference< XRowSet > xDataSourceRowSet(
2958                     Reference< XInterface >(*m_rColumn.GetParent().getDataSource()), UNO_QUERY);
2959                 Reference< XConnection >  xConnection(getConnection(xDataSourceRowSet));
2960
2961                 pParseNode->parseNodeToPredicateStr(aPreparedText,
2962                                                     xConnection,
2963                                                     xNumberFormatter,
2964                                                     m_rColumn.GetField(),
2965                                                     OUString(),
2966                                                     aAppLocale,
2967                                                     OUString("."),
2968                                                     getParseContext());
2969                 m_aText = aPreparedText;
2970             }
2971             else
2972             {
2973
2974                 SQLException aError;
2975                 aError.Message = aErrorMsg;
2976                 displayException(aError, VCLUnoHelper::GetInterface(m_pWindow->GetParent()));
2977                     // TODO: transport the title
2978
2979                 return false;
2980             }
2981         }
2982         else
2983             m_aText = aText;
2984
2985         m_pWindow->SetText(m_aText);
2986         m_aCommitLink.Call(*this);
2987     }
2988     return true;
2989 }
2990
2991
2992 void DbFilterField::SetText(const OUString& rText)
2993 {
2994     m_aText = rText;
2995     switch (m_nControlClass)
2996     {
2997         case css::form::FormComponentType::CHECKBOX:
2998         {
2999             TriState eState;
3000             if (rText == "1")
3001                 eState = TRISTATE_TRUE;
3002             else if (rText == "0")
3003                 eState = TRISTATE_FALSE;
3004             else
3005                 eState = TRISTATE_INDET;
3006
3007             static_cast<CheckBoxControl*>(m_pWindow.get())->SetState(eState);
3008             static_cast<CheckBoxControl*>(m_pPainter.get())->SetState(eState);
3009         }   break;
3010         case css::form::FormComponentType::LISTBOX:
3011         {
3012             sal_Int32 nPos = ::comphelper::findValue(m_aValueList, m_aText);
3013             static_cast<ListBoxControl*>(m_pWindow.get())->get_widget().set_active(nPos);
3014         }   break;
3015         case css::form::FormComponentType::COMBOBOX:
3016         {
3017             static_cast<ComboBoxControl*>(m_pWindow.get())->get_widget().set_entry_text(m_aText);
3018             break;
3019         }
3020         default:
3021         {
3022             static_cast<EditControlBase*>(m_pWindow.get())->get_widget().set_text(m_aText);
3023             break;
3024         }
3025     }
3026
3027     // now force a repaint on the window
3028     m_rColumn.GetParent().RowModified(0);
3029 }
3030
3031
3032 void DbFilterField::Update()
3033 {
3034     // should we fill the combobox with a filter proposal?
3035     if (!m_bFilterList || m_bFilterListFilled)
3036         return;
3037
3038     m_bFilterListFilled = true;
3039     Reference< css::beans::XPropertySet >  xField = m_rColumn.GetField();
3040     if (!xField.is())
3041         return;
3042
3043     OUString aName;
3044     xField->getPropertyValue(FM_PROP_NAME) >>= aName;
3045
3046     // the columnmodel
3047     Reference< css::container::XChild >  xModelAsChild(m_rColumn.getModel(), UNO_QUERY);
3048     // the grid model
3049     xModelAsChild.set(xModelAsChild->getParent(),UNO_QUERY);
3050     Reference< XRowSet >  xForm(xModelAsChild->getParent(), UNO_QUERY);
3051     if (!xForm.is())
3052         return;
3053
3054     Reference<XPropertySet> xFormProp(xForm,UNO_QUERY);
3055     Reference< XTablesSupplier > xSupTab;
3056     xFormProp->getPropertyValue("SingleSelectQueryComposer") >>= xSupTab;
3057
3058     Reference< XConnection >  xConnection(getConnection(xForm));
3059     if (!xSupTab.is())
3060         return;
3061
3062     // search the field
3063     Reference< XColumnsSupplier > xSupCol(xSupTab,UNO_QUERY);
3064     Reference< css::container::XNameAccess >    xFieldNames = xSupCol->getColumns();
3065     if (!xFieldNames->hasByName(aName))
3066         return;
3067
3068     Reference< css::container::XNameAccess >    xTablesNames = xSupTab->getTables();
3069     Reference< css::beans::XPropertySet >       xComposerFieldAsSet(xFieldNames->getByName(aName),UNO_QUERY);
3070
3071     if (!xComposerFieldAsSet.is() ||
3072         !::comphelper::hasProperty(FM_PROP_TABLENAME, xComposerFieldAsSet) ||
3073         !::comphelper::hasProperty(FM_PROP_FIELDSOURCE, xComposerFieldAsSet))
3074         return;
3075
3076     OUString aFieldName;
3077     OUString aTableName;
3078     xComposerFieldAsSet->getPropertyValue(FM_PROP_FIELDSOURCE)  >>= aFieldName;
3079     xComposerFieldAsSet->getPropertyValue(FM_PROP_TABLENAME)    >>= aTableName;
3080
3081     // no possibility to create a select statement
3082     // looking for the complete table name
3083     if (!xTablesNames->hasByName(aTableName))
3084         return;
3085
3086     // build a statement and send as query;
3087     // Access to the connection
3088     Reference< XStatement >  xStatement;
3089     Reference< XResultSet >  xListCursor;
3090     Reference< css::sdb::XColumn >  xDataField;
3091
3092     try
3093     {
3094         Reference< XDatabaseMetaData >  xMeta = xConnection->getMetaData();
3095
3096         OUString aQuote(xMeta->getIdentifierQuoteString());
3097         OUStringBuffer aStatement("SELECT DISTINCT "
3098             + quoteName(aQuote, aName));
3099         if (!aFieldName.isEmpty() && aName != aFieldName)
3100         {
3101             aStatement.append(" AS "
3102                 + quoteName(aQuote, aFieldName));
3103         }
3104
3105         aStatement.append(" FROM ");
3106
3107         Reference< XPropertySet > xTableNameAccess(xTablesNames->getByName(aTableName), UNO_QUERY_THROW);
3108         aStatement.append(composeTableNameForSelect(xConnection, xTableNameAccess));
3109
3110         xStatement = xConnection->createStatement();
3111         Reference< css::beans::XPropertySet >  xStatementProps(xStatement, UNO_QUERY);
3112         xStatementProps->setPropertyValue(FM_PROP_ESCAPE_PROCESSING, Any(true));
3113
3114         xListCursor = xStatement->executeQuery(aStatement.makeStringAndClear());
3115
3116         Reference< css::sdbcx::XColumnsSupplier >  xSupplyCols(xListCursor, UNO_QUERY);
3117         Reference< css::container::XIndexAccess >  xFields(xSupplyCols->getColumns(), UNO_QUERY);
3118         xDataField.set(xFields->getByIndex(0), css::uno::UNO_QUERY);
3119         if (!xDataField.is())
3120             return;
3121     }
3122     catch(const Exception&)
3123     {
3124         ::comphelper::disposeComponent(xStatement);
3125         return;
3126     }
3127
3128     sal_Int16 i = 0;
3129     ::std::vector< OUString >   aStringList;
3130     aStringList.reserve(16);
3131     OUString aStr;
3132     css::util::Date aNullDate = m_rColumn.GetParent().getNullDate();
3133     sal_Int32 nFormatKey = m_rColumn.GetKey();
3134     Reference< XNumberFormatter >  xFormatter = m_rColumn.GetParent().getNumberFormatter();
3135     sal_Int16 nKeyType = ::comphelper::getNumberFormatType(xFormatter->getNumberFormatsSupplier()->getNumberFormats(), nFormatKey);
3136
3137     while (!xListCursor->isAfterLast() && i++ < SHRT_MAX) // max number of entries
3138     {
3139         aStr = getFormattedValue(xDataField, xFormatter, aNullDate, nFormatKey, nKeyType);
3140         aStringList.push_back(aStr);
3141         (void)xListCursor->next();
3142     }
3143
3144     ComboBoxControl* pField = static_cast<ComboBoxControl*>(m_pWindow.get());
3145     weld::ComboBox& rComboBox = pField->get_widget();
3146     // filling the entries for the combobox
3147     for (const auto& rString : aStringList)
3148         rComboBox.append_text(rString);
3149 }
3150
3151 OUString DbFilterField::GetFormatText(const Reference< XColumn >& /*_rxField*/, const Reference< XNumberFormatter >& /*xFormatter*/, const Color** /*ppColor*/)
3152 {
3153     return OUString();
3154 }
3155
3156 void DbFilterField::UpdateFromField(const Reference< XColumn >& /*_rxField*/, const Reference< XNumberFormatter >& /*xFormatter*/)
3157 {
3158     OSL_FAIL( "DbFilterField::UpdateFromField: cannot update a filter control from a field!" );
3159 }
3160
3161 IMPL_LINK_NOARG(DbFilterField, OnToggle, weld::CheckButton&, void)
3162 {
3163     TriState eState = static_cast<CheckBoxControl*>(m_pWindow.get())->GetState();
3164     OUStringBuffer aTextBuf;
3165
3166     Reference< XRowSet > xDataSourceRowSet(
3167                     Reference< XInterface >(*m_rColumn.GetParent().getDataSource()), UNO_QUERY);
3168     Reference< XConnection >  xConnection(getConnection(xDataSourceRowSet));
3169     const sal_Int32 nBooleanComparisonMode = ::dbtools::DatabaseMetaData( xConnection ).getBooleanComparisonMode();
3170
3171     switch (eState)
3172     {
3173         case TRISTATE_TRUE:
3174             ::dbtools::getBooleanComparisonPredicate(u"", true, nBooleanComparisonMode, aTextBuf);
3175             break;
3176         case TRISTATE_FALSE:
3177             ::dbtools::getBooleanComparisonPredicate(u"", false, nBooleanComparisonMode, aTextBuf);
3178             break;
3179         case TRISTATE_INDET:
3180             break;
3181     }
3182
3183     const OUString aText(aTextBuf.makeStringAndClear());
3184
3185     if (m_aText != aText)
3186     {
3187         m_aText = aText;
3188         m_aCommitLink.Call(*this);
3189     }
3190 }
3191
3192 FmXGridCell::FmXGridCell( DbGridColumn* pColumn, std::unique_ptr<DbCellControl> _pControl )
3193             :OComponentHelper(m_aMutex)
3194             ,m_pColumn(pColumn)
3195             ,m_pCellControl( std::move(_pControl) )
3196             ,m_aWindowListeners( m_aMutex )
3197             ,m_aFocusListeners( m_aMutex )
3198             ,m_aKeyListeners( m_aMutex )
3199             ,m_aMouseListeners( m_aMutex )
3200             ,m_aMouseMotionListeners( m_aMutex )
3201 {
3202 }
3203
3204 void FmXGridCell::init()
3205 {
3206     svt::ControlBase* pEventWindow( getEventWindow() );
3207     if ( pEventWindow )
3208     {
3209         pEventWindow->SetFocusInHdl(LINK( this, FmXGridCell, OnFocusGained));
3210         pEventWindow->SetFocusOutHdl(LINK( this, FmXGridCell, OnFocusLost));
3211         pEventWindow->SetMousePressHdl(LINK( this, FmXGridCell, OnMousePress));
3212         pEventWindow->SetMouseReleaseHdl(LINK( this, FmXGridCell, OnMouseRelease));
3213         pEventWindow->SetMouseMoveHdl(LINK( this, FmXGridCell, OnMouseMove));
3214         pEventWindow->SetKeyInputHdl( LINK( this, FmXGridCell, OnKeyInput) );
3215         pEventWindow->SetKeyReleaseHdl( LINK( this, FmXGridCell, OnKeyRelease) );
3216     }
3217 }
3218
3219 svt::ControlBase* FmXGridCell::getEventWindow() const
3220 {
3221     if ( m_pCellControl )
3222         return &m_pCellControl->GetWindow();
3223     return nullptr;
3224 }
3225
3226 FmXGridCell::~FmXGridCell()
3227 {
3228     if (!OComponentHelper::rBHelper.bDisposed)
3229     {
3230         acquire();
3231         dispose();
3232     }
3233
3234 }
3235
3236 void FmXGridCell::SetTextLineColor()
3237 {
3238     if (m_pCellControl)
3239         m_pCellControl->SetTextLineColor();
3240 }
3241
3242 void FmXGridCell::SetTextLineColor(const Color& _rColor)
3243 {
3244     if (m_pCellControl)
3245         m_pCellControl->SetTextLineColor(_rColor);
3246 }
3247
3248 // XTypeProvider
3249
3250 Sequence< Type > SAL_CALL FmXGridCell::getTypes( )
3251 {
3252     Sequence< uno::Type > aTypes = ::comphelper::concatSequences(
3253         ::cppu::OComponentHelper::getTypes(),
3254         FmXGridCell_Base::getTypes()
3255     );
3256     if ( m_pCellControl )
3257         aTypes = ::comphelper::concatSequences(
3258             aTypes,
3259             FmXGridCell_WindowBase::getTypes()
3260         );
3261     return aTypes;
3262 }
3263
3264
3265 IMPLEMENT_GET_IMPLEMENTATION_ID( FmXGridCell )
3266
3267 // OComponentHelper
3268
3269 void FmXGridCell::disposing()
3270 {
3271     lang::EventObject aEvent( *this );
3272     m_aWindowListeners.disposeAndClear( aEvent );
3273     m_aFocusListeners.disposeAndClear( aEvent );
3274     m_aKeyListeners.disposeAndClear( aEvent );
3275     m_aMouseListeners.disposeAndClear( aEvent );
3276     m_aMouseMotionListeners.disposeAndClear( aEvent );
3277
3278     OComponentHelper::disposing();
3279     m_pColumn = nullptr;
3280     m_pCellControl.reset();
3281 }
3282
3283
3284 Any SAL_CALL FmXGridCell::queryAggregation( const css::uno::Type& _rType )
3285 {
3286     Any aReturn = OComponentHelper::queryAggregation( _rType );
3287
3288     if ( !aReturn.hasValue() )
3289         aReturn = FmXGridCell_Base::queryInterface( _rType );
3290
3291     if ( !aReturn.hasValue() && ( m_pCellControl != nullptr ) )
3292         aReturn = FmXGridCell_WindowBase::queryInterface( _rType );
3293
3294     return aReturn;
3295 }
3296
3297 // css::awt::XControl
3298
3299 Reference< XInterface >  FmXGridCell::getContext()
3300 {
3301     return Reference< XInterface > ();
3302 }
3303
3304
3305 Reference< css::awt::XControlModel >  FmXGridCell::getModel()
3306 {
3307     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3308     return Reference< css::awt::XControlModel > (m_pColumn->getModel(), UNO_QUERY);
3309 }
3310
3311 // css::form::XBoundControl
3312
3313 sal_Bool FmXGridCell::getLock()
3314 {
3315     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3316     return m_pColumn->isLocked();
3317 }
3318
3319
3320 void FmXGridCell::setLock(sal_Bool _bLock)
3321 {
3322     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3323     if (getLock() == _bLock)
3324         return;
3325     else
3326     {
3327         ::osl::MutexGuard aGuard(m_aMutex);
3328         m_pColumn->setLock(_bLock);
3329     }
3330 }
3331
3332
3333 void SAL_CALL FmXGridCell::setPosSize( ::sal_Int32, ::sal_Int32, ::sal_Int32, ::sal_Int32, ::sal_Int16 )
3334 {
3335     OSL_FAIL( "FmXGridCell::setPosSize: not implemented" );
3336     // not allowed to tamper with this for a grid cell
3337 }
3338
3339
3340 awt::Rectangle SAL_CALL FmXGridCell::getPosSize(  )
3341 {
3342     OSL_FAIL( "FmXGridCell::getPosSize: not implemented" );
3343     return awt::Rectangle();
3344 }
3345
3346
3347 void SAL_CALL FmXGridCell::setVisible( sal_Bool )
3348 {
3349     OSL_FAIL( "FmXGridCell::setVisible: not implemented" );
3350     // not allowed to tamper with this for a grid cell
3351 }
3352
3353
3354 void SAL_CALL FmXGridCell::setEnable( sal_Bool )
3355 {
3356     OSL_FAIL( "FmXGridCell::setEnable: not implemented" );
3357     // not allowed to tamper with this for a grid cell
3358 }
3359
3360
3361 void SAL_CALL FmXGridCell::setFocus(  )
3362 {
3363     OSL_FAIL( "FmXGridCell::setFocus: not implemented" );
3364     // not allowed to tamper with this for a grid cell
3365 }
3366
3367
3368 void SAL_CALL FmXGridCell::addWindowListener( const Reference< awt::XWindowListener >& _rxListener )
3369 {
3370     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3371     m_aWindowListeners.addInterface( _rxListener );
3372 }
3373
3374
3375 void SAL_CALL FmXGridCell::removeWindowListener( const Reference< awt::XWindowListener >& _rxListener )
3376 {
3377     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3378     m_aWindowListeners.removeInterface( _rxListener );
3379 }
3380
3381
3382 void SAL_CALL FmXGridCell::addFocusListener( const Reference< awt::XFocusListener >& _rxListener )
3383 {
3384     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3385     m_aFocusListeners.addInterface( _rxListener );
3386 }
3387
3388
3389 void SAL_CALL FmXGridCell::removeFocusListener( const Reference< awt::XFocusListener >& _rxListener )
3390 {
3391     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3392     m_aFocusListeners.removeInterface( _rxListener );
3393 }
3394
3395
3396 void SAL_CALL FmXGridCell::addKeyListener( const Reference< awt::XKeyListener >& _rxListener )
3397 {
3398     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3399     m_aKeyListeners.addInterface( _rxListener );
3400 }
3401
3402
3403 void SAL_CALL FmXGridCell::removeKeyListener( const Reference< awt::XKeyListener >& _rxListener )
3404 {
3405     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3406     m_aKeyListeners.removeInterface( _rxListener );
3407 }
3408
3409
3410 void SAL_CALL FmXGridCell::addMouseListener( const Reference< awt::XMouseListener >& _rxListener )
3411 {
3412     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3413     m_aMouseListeners.addInterface( _rxListener );
3414 }
3415
3416
3417 void SAL_CALL FmXGridCell::removeMouseListener( const Reference< awt::XMouseListener >& _rxListener )
3418 {
3419     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3420     m_aMouseListeners.removeInterface( _rxListener );
3421 }
3422
3423
3424 void SAL_CALL FmXGridCell::addMouseMotionListener( const Reference< awt::XMouseMotionListener >& _rxListener )
3425 {
3426     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3427     m_aMouseMotionListeners.addInterface( _rxListener );
3428 }
3429
3430
3431 void SAL_CALL FmXGridCell::removeMouseMotionListener( const Reference< awt::XMouseMotionListener >& _rxListener )
3432 {
3433     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3434     m_aMouseMotionListeners.removeInterface( _rxListener );
3435 }
3436
3437 void SAL_CALL FmXGridCell::addPaintListener( const Reference< awt::XPaintListener >& )
3438 {
3439     OSL_FAIL( "FmXGridCell::addPaintListener: not implemented" );
3440 }
3441
3442 void SAL_CALL FmXGridCell::removePaintListener( const Reference< awt::XPaintListener >& )
3443 {
3444     OSL_FAIL( "FmXGridCell::removePaintListener: not implemented" );
3445 }
3446
3447 void FmXGridCell::onFocusGained( const awt::FocusEvent& _rEvent )
3448 {
3449     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3450     m_aFocusListeners.notifyEach( &awt::XFocusListener::focusGained, _rEvent );
3451 }
3452
3453 void FmXGridCell::onFocusLost( const awt::FocusEvent& _rEvent )
3454 {
3455     checkDisposed(OComponentHelper::rBHelper.bDisposed);
3456     m_aFocusListeners.notifyEach( &awt::XFocusListener::focusLost, _rEvent );
3457 }
3458
3459 IMPL_LINK_NOARG(FmXGridCell, OnFocusGained, LinkParamNone*, void)
3460 {
3461     if (!m_aFocusListeners.getLength())
3462         return;
3463
3464     awt::FocusEvent aEvent;
3465     aEvent.Source = *this;
3466     aEvent.Temporary = false;
3467
3468     onFocusGained(aEvent);
3469 }
3470
3471 IMPL_LINK_NOARG(FmXGridCell, OnFocusLost, LinkParamNone*, void)
3472 {
3473     if (!m_aFocusListeners.getLength())
3474         return;
3475
3476     awt::FocusEvent aEvent;
3477     aEvent.Source = *this;
3478     aEvent.Temporary = false;
3479
3480     onFocusLost(aEvent);
3481 }
3482
3483 IMPL_LINK(FmXGridCell, OnMousePress, const MouseEvent&, rEventData, void)
3484 {
3485     if (!m_aMouseListeners.getLength())
3486         return;
3487
3488     awt::MouseEvent aEvent(VCLUnoHelper::createMouseEvent(rEventData, *this));
3489     m_aMouseListeners.notifyEach(&awt::XMouseListener::mousePressed, aEvent);
3490 }
3491
3492 IMPL_LINK(FmXGridCell, OnMouseRelease, const MouseEvent&, rEventData, void)
3493 {
3494     if (!m_aMouseListeners.getLength())
3495         return;
3496
3497     awt::MouseEvent aEvent(VCLUnoHelper::createMouseEvent(rEventData, *this));
3498     m_aMouseListeners.notifyEach(&awt::XMouseListener::mouseReleased, aEvent);
3499 }
3500
3501 IMPL_LINK(FmXGridCell, OnMouseMove, const MouseEvent&, rMouseEvent, void)
3502 {
3503     if ( rMouseEvent.IsEnterWindow() || rMouseEvent.IsLeaveWindow() )
3504     {
3505         if ( m_aMouseListeners.getLength() != 0 )
3506         {
3507             awt::MouseEvent aEvent( VCLUnoHelper::createMouseEvent( rMouseEvent, *this ) );
3508             m_aMouseListeners.notifyEach( rMouseEvent.IsEnterWindow() ? &awt::XMouseListener::mouseEntered: &awt::XMouseListener::mouseExited, aEvent );
3509         }
3510     }
3511     else if ( !rMouseEvent.IsEnterWindow() && !rMouseEvent.IsLeaveWindow() )
3512     {
3513         if ( m_aMouseMotionListeners.getLength() != 0 )
3514         {
3515             awt::MouseEvent aEvent( VCLUnoHelper::createMouseEvent( rMouseEvent, *this ) );
3516             aEvent.ClickCount = 0;
3517             const bool bSimpleMove = bool( rMouseEvent.GetMode() & MouseEventModifiers::SIMPLEMOVE );
3518             m_aMouseMotionListeners.notifyEach( bSimpleMove ? &awt::XMouseMotionListener::mouseMoved: &awt::XMouseMotionListener::mouseDragged, aEvent );
3519         }
3520     }
3521 }
3522
3523 IMPL_LINK(FmXGridCell, OnKeyInput, const KeyEvent&, rEventData, void)
3524 {
3525     if (!m_aKeyListeners.getLength())
3526         return;
3527
3528     awt::KeyEvent aEvent(VCLUnoHelper::createKeyEvent(rEventData, *this));
3529     m_aKeyListeners.notifyEach(&awt::XKeyListener::keyPressed, aEvent);
3530 }
3531
3532 IMPL_LINK(FmXGridCell, OnKeyRelease, const KeyEvent&, rEventData, void)
3533 {
3534     if (!m_aKeyListeners.getLength())
3535         return;
3536
3537     awt::KeyEvent aEvent(VCLUnoHelper::createKeyEvent(rEventData, *this));
3538     m_aKeyListeners.notifyEach(&awt::XKeyListener::keyReleased, aEvent);
3539 }
3540
3541 void FmXDataCell::PaintFieldToCell(OutputDevice& rDev, const tools::Rectangle& rRect,
3542                         const Reference< css::sdb::XColumn >& _rxField,
3543                         const Reference< XNumberFormatter >& xFormatter)
3544 {
3545     m_pCellControl->PaintFieldToCell( rDev, rRect, _rxField, xFormatter );
3546 }
3547
3548 void FmXDataCell::UpdateFromColumn()
3549 {
3550     Reference< css::sdb::XColumn >  xField(m_pColumn->GetCurrentFieldValue());
3551     if (xField.is())
3552         m_pCellControl->UpdateFromField(xField, m_pColumn->GetParent().getNumberFormatter());
3553 }
3554
3555 FmXTextCell::FmXTextCell( DbGridColumn* pColumn, std::unique_ptr<DbCellControl> pControl )
3556     :FmXDataCell( pColumn, std::move(pControl) )
3557     ,m_bIsMultiLineText(false)
3558 {
3559 }
3560
3561 void FmXTextCell::PaintFieldToCell(OutputDevice& rDev,
3562                         const tools::Rectangle& rRect,
3563                         const Reference< css::sdb::XColumn >& _rxField,
3564                         const Reference< XNumberFormatter >& xFormatter)
3565 {
3566     DrawTextFlags nStyle = DrawTextFlags::Clip;
3567     if ( ( rDev.GetOutDevType() == OUTDEV_WINDOW ) && !rDev.GetOwnerWindow()->IsEnabled() )
3568         nStyle |= DrawTextFlags::Disable;
3569
3570     switch (m_pColumn->GetAlignment())
3571     {
3572         case css::awt::TextAlign::RIGHT:
3573             nStyle |= DrawTextFlags::Right;
3574             break;
3575         case css::awt::TextAlign::CENTER:
3576             nStyle |= DrawTextFlags::Center;
3577             break;
3578         default:
3579             nStyle |= DrawTextFlags::Left;
3580     }
3581
3582     if (!m_bIsMultiLineText)
3583         nStyle |= DrawTextFlags::VCenter;
3584     else
3585         nStyle |= DrawTextFlags::Top | DrawTextFlags::MultiLine | DrawTextFlags::WordBreak;
3586
3587     try
3588     {
3589         const Color* pColor = nullptr;
3590         OUString aText = GetText(_rxField, xFormatter, &pColor);
3591         if (pColor != nullptr)
3592         {
3593             Color aOldTextColor( rDev.GetTextColor() );
3594             rDev.SetTextColor( *pColor );
3595             rDev.DrawText(rRect, aText, nStyle);
3596             rDev.SetTextColor( aOldTextColor );
3597         }
3598         else
3599             rDev.DrawText(rRect, aText, nStyle);
3600     }
3601     catch (const Exception&)
3602     {
3603         TOOLS_WARN_EXCEPTION("svx.fmcomp", "PaintFieldToCell");
3604     }
3605 }
3606
3607 FmXEditCell::FmXEditCell( DbGridColumn* pColumn, std::unique_ptr<DbCellControl> pControl )
3608             :FmXTextCell( pColumn, std::move(pControl) )
3609             ,m_aTextListeners(m_aMutex)
3610             ,m_aChangeListeners( m_aMutex )
3611             ,m_pEditImplementation( nullptr )
3612             ,m_bOwnEditImplementation( false )
3613 {
3614
3615     DbTextField* pTextField = dynamic_cast<DbTextField*>( m_pCellControl.get()  );
3616     if ( pTextField )
3617     {
3618
3619         m_pEditImplementation = pTextField->GetEditImplementation();
3620         m_bIsMultiLineText = pTextField->IsMultiLineEdit();
3621     }
3622     else
3623     {
3624         m_pEditImplementation = new EntryImplementation(static_cast<EditControlBase&>(m_pCellControl->GetWindow()));
3625         m_bOwnEditImplementation = true;
3626     }
3627     m_pEditImplementation->SetAuxModifyHdl(LINK(this, FmXEditCell, ModifyHdl));
3628 }
3629
3630 FmXEditCell::~FmXEditCell()
3631 {
3632     if (!OComponentHelper::rBHelper.bDisposed)
3633     {
3634         acquire();
3635         dispose();
3636     }
3637 }
3638
3639 // OComponentHelper
3640 void FmXEditCell::disposing()
3641 {
3642     css::lang::EventObject aEvt(*this);
3643     m_aTextListeners.disposeAndClear(aEvt);
3644     m_aChangeListeners.disposeAndClear(aEvt);
3645
3646     if ( m_bOwnEditImplementation )
3647         delete m_pEditImplementation;
3648     m_pEditImplementation = nullptr;
3649
3650     FmXDataCell::disposing();
3651 }
3652
3653 Any SAL_CALL FmXEditCell::queryAggregation( const css::uno::Type& _rType )
3654 {
3655     Any aReturn = FmXTextCell::queryAggregation( _rType );
3656
3657     if ( !aReturn.hasValue() )
3658         aReturn = FmXEditCell_Base::queryInterface( _rType );
3659
3660     return aReturn;
3661 }
3662
3663 Sequence< css::uno::Type > SAL_CALL FmXEditCell::getTypes(  )
3664 {
3665     return ::comphelper::concatSequences(
3666         FmXTextCell::getTypes(),
3667         FmXEditCell_Base::getTypes()
3668     );
3669 }
3670
3671 IMPLEMENT_GET_IMPLEMENTATION_ID( FmXEditCell )
3672
3673 // css::awt::XTextComponent
3674 void SAL_CALL FmXEditCell::addTextListener(const Reference< css::awt::XTextListener >& l)
3675 {
3676     m_aTextListeners.addInterface( l );
3677 }
3678
3679
3680 void SAL_CALL FmXEditCell::removeTextListener(const Reference< css::awt::XTextListener >& l)
3681 {
3682     m_aTextListeners.removeInterface( l );
3683 }
3684
3685 void SAL_CALL FmXEditCell::setText( const OUString& aText )
3686 {
3687     ::osl::MutexGuard aGuard( m_aMutex );
3688
3689     if ( m_pEditImplementation )
3690     {
3691         m_pEditImplementation->SetText( aText );
3692
3693         // In Java, a textChanged is fired as well; not in VCL.
3694         // css::awt::Toolkit must be Java-compliant...
3695         onTextChanged();
3696     }
3697 }
3698
3699 void SAL_CALL FmXEditCell::insertText(const css::awt::Selection& rSel, const OUString& aText)
3700 {
3701     ::osl::MutexGuard aGuard( m_aMutex );
3702
3703     if ( m_pEditImplementation )
3704     {
3705         m_pEditImplementation->SetSelection( Selection( rSel.Min, rSel.Max ) );
3706         m_pEditImplementation->ReplaceSelected( aText );
3707     }
3708 }
3709
3710 OUString SAL_CALL FmXEditCell::getText()
3711 {
3712     ::osl::MutexGuard aGuard( m_aMutex );
3713
3714     OUString aText;
3715     if ( m_pEditImplementation )
3716     {
3717         if ( m_pEditImplementation->GetControl().IsVisible() && m_pColumn->GetParent().getDisplaySynchron())
3718         {
3719             // if the display isn't sync with the cursor we can't ask the edit field
3720             LineEnd eLineEndFormat = getModelLineEndSetting( m_pColumn->getModel() );
3721             aText = m_pEditImplementation->GetText( eLineEndFormat );
3722         }
3723         else
3724         {
3725             Reference< css::sdb::XColumn >  xField(m_pColumn->GetCurrentFieldValue());
3726             if (xField.is())
3727                 aText = GetText(xField, m_pColumn->GetParent().getNumberFormatter());
3728         }
3729     }
3730     return aText;
3731 }
3732
3733 OUString SAL_CALL FmXEditCell::getSelectedText()
3734 {
3735     ::osl::MutexGuard aGuard( m_aMutex );
3736
3737     OUString aText;
3738     if ( m_pEditImplementation )
3739     {
3740         LineEnd eLineEndFormat = m_pColumn ? getModelLineEndSetting( m_pColumn->getModel() ) : LINEEND_LF;
3741         aText = m_pEditImplementation->GetSelected( eLineEndFormat );
3742     }
3743     return aText;
3744 }
3745
3746 void SAL_CALL FmXEditCell::setSelection( const css::awt::Selection& aSelection )
3747 {
3748     ::osl::MutexGuard aGuard( m_aMutex );
3749
3750     if ( m_pEditImplementation )
3751         m_pEditImplementation->SetSelection( Selection( aSelection.Min, aSelection.Max ) );
3752 }
3753
3754 css::awt::Selection SAL_CALL FmXEditCell::getSelection()
3755 {
3756     ::osl::MutexGuard aGuard( m_aMutex );
3757
3758     Selection aSel;
3759     if ( m_pEditImplementation )
3760         aSel = m_pEditImplementation->GetSelection();
3761
3762     return css::awt::Selection(aSel.Min(), aSel.Max());
3763 }
3764
3765 sal_Bool SAL_CALL FmXEditCell::isEditable()
3766 {
3767     ::osl::MutexGuard aGuard( m_aMutex );
3768
3769     return m_pEditImplementation && !m_pEditImplementation->IsReadOnly() && m_pEditImplementation->GetControl().IsEnabled();
3770 }
3771
3772 void SAL_CALL FmXEditCell::setEditable( sal_Bool bEditable )
3773 {
3774     ::osl::MutexGuard aGuard( m_aMutex );
3775
3776     if ( m_pEditImplementation )
3777         m_pEditImplementation->SetReadOnly( !bEditable );
3778 }
3779
3780 sal_Int16 SAL_CALL FmXEditCell::getMaxTextLen()
3781 {
3782     ::osl::MutexGuard aGuard( m_aMutex );
3783
3784     return m_pEditImplementation ? m_pEditImplementation->GetMaxTextLen() : 0;
3785 }
3786
3787 void SAL_CALL FmXEditCell::setMaxTextLen( sal_Int16 nLen )
3788 {
3789     ::osl::MutexGuard aGuard( m_aMutex );
3790
3791     if ( m_pEditImplementation )
3792         m_pEditImplementation->SetMaxTextLen( nLen );
3793 }
3794
3795 void SAL_CALL FmXEditCell::addChangeListener( const Reference< form::XChangeListener >& Listener )
3796 {
3797     m_aChangeListeners.addInterface( Listener );
3798 }
3799
3800 void SAL_CALL FmXEditCell::removeChangeListener( const Reference< form::XChangeListener >& Listener )
3801 {
3802     m_aChangeListeners.removeInterface( Listener );
3803 }
3804
3805 void FmXEditCell::onTextChanged()
3806 {
3807     css::awt::TextEvent aEvent;
3808     aEvent.Source = *this;
3809     m_aTextListeners.notifyEach( &awt::XTextListener::textChanged, aEvent );
3810 }
3811
3812 void FmXEditCell::onFocusGained( const awt::FocusEvent& _rEvent )
3813 {
3814     FmXTextCell::onFocusGained( _rEvent );
3815     m_sValueOnEnter = getText();
3816 }
3817
3818 void FmXEditCell::onFocusLost( const awt::FocusEvent& _rEvent )
3819 {
3820     FmXTextCell::onFocusLost( _rEvent );
3821
3822     if ( getText() != m_sValueOnEnter )
3823     {
3824         lang::EventObject aEvent( *this );
3825         m_aChangeListeners.notifyEach( &XChangeListener::changed, aEvent );
3826     }
3827 }
3828
3829 IMPL_LINK_NOARG(FmXEditCell, ModifyHdl, LinkParamNone*, void)
3830 {
3831     if (m_aTextListeners.getLength())
3832         onTextChanged();
3833 }
3834
3835 FmXCheckBoxCell::FmXCheckBoxCell( DbGridColumn* pColumn, std::unique_ptr<DbCellControl> pControl )
3836                 :FmXDataCell( pColumn, std::move(pControl) )
3837                 ,m_aItemListeners(m_aMutex)
3838                 ,m_aActionListeners( m_aMutex )
3839                 ,m_pBox( & static_cast< CheckBoxControl& >( m_pCellControl->GetWindow() ) )
3840 {
3841     m_pBox->SetAuxModifyHdl(LINK(this, FmXCheckBoxCell, ModifyHdl));
3842 }
3843
3844 FmXCheckBoxCell::~FmXCheckBoxCell()
3845 {
3846     if (!OComponentHelper::rBHelper.bDisposed)
3847     {
3848         acquire();
3849         dispose();
3850     }
3851 }
3852
3853 // OComponentHelper
3854 void FmXCheckBoxCell::disposing()
3855 {
3856     css::lang::EventObject aEvt(*this);
3857     m_aItemListeners.disposeAndClear(aEvt);
3858     m_aActionListeners.disposeAndClear(aEvt);
3859
3860     m_pBox->SetToggleHdl(Link<weld::CheckButton&,void>());
3861     m_pBox = nullptr;
3862
3863     FmXDataCell::disposing();
3864 }
3865
3866
3867 Any SAL_CALL FmXCheckBoxCell::queryAggregation( const css::uno::Type& _rType )
3868 {
3869     Any aReturn = FmXDataCell::queryAggregation( _rType );
3870
3871     if ( !aReturn.hasValue() )
3872         aReturn = FmXCheckBoxCell_Base::queryInterface( _rType );
3873
3874     return aReturn;
3875 }
3876
3877
3878 Sequence< css::uno::Type > SAL_CALL FmXCheckBoxCell::getTypes(  )
3879 {
3880     return ::comphelper::concatSequences(
3881         FmXDataCell::getTypes(),
3882         FmXCheckBoxCell_Base::getTypes()
3883     );
3884 }
3885
3886
3887 IMPLEMENT_GET_IMPLEMENTATION_ID( FmXCheckBoxCell )
3888
3889 void SAL_CALL FmXCheckBoxCell::addItemListener( const Reference< css::awt::XItemListener >& l )
3890 {
3891     m_aItemListeners.addInterface( l );
3892 }
3893
3894 void SAL_CALL FmXCheckBoxCell::removeItemListener( const Reference< css::awt::XItemListener >& l )
3895 {
3896     m_aItemListeners.removeInterface( l );
3897 }
3898
3899 void SAL_CALL FmXCheckBoxCell::setState( sal_Int16 n )
3900 {
3901     ::osl::MutexGuard aGuard( m_aMutex );
3902
3903     if (m_pBox)
3904     {
3905         UpdateFromColumn();
3906         m_pBox->SetState( static_cast<TriState>(n) );
3907     }
3908 }
3909
3910 sal_Int16 SAL_CALL FmXCheckBoxCell::getState()
3911 {
3912     ::osl::MutexGuard aGuard( m_aMutex );
3913
3914     if (m_pBox)
3915     {
3916         UpdateFromColumn();
3917         return static_cast<sal_Int16>(m_pBox->GetState());
3918     }
3919     return TRISTATE_INDET;
3920 }
3921
3922 void SAL_CALL FmXCheckBoxCell::enableTriState(sal_Bool b)
3923 {
3924     ::osl::MutexGuard aGuard( m_aMutex );
3925
3926     if (m_pBox)
3927         m_pBox->EnableTriState( b );
3928 }
3929
3930 void SAL_CALL FmXCheckBoxCell::addActionListener( const Reference< awt::XActionListener >& Listener )
3931 {
3932     m_aActionListeners.addInterface( Listener );
3933 }
3934
3935
3936 void SAL_CALL FmXCheckBoxCell::removeActionListener( const Reference< awt::XActionListener >& Listener )
3937 {
3938     m_aActionListeners.removeInterface( Listener );
3939 }
3940
3941 void SAL_CALL FmXCheckBoxCell::setLabel( const OUString& Label )
3942 {
3943     SolarMutexGuard aGuard;
3944     if ( m_pColumn )
3945     {
3946         DbGridControl& rGrid( m_pColumn->GetParent() );
3947         rGrid.SetColumnTitle( rGrid.GetColumnId( m_pColumn->GetFieldPos() ), Label );
3948     }
3949 }
3950
3951 void SAL_CALL FmXCheckBoxCell::setActionCommand( const OUString& Command )
3952 {
3953     m_aActionCommand = Command;
3954 }
3955
3956 IMPL_LINK_NOARG(FmXCheckBoxCell, ModifyHdl, LinkParamNone*, void)
3957 {
3958     // check boxes are to be committed immediately (this holds for ordinary check box controls in
3959     // documents, and this must hold for check boxes in grid columns, too
3960     // 91210 - 22.08.2001 - frank.schoenheit@sun.com
3961     m_pCellControl->Commit();
3962
3963     Reference< XWindow > xKeepAlive( this );
3964     if ( m_aItemListeners.getLength() && m_pBox )
3965     {
3966         awt::ItemEvent aEvent;
3967         aEvent.Source = *this;
3968         aEvent.Highlighted = 0;
3969         aEvent.Selected = m_pBox->GetState();
3970         m_aItemListeners.notifyEach( &awt::XItemListener::itemStateChanged, aEvent );
3971     }
3972     if ( m_aActionListeners.getLength() )
3973     {
3974         awt::ActionEvent aEvent;
3975         aEvent.Source = *this;
3976         aEvent.ActionCommand = m_aActionCommand;
3977         m_aActionListeners.notifyEach( &awt::XActionListener::actionPerformed, aEvent );
3978     }
3979 }
3980
3981 FmXListBoxCell::FmXListBoxCell(DbGridColumn* pColumn, std::unique_ptr<DbCellControl> pControl)
3982   : FmXTextCell(pColumn, std::move(pControl))
3983   , m_aItemListeners(m_aMutex)
3984   , m_aActionListeners(m_aMutex)
3985   , m_pBox(&static_cast<svt::ListBoxControl&>(m_pCellControl->GetWindow()))
3986   , m_nLines(Application::GetSettings().GetStyleSettings().GetListBoxMaximumLineCount())
3987   , m_bMulti(false)
3988 {
3989     m_pBox->SetAuxModifyHdl(LINK(this, FmXListBoxCell, ChangedHdl));
3990 }
3991
3992 FmXListBoxCell::~FmXListBoxCell()
3993 {
3994     if (!OComponentHelper::rBHelper.bDisposed)
3995     {
3996         acquire();
3997         dispose();
3998     }
3999 }
4000
4001 // OComponentHelper
4002 void FmXListBoxCell::disposing()
4003 {
4004     css::lang::EventObject aEvt(*this);
4005     m_aItemListeners.disposeAndClear(aEvt);
4006     m_aActionListeners.disposeAndClear(aEvt);
4007
4008     m_pBox->SetAuxModifyHdl(Link<bool,void>());
4009     m_pBox = nullptr;
4010
4011     FmXTextCell::disposing();
4012 }
4013
4014 Any SAL_CALL FmXListBoxCell::queryAggregation( const css::uno::Type& _rType )
4015 {
4016     Any aReturn = FmXTextCell::queryAggregation(_rType);
4017
4018     if ( !aReturn.hasValue() )
4019         aReturn = FmXListBoxCell_Base::queryInterface( _rType );
4020
4021     return aReturn;
4022 }
4023
4024 Sequence< css::uno::Type > SAL_CALL FmXListBoxCell::getTypes(  )
4025 {
4026     return ::comphelper::concatSequences(
4027         FmXTextCell::getTypes(),
4028         FmXListBoxCell_Base::getTypes()
4029     );
4030 }
4031
4032 IMPLEMENT_GET_IMPLEMENTATION_ID( FmXListBoxCell )
4033
4034 void SAL_CALL FmXListBoxCell::addItemListener(const Reference< css::awt::XItemListener >& l)
4035 {
4036     m_aItemListeners.addInterface( l );
4037 }
4038
4039 void SAL_CALL FmXListBoxCell::removeItemListener(const Reference< css::awt::XItemListener >& l)
4040 {
4041     m_aItemListeners.removeInterface( l );
4042 }
4043
4044 void SAL_CALL FmXListBoxCell::addActionListener(const Reference< css::awt::XActionListener >& l)
4045 {
4046     m_aActionListeners.addInterface( l );
4047 }
4048
4049 void SAL_CALL FmXListBoxCell::removeActionListener(const Reference< css::awt::XActionListener >& l)
4050 {
4051     m_aActionListeners.removeInterface( l );
4052 }
4053
4054 void SAL_CALL FmXListBoxCell::addItem(const OUString& aItem, sal_Int16 nPos)
4055 {
4056     ::osl::MutexGuard aGuard( m_aMutex );
4057     if (m_pBox)
4058     {
4059         weld::ComboBox& rBox = m_pBox->get_widget();
4060         rBox.insert_text(nPos, aItem);
4061     }
4062 }
4063
4064 void SAL_CALL FmXListBoxCell::addItems(const css::uno::Sequence<OUString>& aItems, sal_Int16 nPos)
4065 {
4066     ::osl::MutexGuard aGuard( m_aMutex );
4067     if (m_pBox)
4068     {
4069         weld::ComboBox& rBox = m_pBox->get_widget();
4070         sal_uInt16 nP = nPos;
4071         for ( const auto& rItem : aItems )
4072         {
4073             rBox.insert_text(nP, rItem);
4074             if ( nPos != -1 )    // Not if 0xFFFF, because LIST_APPEND
4075                 nP++;
4076         }
4077     }
4078 }
4079
4080 void SAL_CALL FmXListBoxCell::removeItems(sal_Int16 nPos, sal_Int16 nCount)
4081 {
4082     ::osl::MutexGuard aGuard( m_aMutex );
4083     if ( m_pBox )
4084     {
4085         weld::ComboBox& rBox = m_pBox->get_widget();
4086         for ( sal_uInt16 n = nCount; n; )
4087             rBox.remove( nPos + (--n) );
4088     }
4089 }
4090
4091 sal_Int16 SAL_CALL FmXListBoxCell::getItemCount()
4092 {
4093     ::osl::MutexGuard aGuard( m_aMutex );
4094     if (!m_pBox)
4095         return 0;
4096     weld::ComboBox& rBox = m_pBox->get_widget();
4097     return rBox.get_count();
4098 }
4099
4100 OUString SAL_CALL FmXListBoxCell::getItem(sal_Int16 nPos)
4101 {
4102     ::osl::MutexGuard aGuard( m_aMutex );
4103     if (!m_pBox)
4104         return OUString();
4105     weld::ComboBox& rBox = m_pBox->get_widget();
4106     return rBox.get_text(nPos);
4107 }
4108
4109 css::uno::Sequence<OUString> SAL_CALL FmXListBoxCell::getItems()
4110 {
4111     ::osl::MutexGuard aGuard( m_aMutex );
4112
4113     css::uno::Sequence<OUString> aSeq;
4114     if (m_pBox)
4115     {
4116         weld::ComboBox& rBox = m_pBox->get_widget();
4117         const sal_Int32 nEntries = rBox.get_count();
4118         aSeq = css::uno::Sequence<OUString>( nEntries );
4119         for ( sal_Int32 n = nEntries; n; )
4120         {
4121             --n;
4122             aSeq.getArray()[n] = rBox.get_text( n );
4123         }
4124     }
4125     return aSeq;
4126 }
4127
4128 sal_Int16 SAL_CALL FmXListBoxCell::getSelectedItemPos()
4129 {
4130     ::osl::MutexGuard aGuard( m_aMutex );
4131     if (m_pBox)
4132     {
4133         UpdateFromColumn();
4134         weld::ComboBox& rBox = m_pBox->get_widget();
4135         sal_Int32 nPos = rBox.get_active();
4136         if (nPos > SHRT_MAX || nPos < SHRT_MIN)
4137             throw std::out_of_range("awt::XListBox::getSelectedItemPos can only return a short");
4138         return nPos;
4139     }
4140     return 0;
4141 }
4142
4143 Sequence< sal_Int16 > SAL_CALL FmXListBoxCell::getSelectedItemsPos()
4144 {
4145     ::osl::MutexGuard aGuard( m_aMutex );
4146
4147     if (m_pBox)
4148     {
4149         UpdateFromColumn();
4150         weld::ComboBox& rBox = m_pBox->get_widget();
4151         auto nActive = rBox.get_active();
4152         if (nActive != -1)
4153         {
4154             return { o3tl::narrowing<short>(nActive) };
4155         }
4156     }
4157     return {};
4158 }
4159
4160 OUString SAL_CALL FmXListBoxCell::getSelectedItem()
4161 {
4162     ::osl::MutexGuard aGuard( m_aMutex );
4163
4164     OUString aItem;
4165
4166     if (m_pBox)
4167     {
4168         UpdateFromColumn();
4169         weld::ComboBox& rBox = m_pBox->get_widget();
4170         aItem = rBox.get_active_text();
4171     }
4172
4173     return aItem;
4174 }
4175
4176 css::uno::Sequence<OUString> SAL_CALL FmXListBoxCell::getSelectedItems()
4177 {
4178     ::osl::MutexGuard aGuard( m_aMutex );
4179
4180     if (m_pBox)
4181     {
4182         UpdateFromColumn();
4183         weld::ComboBox& rBox = m_pBox->get_widget();
4184         auto nActive = rBox.get_active();
4185         if (nActive != -1)
4186         {
4187             return { rBox.get_text(nActive) };
4188         }
4189     }
4190     return {};
4191 }
4192
4193 void SAL_CALL FmXListBoxCell::selectItemPos(sal_Int16 nPos, sal_Bool bSelect)
4194 {
4195     ::osl::MutexGuard aGuard( m_aMutex );
4196
4197     if (m_pBox)
4198     {
4199         weld::ComboBox& rBox = m_pBox->get_widget();
4200         if (bSelect)
4201             rBox.set_active(nPos);
4202         else if (nPos == rBox.get_active())
4203             rBox.set_active(-1);
4204     }
4205 }
4206
4207 void SAL_CALL FmXListBoxCell::selectItemsPos(const Sequence< sal_Int16 >& aPositions, sal_Bool bSelect)
4208 {
4209     ::osl::MutexGuard aGuard( m_aMutex );
4210
4211     if (m_pBox)
4212     {
4213         weld::ComboBox& rBox = m_pBox->get_widget();
4214         for ( sal_uInt16 n = static_cast<sal_uInt16>(aPositions.getLength()); n; )
4215         {
4216             auto nPos = static_cast<sal_uInt16>(aPositions.getConstArray()[--n]);
4217             if (bSelect)
4218                 rBox.set_active(nPos);
4219             else if (nPos == rBox.get_active())
4220                 rBox.set_active(-1);
4221         }
4222     }
4223 }
4224
4225 void SAL_CALL FmXListBoxCell::selectItem(const OUString& aItem, sal_Bool bSelect)
4226 {
4227     ::osl::MutexGuard aGuard( m_aMutex );
4228
4229     if (m_pBox)
4230     {
4231         weld::ComboBox& rBox = m_pBox->get_widget();
4232         auto nPos = rBox.find_text(aItem);
4233         if (bSelect)
4234             rBox.set_active(nPos);
4235         else if (nPos == rBox.get_active())
4236             rBox.set_active(-1);
4237     }
4238 }
4239
4240 sal_Bool SAL_CALL FmXListBoxCell::isMutipleMode()
4241 {
4242     ::osl::MutexGuard aGuard( m_aMutex );
4243
4244     return m_bMulti;
4245 }
4246
4247 void SAL_CALL FmXListBoxCell::setMultipleMode(sal_Bool bMulti)
4248 {
4249     ::osl::MutexGuard aGuard( m_aMutex );
4250
4251     m_bMulti = bMulti;
4252 }
4253
4254 sal_Int16 SAL_CALL FmXListBoxCell::getDropDownLineCount()
4255 {
4256     ::osl::MutexGuard aGuard( m_aMutex );
4257     return m_nLines;
4258 }
4259
4260 void SAL_CALL FmXListBoxCell::setDropDownLineCount(sal_Int16 nLines)
4261 {
4262     ::osl::MutexGuard aGuard( m_aMutex );
4263
4264     m_nLines = nLines; // just store it to return it
4265 }
4266
4267 void SAL_CALL FmXListBoxCell::makeVisible(sal_Int16 /*nEntry*/)
4268 {
4269 }
4270
4271 IMPL_LINK(FmXListBoxCell, ChangedHdl, bool, bInteractive, void)
4272 {
4273     if (!m_pBox)
4274         return;
4275
4276     weld::ComboBox& rBox = m_pBox->get_widget();
4277
4278     if (bInteractive && !rBox.changed_by_direct_pick())
4279         return;
4280
4281     OnDoubleClick();
4282
4283     css::awt::ItemEvent aEvent;
4284     aEvent.Source = *this;
4285     aEvent.Highlighted = 0;
4286
4287     // with multiple selection 0xFFFF, otherwise the ID
4288     aEvent.Selected = (rBox.get_active() != -1 )
4289                     ? rBox.get_active() : 0xFFFF;
4290
4291     m_aItemListeners.notifyEach( &awt::XItemListener::itemStateChanged, aEvent );
4292 }
4293
4294 void FmXListBoxCell::OnDoubleClick()
4295 {
4296     css::awt::ActionEvent aEvent;
4297     aEvent.Source = *this;
4298     weld::ComboBox& rBox = m_pBox->get_widget();
4299     aEvent.ActionCommand = rBox.get_active_text();
4300
4301     m_aActionListeners.notifyEach( &css::awt::XActionListener::actionPerformed, aEvent );
4302 }
4303
4304 FmXComboBoxCell::FmXComboBoxCell( DbGridColumn* pColumn, std::unique_ptr<DbCellControl> pControl )
4305     :FmXTextCell( pColumn, std::move(pControl) )
4306     ,m_aItemListeners( m_aMutex )
4307     ,m_aActionListeners( m_aMutex )
4308     ,m_pComboBox(&static_cast<ComboBoxControl&>(m_pCellControl->GetWindow()))
4309     ,m_nLines(Application::GetSettings().GetStyleSettings().GetListBoxMaximumLineCount())
4310 {
4311     m_pComboBox->SetAuxModifyHdl(LINK(this, FmXComboBoxCell, ChangedHdl));
4312 }
4313
4314 FmXComboBoxCell::~FmXComboBoxCell()
4315 {
4316     if ( !OComponentHelper::rBHelper.bDisposed )
4317     {
4318         acquire();
4319         dispose();
4320     }
4321
4322 }
4323
4324 void FmXComboBoxCell::disposing()
4325 {
4326     css::lang::EventObject aEvt(*this);
4327     m_aItemListeners.disposeAndClear(aEvt);
4328     m_aActionListeners.disposeAndClear(aEvt);
4329
4330     m_pComboBox->SetAuxModifyHdl(Link<bool,void>());
4331     m_pComboBox = nullptr;
4332
4333     FmXTextCell::disposing();
4334 }
4335
4336 Any SAL_CALL FmXComboBoxCell::queryAggregation( const css::uno::Type& _rType )
4337 {
4338     Any aReturn = FmXTextCell::queryAggregation(_rType);
4339
4340     if ( !aReturn.hasValue() )
4341         aReturn = FmXComboBoxCell_Base::queryInterface( _rType );
4342
4343     return aReturn;
4344 }
4345
4346 Sequence< Type > SAL_CALL FmXComboBoxCell::getTypes(  )
4347 {
4348     return ::comphelper::concatSequences(
4349         FmXTextCell::getTypes(),
4350         FmXComboBoxCell_Base::getTypes()
4351     );
4352 }
4353
4354 IMPLEMENT_GET_IMPLEMENTATION_ID( FmXComboBoxCell )
4355
4356 void SAL_CALL FmXComboBoxCell::addItemListener(const Reference< awt::XItemListener >& l)
4357 {
4358     m_aItemListeners.addInterface( l );
4359 }
4360
4361 void SAL_CALL FmXComboBoxCell::removeItemListener(const Reference< awt::XItemListener >& l)
4362 {
4363     m_aItemListeners.removeInterface( l );
4364 }
4365
4366 void SAL_CALL FmXComboBoxCell::addActionListener(const Reference< awt::XActionListener >& l)
4367 {
4368     m_aActionListeners.addInterface( l );
4369 }
4370
4371
4372 void SAL_CALL FmXComboBoxCell::removeActionListener(const Reference< awt::XActionListener >& l)
4373 {
4374     m_aActionListeners.removeInterface( l );
4375 }
4376
4377 void SAL_CALL FmXComboBoxCell::addItem( const OUString& Item, sal_Int16 Pos )
4378 {
4379     ::osl::MutexGuard aGuard( m_aMutex );
4380     if (!m_pComboBox)
4381         return;
4382     weld::ComboBox& rBox = m_pComboBox->get_widget();
4383     rBox.insert_text(Pos, Item);
4384 }
4385
4386 void SAL_CALL FmXComboBoxCell::addItems( const Sequence< OUString >& Items, sal_Int16 Pos )
4387 {
4388     ::osl::MutexGuard aGuard( m_aMutex );
4389     if (!m_pComboBox)
4390         return;
4391     weld::ComboBox& rBox = m_pComboBox->get_widget();
4392     sal_uInt16 nP = Pos;
4393     for ( const auto& rItem : Items )
4394     {
4395         rBox.insert_text(nP, rItem);
4396         if ( Pos != -1 )
4397             nP++;
4398     }
4399 }
4400
4401 void SAL_CALL FmXComboBoxCell::removeItems( sal_Int16 Pos, sal_Int16 Count )
4402 {
4403     ::osl::MutexGuard aGuard( m_aMutex );
4404     if (!m_pComboBox)
4405         return;
4406     weld::ComboBox& rBox = m_pComboBox->get_widget();
4407     for ( sal_uInt16 n = Count; n; )
4408         rBox.remove( Pos + (--n) );
4409 }
4410
4411 sal_Int16 SAL_CALL FmXComboBoxCell::getItemCount()
4412 {
4413     ::osl::MutexGuard aGuard( m_aMutex );
4414     if (!m_pComboBox)
4415         return 0;
4416     weld::ComboBox& rBox = m_pComboBox->get_widget();
4417     return rBox.get_count();
4418 }
4419
4420 OUString SAL_CALL FmXComboBoxCell::getItem( sal_Int16 Pos )
4421 {
4422     ::osl::MutexGuard aGuard( m_aMutex );
4423     if (!m_pComboBox)
4424         return OUString();
4425     weld::ComboBox& rBox = m_pComboBox->get_widget();
4426     return rBox.get_text(Pos);
4427 }
4428
4429 Sequence< OUString > SAL_CALL FmXComboBoxCell::getItems()
4430 {
4431     ::osl::MutexGuard aGuard( m_aMutex );
4432
4433     Sequence< OUString > aItems;
4434     if (m_pComboBox)
4435     {
4436         weld::ComboBox& rBox = m_pComboBox->get_widget();
4437         const sal_Int32 nEntries = rBox.get_count();
4438         aItems.realloc( nEntries );
4439         OUString* pItem = aItems.getArray();
4440         for ( sal_Int32 n=0; n<nEntries; ++n, ++pItem )
4441             *pItem = rBox.get_text(n);
4442     }
4443     return aItems;
4444 }
4445
4446 sal_Int16 SAL_CALL FmXComboBoxCell::getDropDownLineCount()
4447 {
4448     ::osl::MutexGuard aGuard( m_aMutex );
4449     return m_nLines;
4450 }
4451
4452 void SAL_CALL FmXComboBoxCell::setDropDownLineCount(sal_Int16 nLines)
4453 {
4454     ::osl::MutexGuard aGuard( m_aMutex );
4455     m_nLines = nLines; // just store it to return it
4456 }
4457
4458 IMPL_LINK(FmXComboBoxCell, ChangedHdl, bool, bInteractive, void)
4459 {
4460     if (!m_pComboBox)
4461         return;
4462
4463     weld::ComboBox& rComboBox = m_pComboBox->get_widget();
4464
4465     if (bInteractive && !rComboBox.changed_by_direct_pick())
4466         return;
4467
4468     awt::ItemEvent aEvent;
4469     aEvent.Source = *this;
4470     aEvent.Highlighted = 0;
4471
4472     // with invalid selection 0xFFFF, otherwise the position
4473     aEvent.Selected =   ( rComboBox.get_active() != -1 )
4474                     ?   rComboBox.get_active()
4475                     :   0xFFFF;
4476     m_aItemListeners.notifyEach( &awt::XItemListener::itemStateChanged, aEvent );
4477 }
4478
4479 FmXFilterCell::FmXFilterCell(DbGridColumn* pColumn, std::unique_ptr<DbFilterField> pControl )
4480               :FmXGridCell( pColumn, std::move(pControl) )
4481               ,m_aTextListeners(m_aMutex)
4482 {
4483     static_cast<DbFilterField*>(m_pCellControl.get())->SetCommitHdl( LINK( this, FmXFilterCell, OnCommit ) );
4484 }
4485
4486 FmXFilterCell::~FmXFilterCell()
4487 {
4488     if (!OComponentHelper::rBHelper.bDisposed)
4489     {
4490         acquire();
4491         dispose();
4492     }
4493
4494 }
4495
4496 void FmXFilterCell::PaintCell( OutputDevice& rDev, const tools::Rectangle& rRect )
4497 {
4498     static_cast< DbFilterField* >( m_pCellControl.get() )->PaintCell( rDev, rRect );
4499 }
4500
4501 // OComponentHelper
4502
4503 void FmXFilterCell::disposing()
4504 {
4505     css::lang::EventObject aEvt(*this);
4506     m_aTextListeners.disposeAndClear(aEvt);
4507
4508     static_cast<DbFilterField*>(m_pCellControl.get())->SetCommitHdl(Link<DbFilterField&,void>());
4509
4510     FmXGridCell::disposing();
4511 }
4512
4513
4514 Any SAL_CALL FmXFilterCell::queryAggregation( const css::uno::Type& _rType )
4515 {
4516     Any aReturn = FmXGridCell::queryAggregation(_rType);
4517
4518     if ( !aReturn.hasValue() )
4519         aReturn = FmXFilterCell_Base::queryInterface( _rType );
4520
4521     return aReturn;
4522 }
4523
4524
4525 Sequence< css::uno::Type > SAL_CALL FmXFilterCell::getTypes(  )
4526 {
4527     return ::comphelper::concatSequences(
4528         FmXGridCell::getTypes(),
4529         FmXFilterCell_Base::getTypes()
4530     );
4531 }
4532
4533
4534 IMPLEMENT_GET_IMPLEMENTATION_ID( FmXFilterCell )
4535
4536 // css::awt::XTextComponent
4537
4538 void SAL_CALL FmXFilterCell::addTextListener(const Reference< css::awt::XTextListener >& l)
4539 {
4540     m_aTextListeners.addInterface( l );
4541 }
4542
4543
4544 void SAL_CALL FmXFilterCell::removeTextListener(const Reference< css::awt::XTextListener >& l)
4545 {
4546     m_aTextListeners.removeInterface( l );
4547 }
4548
4549 void SAL_CALL FmXFilterCell::setText( const OUString& aText )
4550 {
4551     ::osl::MutexGuard aGuard( m_aMutex );
4552     static_cast<DbFilterField*>(m_pCellControl.get())->SetText(aText);
4553 }
4554
4555 void SAL_CALL FmXFilterCell::insertText( const css::awt::Selection& /*rSel*/, const OUString& /*aText*/ )
4556 {
4557 }
4558
4559 OUString SAL_CALL FmXFilterCell::getText()
4560 {
4561     ::osl::MutexGuard aGuard( m_aMutex );
4562     return static_cast<DbFilterField*>(m_pCellControl.get())->GetText();
4563 }
4564
4565 OUString SAL_CALL FmXFilterCell::getSelectedText()
4566 {
4567     return getText();
4568 }
4569
4570 void SAL_CALL FmXFilterCell::setSelection( const css::awt::Selection& /*aSelection*/ )
4571 {
4572 }
4573
4574 css::awt::Selection SAL_CALL FmXFilterCell::getSelection()
4575 {
4576     return css::awt::Selection();
4577 }
4578
4579 sal_Bool SAL_CALL FmXFilterCell::isEditable()
4580 {
4581     return true;
4582 }
4583
4584 void SAL_CALL FmXFilterCell::setEditable( sal_Bool /*bEditable*/ )
4585 {
4586 }
4587
4588 sal_Int16 SAL_CALL FmXFilterCell::getMaxTextLen()
4589 {
4590     return 0;
4591 }
4592
4593 void SAL_CALL FmXFilterCell::setMaxTextLen( sal_Int16 /*nLen*/ )
4594 {
4595 }
4596
4597 IMPL_LINK_NOARG(FmXFilterCell, OnCommit, DbFilterField&, void)
4598 {
4599     css::awt::TextEvent aEvt;
4600     aEvt.Source = *this;
4601     m_aTextListeners.notifyEach( &css::awt::XTextListener::textChanged, aEvt );
4602 }
4603
4604 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */