vcl/source/control/listbox.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 #include <vcl/builder.hxx>
  21 #include <vcl/commandevent.hxx>
  22 #include <vcl/event.hxx>
  23 #include <vcl/toolkit/lstbox.hxx>
  24 #include <vcl/settings.hxx>
  25 #include <vcl/uitest/uiobject.hxx>
  26 #include <sal/log.hxx>
  27
  28 #include <svdata.hxx>
  29 #include <listbox.hxx>
  30 #include <dndeventdispatcher.hxx>
  31 #include <comphelper/lok.hxx>
  32
  33 #include <com/sun/star/datatransfer/dnd/XDropTarget.hpp>
  34 #include <boost/property_tree/ptree.hpp>
  35 #include <tools/json_writer.hxx>
  36
  37 ListBox::ListBox(WindowType nType)
  38     : Control(nType)
  39     , mpImplLB(nullptr)
  40 {
  41     ImplInitListBoxData();
  42 }
  43
  44 ListBox::ListBox( vcl::Window* pParent, WinBits nStyle ) : Control( WindowType::LISTBOX )
  45 {
  46     ImplInitListBoxData();
  47     ImplInit( pParent, nStyle );
  48 }
  49
  50 ListBox::~ListBox()
  51 {
  52     disposeOnce();
  53 }
  54
  55 void ListBox::dispose()
  56 {
  57     CallEventListeners( VclEventId::ObjectDying );
  58
  59     mpImplLB.disposeAndClear();
  60     mpFloatWin.disposeAndClear();
  61     mpImplWin.disposeAndClear();
  62     mpBtn.disposeAndClear();
  63
  64     Control::dispose();
  65 }
  66
  67 void ListBox::ImplInitListBoxData()
  68 {
  69     mpFloatWin      = nullptr;
  70     mpImplWin       = nullptr;
  71     mpBtn           = nullptr;
  72     mnDDHeight      = 0;
  73     mnLineCount     = 0;
  74     m_nMaxWidthChars = -1;
  75     mbDDAutoSize    = true;
  76 }
  77
  78 void ListBox::ImplInit( vcl::Window* pParent, WinBits nStyle )
  79 {
  80     nStyle = ImplInitStyle( nStyle );
  81     if ( !(nStyle & WB_NOBORDER) && ( nStyle & WB_DROPDOWN ) )
  82         nStyle |= WB_BORDER;
  83
  84     Control::ImplInit( pParent, nStyle, nullptr );
  85
  86     css::uno::Reference< css::datatransfer::dnd::XDropTargetListener> xDrop = new DNDEventDispatcher(this);
  87
  88     if( nStyle & WB_DROPDOWN )
  89     {
  90         sal_Int32 nLeft, nTop, nRight, nBottom;
  91         GetBorder( nLeft, nTop, nRight, nBottom );
  92         mnDDHeight = static_cast<sal_uInt16>(GetTextHeight() + nTop + nBottom + 4);
  93
  94         if( IsNativeWidgetEnabled() &&
  95             IsNativeControlSupported( ControlType::Listbox, ControlPart::Entire ) )
  96         {
  97                 ImplControlValue aControlValue;
  98                 tools::Rectangle aCtrlRegion( Point( 0, 0 ), Size( 20, mnDDHeight ) );
  99                 tools::Rectangle aBoundingRgn( aCtrlRegion );
 100                 tools::Rectangle aContentRgn( aCtrlRegion );
 101                 if( GetNativeControlRegion( ControlType::Listbox, ControlPart::Entire, aCtrlRegion,
 102                                             ControlState::ENABLED, aControlValue,
 103                                             aBoundingRgn, aContentRgn ) )
 104                 {
 105                     sal_Int32 nHeight = aBoundingRgn.GetHeight();
 106                     if( nHeight > mnDDHeight )
 107                         mnDDHeight = static_cast<sal_uInt16>(nHeight);
 108                 }
 109         }
 110
 111         mpFloatWin = VclPtr<ImplListBoxFloatingWindow>::Create( this );
 112         if (!IsNativeControlSupported(ControlType::Pushbutton, ControlPart::Focus))
 113             mpFloatWin->RequestDoubleBuffering(true);
 114         mpFloatWin->SetAutoWidth( true );
 115         mpFloatWin->SetPopupModeEndHdl( LINK( this, ListBox, ImplPopupModeEndHdl ) );
 116         mpFloatWin->GetDropTarget()->addDropTargetListener(xDrop);
 117
 118         mpImplWin = VclPtr<ImplWin>::Create( this, (nStyle & (WB_LEFT|WB_RIGHT|WB_CENTER))|WB_NOBORDER );
 119         mpImplWin->SetMBDownHdl( LINK( this, ListBox, ImplClickBtnHdl ) );
 120         mpImplWin->Show();
 121         mpImplWin->GetDropTarget()->addDropTargetListener(xDrop);
 122         mpImplWin->SetEdgeBlending(false);
 123
 124         mpBtn = VclPtr<ImplBtn>::Create( this, WB_NOLIGHTBORDER | WB_RECTSTYLE );
 125         ImplInitDropDownButton( mpBtn );
 126         mpBtn->SetMBDownHdl( LINK( this, ListBox, ImplClickBtnHdl ) );
 127         mpBtn->Show();
 128         mpBtn->GetDropTarget()->addDropTargetListener(xDrop);
 129     }
 130
 131     vcl::Window* pLBParent = this;
 132     if ( mpFloatWin )
 133         pLBParent = mpFloatWin;
 134     mpImplLB = VclPtr<ImplListBox>::Create( pLBParent, nStyle&(~WB_BORDER) );
 135     mpImplLB->SetSelectHdl( LINK( this, ListBox, ImplSelectHdl ) );
 136     mpImplLB->SetScrollHdl( LINK( this, ListBox, ImplScrollHdl ) );
 137     mpImplLB->SetCancelHdl( LINK( this, ListBox, ImplCancelHdl ) );
 138     mpImplLB->SetDoubleClickHdl( LINK( this, ListBox, ImplDoubleClickHdl ) );
 139     mpImplLB->SetFocusHdl( LINK( this, ListBox, ImplFocusHdl ) );
 140     mpImplLB->SetListItemSelectHdl( LINK( this, ListBox, ImplListItemSelectHdl ) );
 141     mpImplLB->SetPosPixel( Point() );
 142     mpImplLB->SetEdgeBlending(false);
 143     mpImplLB->Show();
 144
 145     mpImplLB->GetDropTarget()->addDropTargetListener(xDrop);
 146
 147     if ( mpFloatWin )
 148     {
 149         mpFloatWin->SetImplListBox( mpImplLB );
 150         mpImplLB->SetSelectionChangedHdl( LINK( this, ListBox, ImplSelectionChangedHdl ) );
 151     }
 152     else
 153         mpImplLB->GetMainWindow()->AllowGrabFocus( true );
 154
 155     SetCompoundControl( true );
 156 }
 157
 158 WinBits ListBox::ImplInitStyle( WinBits nStyle )
 159 {
 160     if ( !(nStyle & WB_NOTABSTOP) )
 161         nStyle |= WB_TABSTOP;
 162     if ( !(nStyle & WB_NOGROUP) )
 163         nStyle |= WB_GROUP;
 164     return nStyle;
 165 }
 166
 167 IMPL_LINK_NOARG(ListBox, ImplSelectHdl, LinkParamNone*, void)
 168 {
 169     bool bPopup = IsInDropDown();
 170     if( IsDropDownBox() )
 171     {
 172         if( !mpImplLB->IsTravelSelect() )
 173         {
 174             mpFloatWin->EndPopupMode();
 175             mpImplWin->GrabFocus();
 176         }
 177
 178         mpImplWin->SetItemPos( GetSelectedEntryPos() );
 179         mpImplWin->SetString( GetSelectedEntry() );
 180         if( mpImplLB->GetEntryList().HasImages() )
 181         {
 182             Image aImage = mpImplLB->GetEntryList().GetEntryImage( GetSelectedEntryPos() );
 183             mpImplWin->SetImage( aImage );
 184         }
 185         mpImplWin->Invalidate();
 186     }
 187
 188     if ( ( !IsTravelSelect() || mpImplLB->IsSelectionChanged() ) || ( bPopup && !IsMultiSelectionEnabled() ) )
 189         Select();
 190 }
 191
 192 IMPL_LINK( ListBox, ImplFocusHdl, sal_Int32, nPos, void )
 193 {
 194     CallEventListeners( VclEventId::ListboxFocus, reinterpret_cast<void*>(static_cast<sal_IntPtr>(nPos)) );
 195 }
 196
 197 IMPL_LINK_NOARG( ListBox, ImplListItemSelectHdl, LinkParamNone*, void )
 198 {
 199     CallEventListeners( VclEventId::DropdownSelect );
 200 }
 201
 202 IMPL_LINK_NOARG(ListBox, ImplScrollHdl, ImplListBox*, void)
 203 {
 204     CallEventListeners( VclEventId::ListboxScrolled );
 205 }
 206
 207 IMPL_LINK_NOARG(ListBox, ImplCancelHdl, LinkParamNone*, void)
 208 {
 209     if( IsInDropDown() )
 210         mpFloatWin->EndPopupMode();
 211 }
 212
 213 IMPL_LINK( ListBox, ImplSelectionChangedHdl, sal_Int32, nChanged, void )
 214 {
 215     if ( mpImplLB->IsTrackingSelect() )
 216         return;
 217
 218     const ImplEntryList& rEntryList = mpImplLB->GetEntryList();
 219     if ( rEntryList.IsEntryPosSelected( nChanged ) )
 220     {
 221         // FIXME? This should've been turned into an ImplPaintEntry some time ago...
 222         if ( nChanged < rEntryList.GetMRUCount() )
 223             nChanged = rEntryList.FindEntry( rEntryList.GetEntryText( nChanged ) );
 224         mpImplWin->SetItemPos( nChanged );
 225         mpImplWin->SetString( rEntryList.GetEntryText( nChanged ) );
 226         if( rEntryList.HasImages() )
 227         {
 228             Image aImage = rEntryList.GetEntryImage( nChanged );
 229             mpImplWin->SetImage( aImage );
 230         }
 231     }
 232     else
 233     {
 234         mpImplWin->SetItemPos( LISTBOX_ENTRY_NOTFOUND );
 235         mpImplWin->SetString( OUString() );
 236         Image aImage;
 237         mpImplWin->SetImage( aImage );
 238     }
 239     mpImplWin->Invalidate();
 240 }
 241
 242 IMPL_LINK_NOARG(ListBox, ImplDoubleClickHdl, ImplListBoxWindow*, void)
 243 {
 244     DoubleClick();
 245 }
 246
 247 IMPL_LINK_NOARG(ListBox, ImplClickBtnHdl, void*, void)
 248 {
 249     if( mpFloatWin->IsInPopupMode() )
 250         return;
 251
 252     CallEventListeners( VclEventId::DropdownPreOpen );
 253     mpImplWin->GrabFocus();
 254     mpBtn->SetPressed( true );
 255     mpFloatWin->StartFloat( true );
 256     CallEventListeners( VclEventId::DropdownOpen );
 257
 258     ImplClearLayoutData();
 259     if( mpImplLB )
 260         mpImplLB->GetMainWindow()->ImplClearLayoutData();
 261     if( mpImplWin )
 262         mpImplWin->ImplClearLayoutData();
 263 }
 264
 265 IMPL_LINK_NOARG(ListBox, ImplPopupModeEndHdl, FloatingWindow*, void)
 266 {
 267     if( mpFloatWin->IsPopupModeCanceled() )
 268     {
 269         if ( ( mpFloatWin->GetPopupModeStartSaveSelection() != LISTBOX_ENTRY_NOTFOUND )
 270                 && !IsEntryPosSelected( mpFloatWin->GetPopupModeStartSaveSelection() ) )
 271         {
 272             mpImplLB->SelectEntry( mpFloatWin->GetPopupModeStartSaveSelection(), true );
 273             bool bTravelSelect = mpImplLB->IsTravelSelect();
 274             mpImplLB->SetTravelSelect( true );
 275
 276             VclPtr<vcl::Window> xWindow = this;
 277             Select();
 278             if ( xWindow->isDisposed() )
 279                 return;
 280
 281             mpImplLB->SetTravelSelect( bTravelSelect );
 282         }
 283     }
 284
 285     ImplClearLayoutData();
 286     if( mpImplLB )
 287         mpImplLB->GetMainWindow()->ImplClearLayoutData();
 288     if( mpImplWin )
 289         mpImplWin->ImplClearLayoutData();
 290
 291     mpBtn->SetPressed( false );
 292     CallEventListeners( VclEventId::DropdownClose );
 293 }
 294
 295 void ListBox::ToggleDropDown()
 296 {
 297     if( !IsDropDownBox() )
 298         return;
 299
 300     if( mpFloatWin->IsInPopupMode() )
 301         mpFloatWin->EndPopupMode();
 302     else
 303     {
 304         CallEventListeners( VclEventId::DropdownPreOpen );
 305         mpImplWin->GrabFocus();
 306         mpBtn->SetPressed( true );
 307         mpFloatWin->StartFloat( true );
 308         CallEventListeners( VclEventId::DropdownOpen );
 309     }
 310 }
 311
 312 void ListBox::ApplySettings(vcl::RenderContext& rRenderContext)
 313 {
 314     rRenderContext.SetBackground();
 315 }
 316
 317 void ListBox::Draw( OutputDevice* pDev, const Point& rPos, SystemTextColorFlags nFlags )
 318 {
 319     mpImplLB->GetMainWindow()->ApplySettings(*pDev);
 320
 321     Point aPos = pDev->LogicToPixel( rPos );
 322     Size aSize = GetSizePixel();
 323     vcl::Font aFont = mpImplLB->GetMainWindow()->GetDrawPixelFont( pDev );
 324
 325     pDev->Push();
 326     pDev->SetMapMode();
 327     pDev->SetFont( aFont );
 328     pDev->SetTextFillColor();
 329
 330     // Border/Background
 331     pDev->SetLineColor();
 332     pDev->SetFillColor();
 333     bool bBorder = (GetStyle() & WB_BORDER);
 334     bool bBackground = IsControlBackground();
 335     if ( bBorder || bBackground )
 336     {
 337         tools::Rectangle aRect( aPos, aSize );
 338         if ( bBorder )
 339         {
 340             ImplDrawFrame( pDev, aRect );
 341         }
 342         if ( bBackground )
 343         {
 344             pDev->SetFillColor( GetControlBackground() );
 345             pDev->DrawRect( aRect );
 346         }
 347     }
 348
 349     // Content
 350     if ( nFlags & SystemTextColorFlags::Mono )
 351     {
 352         pDev->SetTextColor( COL_BLACK );
 353     }
 354     else
 355     {
 356         if ( !IsEnabled() )
 357         {
 358             const StyleSettings& rStyleSettings = GetSettings().GetStyleSettings();
 359             pDev->SetTextColor( rStyleSettings.GetDisableColor() );
 360         }
 361         else
 362         {
 363             pDev->SetTextColor( GetTextColor() );
 364         }
 365     }
 366
 367     const tools::Long nOnePixel = GetDrawPixel( pDev, 1 );
 368     const tools::Long nOffX = 3*nOnePixel;
 369     DrawTextFlags nTextStyle = DrawTextFlags::VCenter;
 370     tools::Rectangle aTextRect( aPos, aSize );
 371
 372     if ( GetStyle() & WB_CENTER )
 373         nTextStyle |= DrawTextFlags::Center;
 374     else if ( GetStyle() & WB_RIGHT )
 375         nTextStyle |= DrawTextFlags::Right;
 376     else
 377         nTextStyle |= DrawTextFlags::Left;
 378
 379     aTextRect.AdjustLeft(nOffX );
 380     aTextRect.AdjustRight( -nOffX );
 381
 382     if ( IsDropDownBox() )
 383     {
 384         OUString   aText = GetSelectedEntry();
 385         tools::Long       nTextHeight = pDev->GetTextHeight();
 386         tools::Long       nTextWidth = pDev->GetTextWidth( aText );
 387         tools::Long       nOffY = (aSize.Height()-nTextHeight) / 2;
 388
 389         // Clipping?
 390         if ( (nOffY < 0) ||
 391              ((nOffY+nTextHeight) > aSize.Height()) ||
 392              ((nOffX+nTextWidth) > aSize.Width()) )
 393         {
 394             tools::Rectangle aClip( aPos, aSize );
 395             if ( nTextHeight > aSize.Height() )
 396                 aClip.AdjustBottom(nTextHeight-aSize.Height()+1 );  // So that HP Printers don't optimize this away
 397             pDev->IntersectClipRegion( aClip );
 398         }
 399
 400         pDev->DrawText( aTextRect, aText, nTextStyle );
 401     }
 402     else
 403     {
 404         tools::Long        nTextHeight = pDev->GetTextHeight();
 405         sal_uInt16  nLines = ( nTextHeight > 0 ) ? static_cast<sal_uInt16>(aSize.Height() / nTextHeight) : 1;
 406         tools::Rectangle   aClip( aPos, aSize );
 407
 408         pDev->IntersectClipRegion( aClip );
 409
 410         if ( !nLines )
 411             nLines = 1;
 412
 413         for ( sal_uInt16 n = 0; n < nLines; n++ )
 414         {
 415             sal_Int32 nEntry = n+mpImplLB->GetTopEntry();
 416             bool bSelected = mpImplLB->GetEntryList().IsEntryPosSelected( nEntry );
 417             if ( bSelected )
 418             {
 419                 pDev->SetFillColor( COL_BLACK );
 420                 pDev->DrawRect( tools::Rectangle(  Point( aPos.X(), aPos.Y() + n*nTextHeight ),
 421                                             Point( aPos.X() + aSize.Width(), aPos.Y() + (n+1)*nTextHeight + 2*nOnePixel ) ) );
 422                 pDev->SetFillColor();
 423                 pDev->SetTextColor( COL_WHITE );
 424             }
 425
 426             aTextRect.SetTop( aPos.Y() + n*nTextHeight );
 427             aTextRect.SetBottom( aTextRect.Top() + nTextHeight );
 428
 429             pDev->DrawText( aTextRect, mpImplLB->GetEntryList().GetEntryText( nEntry ), nTextStyle );
 430
 431             if ( bSelected )
 432                 pDev->SetTextColor( COL_BLACK );
 433         }
 434     }
 435
 436     pDev->Pop();
 437 }
 438
 439 void ListBox::GetFocus()
 440 {
 441     if ( mpImplLB )
 442     {
 443         if( IsDropDownBox() )
 444             mpImplWin->GrabFocus();
 445         else
 446             mpImplLB->GrabFocus();
 447     }
 448
 449     Control::GetFocus();
 450 }
 451
 452 void ListBox::LoseFocus()
 453 {
 454     if( IsDropDownBox() )
 455     {
 456         if (mpImplWin)
 457             mpImplWin->HideFocus();
 458     }
 459     else
 460     {
 461         if (mpImplLB)
 462             mpImplLB->HideFocus();
 463     }
 464
 465     Control::LoseFocus();
 466 }
 467
 468 void ListBox::DataChanged( const DataChangedEvent& rDCEvt )
 469 {
 470     Control::DataChanged( rDCEvt );
 471
 472     if ( !((rDCEvt.GetType() == DataChangedEventType::FONTS) ||
 473          (rDCEvt.GetType() == DataChangedEventType::FONTSUBSTITUTION) ||
 474          ((rDCEvt.GetType() == DataChangedEventType::SETTINGS) &&
 475           (rDCEvt.GetFlags() & AllSettingsFlags::STYLE))) )
 476         return;
 477
 478     SetBackground();    // Due to a hack in Window::UpdateSettings the background must be reset
 479                         // otherwise it will overpaint NWF drawn listboxes
 480     Resize();
 481     mpImplLB->Resize(); // Is not called by ListBox::Resize() if the ImplLB does not change
 482
 483     if ( mpImplWin )
 484     {
 485         mpImplWin->GetOutDev()->SetSettings( GetSettings() ); // If not yet set...
 486         mpImplWin->ApplySettings(*mpImplWin->GetOutDev());
 487
 488         mpBtn->GetOutDev()->SetSettings( GetSettings() );
 489         ImplInitDropDownButton( mpBtn );
 490     }
 491
 492     if ( IsDropDownBox() )
 493         Invalidate();
 494 }
 495
 496 void ListBox::EnableAutoSize( bool bAuto )
 497 {
 498     mbDDAutoSize = bAuto;
 499     if ( mpFloatWin )
 500     {
 501         if ( bAuto && !mpFloatWin->GetDropDownLineCount() )
 502         {
 503             // use GetListBoxMaximumLineCount here; before, was on fixed number of five
 504             AdaptDropDownLineCountToMaximum();
 505         }
 506         else if ( !bAuto )
 507         {
 508             mpFloatWin->SetDropDownLineCount( 0 );
 509         }
 510     }
 511 }
 512
 513 void ListBox::SetDropDownLineCount( sal_uInt16 nLines )
 514 {
 515     mnLineCount = nLines;
 516     if ( mpFloatWin )
 517         mpFloatWin->SetDropDownLineCount( mnLineCount );
 518 }
 519
 520 void ListBox::AdaptDropDownLineCountToMaximum()
 521 {
 522     // Adapt to maximum allowed number.
 523     // Limit for LOK as we can't render outside of the dialog canvas.
 524     if (comphelper::LibreOfficeKit::isActive())
 525         SetDropDownLineCount(11);
 526     else
 527         SetDropDownLineCount(GetSettings().GetStyleSettings().GetListBoxMaximumLineCount());
 528 }
 529
 530 sal_uInt16 ListBox::GetDropDownLineCount() const
 531 {
 532     if ( mpFloatWin )
 533         return mpFloatWin->GetDropDownLineCount();
 534     return mnLineCount;
 535 }
 536
 537 void ListBox::setPosSizePixel( tools::Long nX, tools::Long nY, tools::Long nWidth, tools::Long nHeight, PosSizeFlags nFlags )
 538 {
 539     if( IsDropDownBox() && ( nFlags & PosSizeFlags::Size ) )
 540     {
 541         Size aPrefSz = mpFloatWin->GetPrefSize();
 542         if ( ( nFlags & PosSizeFlags::Height ) && ( nHeight >= 2*mnDDHeight ) )
 543             aPrefSz.setHeight( nHeight-mnDDHeight );
 544         if ( nFlags & PosSizeFlags::Width )
 545             aPrefSz.setWidth( nWidth );
 546         mpFloatWin->SetPrefSize( aPrefSz );
 547
 548         if (IsAutoSizeEnabled())
 549             nHeight = mnDDHeight;
 550     }
 551
 552     Control::setPosSizePixel( nX, nY, nWidth, nHeight, nFlags );
 553 }
 554
 555 void ListBox::Resize()
 556 {
 557     Size aOutSz = GetOutputSizePixel();
 558     if( IsDropDownBox() )
 559     {
 560         // Initialize the dropdown button size with the standard scrollbar width
 561         tools::Long nSBWidth = GetSettings().GetStyleSettings().GetScrollBarSize();
 562         tools::Long nBottom = aOutSz.Height();
 563
 564         // Note: in case of no border, pBorder will actually be this
 565         vcl::Window *pBorder = GetWindow( GetWindowType::Border );
 566         ImplControlValue aControlValue;
 567         Point aPoint;
 568         tools::Rectangle aContent, aBound;
 569
 570         // Use the full extent of the control
 571         tools::Rectangle aArea( aPoint, pBorder->GetOutputSizePixel() );
 572
 573         if ( GetNativeControlRegion( ControlType::Listbox, ControlPart::ButtonDown,
 574                     aArea, ControlState::NONE, aControlValue, aBound, aContent) )
 575         {
 576             // Convert back from border space to local coordinates
 577             aPoint = pBorder->ScreenToOutputPixel( OutputToScreenPixel( aPoint ) );
 578             aContent.Move( -aPoint.X(), -aPoint.Y() );
 579
 580             // Use the themes drop down size for the button
 581             aOutSz.setWidth( aContent.Left() );
 582             mpBtn->setPosSizePixel( aContent.Left(), 0, aContent.GetWidth(), nBottom );
 583
 584             // Adjust the size of the edit field
 585             if ( GetNativeControlRegion( ControlType::Listbox, ControlPart::SubEdit,
 586                         aArea, ControlState::NONE, aControlValue, aBound, aContent) )
 587             {
 588                 // Convert back from border space to local coordinates
 589                 aContent.Move( -aPoint.X(), -aPoint.Y() );
 590
 591                 // Use the themes drop down size
 592                 if( ! (GetStyle() & WB_BORDER) && ImplGetSVData()->maNWFData.mbNoFocusRects )
 593                 {
 594                     // No border but focus ring behavior -> we have a problem; the
 595                     // native rect relies on the border to draw the focus
 596                     // let's do the best we can and center vertically, so it doesn't look
 597                     // completely wrong.
 598                     Size aSz( GetOutputSizePixel() );
 599                     tools::Long nDiff = aContent.Top() - (aSz.Height() - aContent.GetHeight())/2;
 600                     aContent.AdjustTop( -nDiff );
 601                     aContent.AdjustBottom( -nDiff );
 602                 }
 603                 mpImplWin->SetPosSizePixel( aContent.TopLeft(), aContent.GetSize() );
 604             }
 605             else
 606                 mpImplWin->SetSizePixel( aOutSz );
 607         }
 608         else
 609         {
 610             nSBWidth = CalcZoom( nSBWidth );
 611             mpImplWin->setPosSizePixel( 0, 0, aOutSz.Width() - nSBWidth, aOutSz.Height() );
 612             mpBtn->setPosSizePixel( aOutSz.Width() - nSBWidth, 0, nSBWidth, aOutSz.Height() );
 613         }
 614     }
 615     else
 616     {
 617         mpImplLB->SetSizePixel( aOutSz );
 618     }
 619
 620     // Retain FloatingWindow size even when it's invisible, as we still process KEY_PGUP/DOWN ...
 621     if ( mpFloatWin )
 622         mpFloatWin->SetSizePixel( mpFloatWin->CalcFloatSize() );
 623
 624     Control::Resize();
 625 }
 626
 627 void ListBox::FillLayoutData() const
 628 {
 629     mxLayoutData.emplace();
 630     const ImplListBoxWindow* rMainWin = mpImplLB->GetMainWindow();
 631     if( mpFloatWin )
 632     {
 633         // Dropdown mode
 634         AppendLayoutData( *mpImplWin );
 635         mpImplWin->SetLayoutDataParent( this );
 636         if( mpFloatWin->IsReallyVisible() )
 637         {
 638             AppendLayoutData( *rMainWin );
 639             rMainWin->SetLayoutDataParent( this );
 640         }
 641     }
 642     else
 643     {
 644         AppendLayoutData( *rMainWin );
 645         rMainWin->SetLayoutDataParent( this );
 646     }
 647 }
 648
 649 tools::Long ListBox::GetIndexForPoint( const Point& rPoint, sal_Int32& rPos ) const
 650 {
 651     if( !HasLayoutData() )
 652         FillLayoutData();
 653
 654     // Check whether rPoint fits at all
 655     tools::Long nIndex = Control::GetIndexForPoint( rPoint );
 656     if( nIndex != -1 )
 657     {
 658         // Point must be either in main list window
 659         // or in impl window (dropdown case)
 660         ImplListBoxWindow* rMain = mpImplLB->GetMainWindow();
 661
 662         // Convert coordinates to ImplListBoxWindow pixel coordinate space
 663         Point aConvPoint = LogicToPixel( rPoint );
 664         AbsoluteScreenPixelPoint aConvPointAbs = OutputToAbsoluteScreenPixel( aConvPoint );
 665         aConvPoint = rMain->AbsoluteScreenToOutputPixel( aConvPointAbs );
 666         aConvPoint = rMain->PixelToLogic( aConvPoint );
 667
 668         // Try to find entry
 669         sal_Int32 nEntry = rMain->GetEntryPosForPoint( aConvPoint );
 670         if( nEntry == LISTBOX_ENTRY_NOTFOUND )
 671         {
 672             // Not found, maybe dropdown case
 673             if( mpImplWin && mpImplWin->IsReallyVisible() )
 674             {
 675                 // Convert to impl window pixel coordinates
 676                 aConvPoint = LogicToPixel( rPoint );
 677                 aConvPointAbs = OutputToAbsoluteScreenPixel( aConvPoint );
 678                 aConvPoint = mpImplWin->AbsoluteScreenToOutputPixel( aConvPointAbs );
 679
 680                 // Check whether converted point is inside impl window
 681                 Size aImplWinSize = mpImplWin->GetOutputSizePixel();
 682                 if( aConvPoint.X() >= 0 && aConvPoint.Y() >= 0 && aConvPoint.X() < aImplWinSize.Width() && aConvPoint.Y() < aImplWinSize.Height() )
 683                 {
 684                     // Inside the impl window, the position is the current item pos
 685                     rPos = mpImplWin->GetItemPos();
 686                 }
 687                 else
 688                     nIndex = -1;
 689             }
 690             else
 691                 nIndex = -1;
 692         }
 693         else
 694             rPos = nEntry;
 695
 696         SAL_WARN_IF( nIndex == -1, "vcl", "found index for point, but relative index failed" );
 697     }
 698
 699     // Get line relative index
 700     if( nIndex != -1 )
 701         nIndex = ToRelativeLineIndex( nIndex );
 702
 703     return nIndex;
 704 }
 705
 706 void ListBox::StateChanged( StateChangedType nType )
 707 {
 708     if( nType == StateChangedType::ReadOnly )
 709     {
 710         if( mpImplWin )
 711             mpImplWin->Enable( !IsReadOnly() );
 712         if( mpBtn )
 713             mpBtn->Enable( !IsReadOnly() );
 714     }
 715     else if( nType == StateChangedType::Enable )
 716     {
 717         mpImplLB->Enable( IsEnabled() );
 718         if( mpImplWin )
 719         {
 720             mpImplWin->Enable( IsEnabled() );
 721             if ( IsNativeControlSupported(ControlType::Listbox, ControlPart::Entire)
 722                     && ! IsNativeControlSupported(ControlType::Listbox, ControlPart::ButtonDown) )
 723             {
 724                 GetWindow( GetWindowType::Border )->Invalidate( InvalidateFlags::NoErase );
 725             }
 726             else
 727                 mpImplWin->Invalidate();
 728         }
 729         if( mpBtn )
 730             mpBtn->Enable( IsEnabled() );
 731     }
 732     else if( nType == StateChangedType::UpdateMode )
 733     {
 734         mpImplLB->SetUpdateMode( IsUpdateMode() );
 735     }
 736     else if ( nType == StateChangedType::Zoom )
 737     {
 738         mpImplLB->SetZoom( GetZoom() );
 739         if ( mpImplWin )
 740         {
 741             mpImplWin->SetZoom( GetZoom() );
 742             mpImplWin->SetFont( mpImplLB->GetMainWindow()->GetFont() );
 743             mpImplWin->Invalidate();
 744         }
 745         Resize();
 746     }
 747     else if ( nType == StateChangedType::ControlFont )
 748     {
 749         mpImplLB->SetControlFont( GetControlFont() );
 750         if ( mpImplWin )
 751         {
 752             mpImplWin->SetControlFont( GetControlFont() );
 753             mpImplWin->SetFont( mpImplLB->GetMainWindow()->GetFont() );
 754             mpImplWin->Invalidate();
 755         }
 756         Resize();
 757     }
 758     else if ( nType == StateChangedType::ControlForeground )
 759     {
 760         mpImplLB->SetControlForeground( GetControlForeground() );
 761         if ( mpImplWin )
 762         {
 763             mpImplWin->SetControlForeground( GetControlForeground() );
 764             mpImplWin->SetTextColor( GetControlForeground() );
 765             mpImplWin->SetFont( mpImplLB->GetMainWindow()->GetFont() );
 766             mpImplWin->Invalidate();
 767         }
 768     }
 769     else if ( nType == StateChangedType::ControlBackground )
 770     {
 771         mpImplLB->SetControlBackground( GetControlBackground() );
 772         if ( mpImplWin )
 773         {
 774
 775             mpImplWin->SetBackground( GetControlBackground() );
 776             mpImplWin->SetControlBackground( GetControlBackground() );
 777             mpImplWin->SetFont( mpImplLB->GetMainWindow()->GetFont() );
 778             mpImplWin->Invalidate();
 779         }
 780     }
 781     else if ( nType == StateChangedType::Style )
 782     {
 783         SetStyle( ImplInitStyle( GetStyle() ) );
 784         mpImplLB->GetMainWindow()->EnableSort( ( GetStyle() & WB_SORT ) != 0 );
 785         bool bSimpleMode = ( GetStyle() & WB_SIMPLEMODE ) != 0;
 786         mpImplLB->SetMultiSelectionSimpleMode( bSimpleMode );
 787     }
 788     else if( nType == StateChangedType::Mirroring )
 789     {
 790         if( mpBtn )
 791         {
 792             mpBtn->EnableRTL( IsRTLEnabled() );
 793             ImplInitDropDownButton( mpBtn );
 794         }
 795         mpImplLB->EnableRTL( IsRTLEnabled() );
 796         if( mpImplWin )
 797             mpImplWin->EnableRTL( IsRTLEnabled() );
 798         Resize();
 799     }
 800
 801     Control::StateChanged( nType );
 802 }
 803
 804 bool ListBox::PreNotify( NotifyEvent& rNEvt )
 805 {
 806     bool bDone = false;
 807     if ( mpImplLB )
 808     {
 809         if( ( rNEvt.GetType() == NotifyEventType::KEYINPUT ) && ( rNEvt.GetWindow() == mpImplWin ) )
 810         {
 811             KeyEvent aKeyEvt = *rNEvt.GetKeyEvent();
 812             switch( aKeyEvt.GetKeyCode().GetCode() )
 813             {
 814                 case KEY_DOWN:
 815                 {
 816                     if( mpFloatWin && !mpFloatWin->IsInPopupMode() &&
 817                         aKeyEvt.GetKeyCode().IsMod2() )
 818                     {
 819                         CallEventListeners( VclEventId::DropdownPreOpen );
 820                         mpBtn->SetPressed( true );
 821                         mpFloatWin->StartFloat( false );
 822                         CallEventListeners( VclEventId::DropdownOpen );
 823                         bDone = true;
 824                     }
 825                     else
 826                     {
 827                         bDone = mpImplLB->ProcessKeyInput( aKeyEvt );
 828                     }
 829                 }
 830                 break;
 831                 case KEY_UP:
 832                 {
 833                     if( mpFloatWin && mpFloatWin->IsInPopupMode() &&
 834                         aKeyEvt.GetKeyCode().IsMod2() )
 835                     {
 836                         mpFloatWin->EndPopupMode();
 837                         bDone = true;
 838                     }
 839                     else
 840                     {
 841                         bDone = mpImplLB->ProcessKeyInput( aKeyEvt );
 842                     }
 843                 }
 844                 break;
 845                 case KEY_RETURN:
 846                 {
 847                     if( IsInDropDown() )
 848                     {
 849                         mpImplLB->ProcessKeyInput( aKeyEvt );
 850                         bDone = true;
 851                     }
 852                 }
 853                 break;
 854
 855                 default:
 856                 {
 857                     bDone = mpImplLB->ProcessKeyInput( aKeyEvt );
 858                 }
 859             }
 860         }
 861         else if ( rNEvt.GetType() == NotifyEventType::LOSEFOCUS )
 862         {
 863             if ( IsInDropDown() && !HasChildPathFocus( true ) )
 864                 mpFloatWin->EndPopupMode();
 865         }
 866         else if ( (rNEvt.GetType() == NotifyEventType::COMMAND) &&
 867                   (rNEvt.GetCommandEvent()->GetCommand() == CommandEventId::Wheel) &&
 868                   (rNEvt.GetWindow() == mpImplWin) )
 869         {
 870             const Point& rMousePos = rNEvt.GetCommandEvent()->GetMousePosPixel();
 871             const tools::Rectangle aWinRect(mpImplWin->GetPosPixel(), mpImplWin->GetSizePixel());
 872             const bool bMousePositionedOverWin = aWinRect.Contains(rMousePos);
 873
 874             MouseWheelBehaviour nWheelBehavior( GetSettings().GetMouseSettings().GetWheelBehavior() );
 875             if (bMousePositionedOverWin
 876                 && ((nWheelBehavior == MouseWheelBehaviour::ALWAYS)
 877                     || ((nWheelBehavior == MouseWheelBehaviour::FocusOnly) && HasChildPathFocus())))
 878             {
 879                 bDone = mpImplLB->HandleWheelAsCursorTravel(*rNEvt.GetCommandEvent(), *this);
 880             }
 881             else
 882             {
 883                 bDone = false;  // Don't consume this event, let the default handling take it (i.e. scroll the context)
 884             }
 885         }
 886     }
 887
 888     if (rNEvt.GetType() == NotifyEventType::MOUSEMOVE)
 889     {
 890         const MouseEvent* pMouseEvt = rNEvt.GetMouseEvent();
 891         if (pMouseEvt && (pMouseEvt->IsEnterWindow() || pMouseEvt->IsLeaveWindow()))
 892         {
 893             // trigger redraw as mouse over state has changed
 894             if (IsNativeControlSupported(ControlType::Listbox, ControlPart::Entire)
 895                 && !IsNativeControlSupported(ControlType::Listbox, ControlPart::ButtonDown))
 896             {
 897                 GetWindow(GetWindowType::Border)->Invalidate(InvalidateFlags::NoErase);
 898             }
 899         }
 900     }
 901
 902     return bDone || Control::PreNotify( rNEvt );
 903 }
 904
 905 void ListBox::Select()
 906 {
 907     ImplCallEventListenersAndHandler( VclEventId::ListboxSelect, [this] () { maSelectHdl.Call(*this); } );
 908 }
 909
 910 void ListBox::DoubleClick()
 911 {
 912     ImplCallEventListenersAndHandler( VclEventId::ListboxDoubleClick, {} );
 913 }
 914
 915 void ListBox::Clear()
 916 {
 917     if (!mpImplLB)
 918         return;
 919     mpImplLB->Clear();
 920     if( IsDropDownBox() )
 921     {
 922         mpImplWin->SetItemPos( LISTBOX_ENTRY_NOTFOUND );
 923         mpImplWin->SetString( OUString() );
 924         Image aImage;
 925         mpImplWin->SetImage( aImage );
 926         mpImplWin->Invalidate();
 927     }
 928     CallEventListeners( VclEventId::ListboxItemRemoved, reinterpret_cast<void*>(-1) );
 929 }
 930
 931 void ListBox::SetNoSelection()
 932 {
 933     mpImplLB->SetNoSelection();
 934     if( IsDropDownBox() )
 935     {
 936         mpImplWin->SetItemPos( LISTBOX_ENTRY_NOTFOUND );
 937         mpImplWin->SetString( OUString() );
 938         Image aImage;
 939         mpImplWin->SetImage( aImage );
 940         mpImplWin->Invalidate();
 941     }
 942 }
 943
 944 sal_Int32 ListBox::InsertEntry( const OUString& rStr, sal_Int32 nPos )
 945 {
 946     sal_Int32 nRealPos = mpImplLB->InsertEntry( nPos + mpImplLB->GetEntryList().GetMRUCount(), rStr );
 947     nRealPos = sal::static_int_cast<sal_Int32>(nRealPos - mpImplLB->GetEntryList().GetMRUCount());
 948     CallEventListeners( VclEventId::ListboxItemAdded, reinterpret_cast<void*>(static_cast<sal_IntPtr>(nRealPos)) );
 949     return nRealPos;
 950 }
 951
 952 sal_Int32 ListBox::InsertEntry( const OUString& rStr, const Image& rImage, sal_Int32 nPos )
 953 {
 954     sal_Int32 nRealPos = mpImplLB->InsertEntry( nPos + mpImplLB->GetEntryList().GetMRUCount(), rStr, rImage );
 955     nRealPos = sal::static_int_cast<sal_Int32>(nRealPos - mpImplLB->GetEntryList().GetMRUCount());
 956     CallEventListeners( VclEventId::ListboxItemAdded, reinterpret_cast<void*>(static_cast<sal_IntPtr>(nRealPos)) );
 957     return nRealPos;
 958 }
 959
 960 void ListBox::RemoveEntry( sal_Int32 nPos )
 961 {
 962     mpImplLB->RemoveEntry( nPos + mpImplLB->GetEntryList().GetMRUCount() );
 963     CallEventListeners( VclEventId::ListboxItemRemoved, reinterpret_cast<void*>(static_cast<sal_IntPtr>(nPos)) );
 964 }
 965
 966 Image ListBox::GetEntryImage( sal_Int32 nPos ) const
 967 {
 968     if ( mpImplLB && mpImplLB->GetEntryList().HasEntryImage( nPos ) )
 969         return mpImplLB->GetEntryList().GetEntryImage( nPos );
 970     return Image();
 971 }
 972
 973 sal_Int32 ListBox::GetEntryPos( std::u16string_view rStr ) const
 974 {
 975     if (!mpImplLB)
 976         return LISTBOX_ENTRY_NOTFOUND;
 977     sal_Int32 nPos = mpImplLB->GetEntryList().FindEntry( rStr );
 978     if ( nPos != LISTBOX_ENTRY_NOTFOUND )
 979         nPos = nPos - mpImplLB->GetEntryList().GetMRUCount();
 980     return nPos;
 981 }
 982
 983 OUString ListBox::GetEntry( sal_Int32 nPos ) const
 984 {
 985     if (!mpImplLB)
 986         return OUString();
 987     return mpImplLB->GetEntryList().GetEntryText( nPos + mpImplLB->GetEntryList().GetMRUCount() );
 988 }
 989
 990 sal_Int32 ListBox::GetEntryCount() const
 991 {
 992     if (!mpImplLB)
 993         return 0;
 994     return mpImplLB->GetEntryList().GetEntryCount() - mpImplLB->GetEntryList().GetMRUCount();
 995 }
 996
 997 OUString ListBox::GetSelectedEntry(sal_Int32 nIndex) const
 998 {
 999     return GetEntry( GetSelectedEntryPos( nIndex ) );
1000 }
1001
1002 sal_Int32 ListBox::GetSelectedEntryCount() const
1003 {
1004     if (!mpImplLB)
1005         return 0;
1006     return mpImplLB->GetEntryList().GetSelectedEntryCount();
1007 }
1008
1009 sal_Int32 ListBox::GetSelectedEntryPos( sal_Int32 nIndex ) const
1010 {
1011     if (!mpImplLB)
1012         return LISTBOX_ENTRY_NOTFOUND;
1013
1014     sal_Int32 nPos = mpImplLB->GetEntryList().GetSelectedEntryPos( nIndex );
1015     if ( nPos != LISTBOX_ENTRY_NOTFOUND )
1016     {
1017         if ( nPos < mpImplLB->GetEntryList().GetMRUCount() )
1018             nPos = mpImplLB->GetEntryList().FindEntry( mpImplLB->GetEntryList().GetEntryText( nPos ) );
1019         nPos = nPos - mpImplLB->GetEntryList().GetMRUCount();
1020     }
1021     return nPos;
1022 }
1023
1024 bool ListBox::IsEntryPosSelected( sal_Int32 nPos ) const
1025 {
1026     return mpImplLB->GetEntryList().IsEntryPosSelected( nPos + mpImplLB->GetEntryList().GetMRUCount() );
1027 }
1028
1029 void ListBox::SelectEntry( std::u16string_view rStr, bool bSelect )
1030 {
1031     SelectEntryPos( GetEntryPos( rStr ), bSelect );
1032 }
1033
1034 void ListBox::SelectEntryPos( sal_Int32 nPos, bool bSelect )
1035 {
1036     if (!mpImplLB)
1037         return;
1038
1039     if ( 0 <= nPos && nPos < mpImplLB->GetEntryList().GetEntryCount() )
1040     {
1041         sal_Int32 nCurrentPos = mpImplLB->GetCurrentPos();
1042         mpImplLB->SelectEntry( nPos + mpImplLB->GetEntryList().GetMRUCount(), bSelect );
1043         //Only when bSelect == true, send both Selection & Focus events
1044         if (nCurrentPos != nPos && bSelect)
1045         {
1046             CallEventListeners( VclEventId::ListboxSelect, reinterpret_cast<void*>(static_cast<sal_IntPtr>(nPos)));
1047             if (HasFocus())
1048                 CallEventListeners( VclEventId::ListboxFocus, reinterpret_cast<void*>(static_cast<sal_IntPtr>(nPos)));
1049         }
1050     }
1051 }
1052
1053 void ListBox::SelectEntriesPos( const std::vector<sal_Int32>& rPositions, bool bSelect )
1054 {
1055     if (!mpImplLB)
1056         return;
1057
1058     bool bCallListeners = false;
1059
1060     const sal_Int32 nCurrentPos = mpImplLB->GetCurrentPos();
1061     const auto nEntryCount = mpImplLB->GetEntryList().GetEntryCount();
1062     const auto nMRUCount = mpImplLB->GetEntryList().GetMRUCount();
1063
1064     for (auto nPos : rPositions)
1065     {
1066         if (0 <= nPos && nPos < nEntryCount)
1067         {
1068             mpImplLB->SelectEntry(nPos + nMRUCount, bSelect);
1069             if (nCurrentPos != nPos && bSelect)
1070                 bCallListeners = true;
1071         }
1072     }
1073
1074     //Only when bSelect == true, send both Selection & Focus events
1075     if (bCallListeners)
1076     {
1077         CallEventListeners(VclEventId::ListboxSelect);
1078         if (HasFocus())
1079             CallEventListeners(VclEventId::ListboxFocus);
1080     }
1081 }
1082
1083 void ListBox::SetEntryData( sal_Int32 nPos, void* pNewData )
1084 {
1085     mpImplLB->SetEntryData( nPos + mpImplLB->GetEntryList().GetMRUCount(), pNewData );
1086 }
1087
1088 void* ListBox::GetEntryData( sal_Int32 nPos ) const
1089 {
1090     return mpImplLB->GetEntryList().GetEntryData( nPos + mpImplLB->GetEntryList().GetMRUCount() );
1091 }
1092
1093 void ListBox::SetEntryFlags( sal_Int32 nPos, ListBoxEntryFlags nFlags )
1094 {
1095     mpImplLB->SetEntryFlags( nPos + mpImplLB->GetEntryList().GetMRUCount(), nFlags );
1096 }
1097
1098 void ListBox::SetTopEntry( sal_Int32 nPos )
1099 {
1100     mpImplLB->SetTopEntry( nPos + mpImplLB->GetEntryList().GetMRUCount() );
1101 }
1102
1103 sal_Int32 ListBox::GetTopEntry() const
1104 {
1105     sal_Int32 nPos = GetEntryCount() ? mpImplLB->GetTopEntry() : LISTBOX_ENTRY_NOTFOUND;
1106     if ( nPos < mpImplLB->GetEntryList().GetMRUCount() )
1107         nPos = 0;
1108     return nPos;
1109 }
1110
1111 bool ListBox::IsTravelSelect() const
1112 {
1113     return mpImplLB->IsTravelSelect();
1114 }
1115
1116 bool ListBox::IsInDropDown() const
1117 {
1118     // when the dropdown is dismissed, first mbInPopupMode is set to false, and on the next event iteration then
1119     // mbPopupMode is set to false
1120     return mpFloatWin && mpFloatWin->IsInPopupMode() && mpFloatWin->ImplIsInPrivatePopupMode();
1121 }
1122
1123 tools::Rectangle ListBox::GetBoundingRectangle( sal_Int32 nItem ) const
1124 {
1125     tools::Rectangle aRect = mpImplLB->GetMainWindow()->GetBoundingRectangle( nItem );
1126     tools::Rectangle aOffset = mpImplLB->GetMainWindow()->GetWindowExtentsRelative( *static_cast<vcl::Window*>(const_cast<ListBox *>(this)) );
1127     aRect.Move( aOffset.Left(), aOffset.Top() );
1128     return aRect;
1129 }
1130
1131 void ListBox::EnableMultiSelection( bool bMulti )
1132 {
1133     mpImplLB->EnableMultiSelection( bMulti );
1134
1135     // WB_SIMPLEMODE:
1136     // The MultiListBox behaves just like a normal ListBox
1137     // MultiSelection is possible via corresponding additional keys
1138     bool bSimpleMode = ( GetStyle() & WB_SIMPLEMODE ) != 0;
1139     mpImplLB->SetMultiSelectionSimpleMode( bSimpleMode );
1140
1141     // In a MultiSelection, we can't see us travelling without focus
1142     if ( mpFloatWin )
1143         mpImplLB->GetMainWindow()->AllowGrabFocus( bMulti );
1144 }
1145
1146 bool ListBox::IsMultiSelectionEnabled() const
1147 {
1148     return mpImplLB->IsMultiSelectionEnabled();
1149 }
1150
1151 void ListBox::SetHighlightColor(const Color& rColor)
1152 {
1153     AllSettings aSettings(GetSettings());
1154     StyleSettings aStyle(aSettings.GetStyleSettings());
1155     aStyle.SetHighlightColor(rColor);
1156     aSettings.SetStyleSettings(aStyle);
1157     SetSettings(aSettings);
1158
1159     mpImplLB->SetHighlightColor(rColor);
1160 }
1161
1162 void ListBox::SetHighlightTextColor(const Color& rColor)
1163 {
1164     AllSettings aSettings(GetSettings());
1165     StyleSettings aStyle(aSettings.GetStyleSettings());
1166     aStyle.SetHighlightTextColor(rColor);
1167     aSettings.SetStyleSettings(aStyle);
1168     SetSettings(aSettings);
1169
1170     mpImplLB->SetHighlightTextColor(rColor);
1171 }
1172
1173 Size ListBox::CalcMinimumSize() const
1174 {
1175     Size aSz;
1176
1177     if (!mpImplLB)
1178         return aSz;
1179
1180     aSz = CalcSubEditSize();
1181
1182     bool bAddScrollWidth = false;
1183
1184     if (IsDropDownBox())
1185     {
1186         aSz.AdjustHeight(4 ); // add a space between entry and border
1187         aSz.AdjustWidth(4 );  // add a little breathing space
1188         bAddScrollWidth = true;
1189     }
1190     else
1191         bAddScrollWidth = (GetStyle() & WB_VSCROLL) == WB_VSCROLL;
1192
1193     if (bAddScrollWidth)
1194     {
1195         // Try native borders; scrollbar size may not be a good indicator
1196         // See how large the edit area inside is to estimate what is needed for the dropdown
1197         ImplControlValue aControlValue;
1198         tools::Rectangle aContent, aBound;
1199         Size aTestSize( 100, 20 );
1200         tools::Rectangle aArea( Point(), aTestSize );
1201         if( GetNativeControlRegion( ControlType::Listbox, ControlPart::SubEdit, aArea, ControlState::NONE,
1202                     aControlValue, aBound, aContent) )
1203         {
1204             // use the themes drop down size
1205             aSz.AdjustWidth(aTestSize.Width() - aContent.GetWidth() );
1206         }
1207         else
1208             aSz.AdjustWidth(GetSettings().GetStyleSettings().GetScrollBarSize() );
1209     }
1210
1211     aSz = CalcWindowSize( aSz );
1212
1213     if (IsDropDownBox()) // Check minimum height of dropdown box
1214     {
1215         ImplControlValue aControlValue;
1216         tools::Rectangle aRect( Point( 0, 0 ), aSz );
1217         tools::Rectangle aContent, aBound;
1218         if( GetNativeControlRegion( ControlType::Listbox, ControlPart::Entire, aRect, ControlState::NONE,
1219                     aControlValue, aBound, aContent) )
1220         {
1221             if( aBound.GetHeight() > aSz.Height() )
1222                 aSz.setHeight( aBound.GetHeight() );
1223         }
1224     }
1225
1226     return aSz;
1227 }
1228
1229 Size ListBox::CalcSubEditSize() const
1230 {
1231     Size aSz;
1232
1233     if (!mpImplLB)
1234         return aSz;
1235
1236     if ( !IsDropDownBox() )
1237         aSz = mpImplLB->CalcSize (mnLineCount ? mnLineCount : mpImplLB->GetEntryList().GetEntryCount());
1238     else
1239     {
1240         aSz.setHeight( mpImplLB->GetEntryHeight() );
1241         // Size to maximum entry width
1242         aSz.setWidth( mpImplLB->GetMaxEntryWidth() );
1243
1244         if (m_nMaxWidthChars != -1)
1245         {
1246             tools::Long nMaxWidth = m_nMaxWidthChars * approximate_char_width();
1247             aSz.setWidth( std::min(aSz.Width(), nMaxWidth) );
1248         }
1249
1250         // Do not create ultrathin ListBoxes, it doesn't look good
1251         if( aSz.Width() < GetSettings().GetStyleSettings().GetScrollBarSize() )
1252             aSz.setWidth( GetSettings().GetStyleSettings().GetScrollBarSize() );
1253     }
1254
1255     return aSz;
1256 }
1257
1258 Size ListBox::GetOptimalSize() const
1259 {
1260     return CalcMinimumSize();
1261 }
1262
1263 Size ListBox::CalcAdjustedSize( const Size& rPrefSize ) const
1264 {
1265     Size aSz = rPrefSize;
1266     sal_Int32 nLeft, nTop, nRight, nBottom;
1267     static_cast<vcl::Window*>(const_cast<ListBox *>(this))->GetBorder( nLeft, nTop, nRight, nBottom );
1268     aSz.AdjustHeight( -(nTop+nBottom) );
1269     if ( !IsDropDownBox() )
1270     {
1271         tools::Long nEntryHeight = CalcBlockSize( 1, 1 ).Height();
1272         tools::Long nLines = aSz.Height() / nEntryHeight;
1273         if ( nLines < 1 )
1274             nLines = 1;
1275         aSz.setHeight( nLines * nEntryHeight );
1276     }
1277     else
1278     {
1279         aSz.setHeight( mnDDHeight );
1280     }
1281     aSz.AdjustHeight(nTop+nBottom );
1282
1283     aSz = CalcWindowSize( aSz );
1284     return aSz;
1285 }
1286
1287 Size ListBox::CalcBlockSize( sal_uInt16 nColumns, sal_uInt16 nLines ) const
1288 {
1289     // ScrollBars are shown if needed
1290     Size aMinSz = CalcMinimumSize();
1291     // aMinSz = ImplCalcOutSz( aMinSz );
1292
1293     Size aSz;
1294
1295     // Height
1296     if ( nLines )
1297     {
1298         if ( !IsDropDownBox() )
1299             aSz.setHeight( mpImplLB->CalcSize( nLines ).Height() );
1300         else
1301             aSz.setHeight( mnDDHeight );
1302     }
1303     else
1304         aSz.setHeight( aMinSz.Height() );
1305
1306     // Width
1307     if ( nColumns )
1308         aSz.setWidth( nColumns * GetTextWidth( OUString('X') ) );
1309     else
1310         aSz.setWidth( aMinSz.Width() );
1311
1312     if ( IsDropDownBox() )
1313         aSz.AdjustWidth(GetSettings().GetStyleSettings().GetScrollBarSize() );
1314
1315     if ( !IsDropDownBox() )
1316     {
1317         if ( aSz.Width() < aMinSz.Width() )
1318             aSz.AdjustHeight(GetSettings().GetStyleSettings().GetScrollBarSize() );
1319         if ( aSz.Height() < aMinSz.Height() )
1320             aSz.AdjustWidth(GetSettings().GetStyleSettings().GetScrollBarSize() );
1321     }
1322
1323     aSz = CalcWindowSize( aSz );
1324     return aSz;
1325 }
1326
1327 void ListBox::GetMaxVisColumnsAndLines( sal_uInt16& rnCols, sal_uInt16& rnLines ) const
1328 {
1329     float nCharWidth = approximate_char_width();
1330     if ( !IsDropDownBox() )
1331     {
1332         Size aOutSz = mpImplLB->GetMainWindow()->GetOutputSizePixel();
1333         rnCols = static_cast<sal_uInt16>(aOutSz.Width()/nCharWidth);
1334         rnLines = static_cast<sal_uInt16>(aOutSz.Height()/mpImplLB->GetEntryHeightWithMargin());
1335     }
1336     else
1337     {
1338         Size aOutSz = mpImplWin->GetOutputSizePixel();
1339         rnCols = static_cast<sal_uInt16>(aOutSz.Width()/nCharWidth);
1340         rnLines = 1;
1341     }
1342 }
1343
1344 void ListBox::SetReadOnly( bool bReadOnly )
1345 {
1346     if ( mpImplLB->IsReadOnly() != bReadOnly )
1347     {
1348         mpImplLB->SetReadOnly( bReadOnly );
1349         CompatStateChanged( StateChangedType::ReadOnly );
1350     }
1351 }
1352
1353 bool ListBox::IsReadOnly() const
1354 {
1355     return mpImplLB->IsReadOnly();
1356 }
1357
1358 void ListBox::SetSeparatorPos( sal_Int32 n )
1359 {
1360     mpImplLB->SetSeparatorPos( n );
1361 }
1362
1363 sal_Int32 ListBox::GetSeparatorPos() const
1364 {
1365     return mpImplLB->GetSeparatorPos();
1366 }
1367
1368 void ListBox::AddSeparator( sal_Int32 n )
1369 {
1370     mpImplLB->AddSeparator( n );
1371 }
1372
1373 sal_uInt16 ListBox::GetDisplayLineCount() const
1374 {
1375     return mpImplLB->GetDisplayLineCount();
1376 }
1377
1378 tools::Rectangle ListBox::GetDropDownPosSizePixel() const
1379 {
1380     return mpFloatWin ? mpFloatWin->GetWindowExtentsRelative(*this) : tools::Rectangle();
1381 }
1382
1383 const Wallpaper& ListBox::GetDisplayBackground() const
1384 {
1385     // !!! Recursion does not occur because the ImplListBox is initialized by default
1386     // to a non-transparent color in Window::ImplInitData
1387     return mpImplLB->GetDisplayBackground();
1388 }
1389
1390 void ListBox::setMaxWidthChars(sal_Int32 nWidth)
1391 {
1392     if (nWidth != m_nMaxWidthChars)
1393     {
1394         m_nMaxWidthChars = nWidth;
1395         queue_resize();
1396     }
1397 }
1398
1399 bool ListBox::set_property(const OUString &rKey, const OUString &rValue)
1400 {
1401     if (rKey == "active")
1402         SelectEntryPos(rValue.toInt32());
1403     else if (rKey == "max-width-chars")
1404         setMaxWidthChars(rValue.toInt32());
1405     else if (rKey == "can-focus")
1406     {
1407         // as far as I can see in Gtk, setting a ComboBox as can.focus means
1408         // the focus gets stuck in it, so try here to behave like gtk does
1409         // with the settings that work, i.e. can.focus of false doesn't
1410         // set the hard WB_NOTABSTOP
1411         WinBits nBits = GetStyle();
1412         nBits &= ~(WB_TABSTOP|WB_NOTABSTOP);
1413         if (toBool(rValue))
1414             nBits |= WB_TABSTOP;
1415         SetStyle(nBits);
1416     }
1417     else
1418         return Control::set_property(rKey, rValue);
1419     return true;
1420 }
1421
1422 FactoryFunction ListBox::GetUITestFactory() const
1423 {
1424     return ListBoxUIObject::create;
1425 }
1426
1427 void ListBox::DumpAsPropertyTree(tools::JsonWriter& rJsonWriter)
1428 {
1429     Control::DumpAsPropertyTree(rJsonWriter);
1430
1431     {
1432         auto entriesNode = rJsonWriter.startArray("entries");
1433         for (int i = 0; i < GetEntryCount(); ++i)
1434         {
1435             rJsonWriter.putSimpleValue(GetEntry(i));
1436         }
1437     }
1438
1439     rJsonWriter.put("selectedCount", GetSelectedEntryCount());
1440
1441     {
1442         auto entriesNode = rJsonWriter.startArray("selectedEntries");
1443         for (int i = 0; i < GetSelectedEntryCount(); ++i)
1444         {
1445             rJsonWriter.putSimpleValue(OUString::number(GetSelectedEntryPos(i)));
1446         }
1447     }
1448 }
1449
1450 MultiListBox::MultiListBox( vcl::Window* pParent, WinBits nStyle ) :
1451     ListBox( WindowType::MULTILISTBOX )
1452 {
1453     ImplInit( pParent, nStyle );
1454     EnableMultiSelection( true );
1455 }
1456
1457 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */