dbaccess/source/ui/browser/brwview.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 <brwview.hxx>
  21 #include <sbagrid.hxx>
  22 #include <toolkit/helper/vclunohelper.hxx>
  23 #include <comphelper/types.hxx>
  24 #include <vcl/split.hxx>
  25 #include <strings.hxx>
  26 #include <com/sun/star/form/XLoadable.hpp>
  27 #include <com/sun/star/awt/XControlContainer.hpp>
  28 #include <com/sun/star/awt/PosSize.hpp>
  29 #include <com/sun/star/beans/XPropertySet.hpp>
  30 #include <com/sun/star/container/XChild.hpp>
  31 #include <osl/diagnose.h>
  32
  33 using namespace dbaui;
  34 using namespace ::com::sun::star::uno;
  35 using namespace ::com::sun::star::form;
  36 using namespace ::com::sun::star::beans;
  37 using namespace ::com::sun::star::container;
  38 using namespace ::com::sun::star::lang;
  39
  40 namespace
  41 {
  42     bool isGrabVclControlFocusAllowed(const UnoDataBrowserView* _pView)
  43     {
  44         bool bGrabFocus = false;
  45         SbaGridControl* pVclControl = _pView->getVclControl();
  46         const Reference< css::awt::XControl > xGrid = _pView->getGridControl();
  47         if (pVclControl && xGrid.is())
  48         {
  49             bGrabFocus = true;
  50             if(!pVclControl->HasChildPathFocus())
  51             {
  52                 Reference<XChild> xChild(xGrid->getModel(),UNO_QUERY);
  53                 Reference<XLoadable> xLoad;
  54                 if(xChild.is())
  55                     xLoad.set(xChild->getParent(),UNO_QUERY);
  56                 bGrabFocus = xLoad.is() && xLoad->isLoaded();
  57             }
  58         }
  59         return bGrabFocus;
  60     }
  61 }
  62
  63 // UnoDataBrowserView
  64
  65 UnoDataBrowserView::UnoDataBrowserView( vcl::Window* pParent,
  66                                         IController& _rController,
  67                                         const Reference< css::uno::XComponentContext >& _rxContext)
  68     :ODataView(pParent,_rController,_rxContext)
  69     ,m_pTreeView(nullptr)
  70     ,m_pSplitter(nullptr)
  71     ,m_pVclControl(nullptr)
  72 {
  73
  74 }
  75
  76 void UnoDataBrowserView::Construct(const Reference< css::awt::XControlModel >& xModel)
  77 {
  78     try
  79     {
  80         ODataView::Construct();
  81
  82         // our UNO representation
  83         m_xMe = VCLUnoHelper::CreateControlContainer(this);
  84
  85         // create the (UNO-) control
  86         m_xGrid = new SbaXGridControl( getORB() );
  87         OSL_ENSURE(m_xGrid.is(), "UnoDataBrowserView::Construct : could not create a grid control !");
  88         // in design mode (for the moment)
  89         m_xGrid->setDesignMode(true);
  90         m_xGrid->setVisible(true);
  91         m_xGrid->setEnable(true);
  92
  93         // introduce the model to the grid
  94         m_xGrid->setModel(xModel);
  95         // introduce the container (me) to the grid
  96         Reference< css::beans::XPropertySet >  xModelSet(xModel, UNO_QUERY);
  97         getContainer()->addControl(::comphelper::getString(xModelSet->getPropertyValue(PROPERTY_NAME)), m_xGrid);
  98
  99         // get the VCL-control
 100         m_pVclControl = nullptr;
 101         getVclControl();
 102
 103         OSL_ENSURE(m_pVclControl != nullptr, "UnoDataBrowserView::Construct : no real grid control !");
 104     }
 105     catch(const Exception&)
 106     {
 107         ::comphelper::disposeComponent(m_xGrid);
 108         throw;
 109     }
 110 }
 111
 112 UnoDataBrowserView::~UnoDataBrowserView()
 113 {
 114     disposeOnce();
 115 }
 116
 117 void UnoDataBrowserView::dispose()
 118 {
 119     m_pSplitter.disposeAndClear();
 120     setTreeView(nullptr);
 121
 122     try
 123     {
 124         ::comphelper::disposeComponent(m_xGrid);
 125         ::comphelper::disposeComponent(m_xMe);
 126     }
 127     catch(const Exception&)
 128     {}
 129     m_pTreeView.clear();
 130     m_pVclControl.clear();
 131     ODataView::dispose();
 132 }
 133
 134 IMPL_LINK_NOARG( UnoDataBrowserView, SplitHdl, Splitter*, void )
 135 {
 136     tools::Long nYPos = m_pSplitter->GetPosPixel().Y();
 137     m_pSplitter->SetPosPixel( Point( m_pSplitter->GetSplitPosPixel(), nYPos ) );
 138     Resize();
 139 }
 140
 141 void UnoDataBrowserView::setSplitter(Splitter* _pSplitter)
 142 {
 143     m_pSplitter = _pSplitter;
 144     m_pSplitter->SetSplitHdl( LINK( this, UnoDataBrowserView, SplitHdl ) );
 145     LINK( this, UnoDataBrowserView, SplitHdl ).Call(m_pSplitter);
 146 }
 147
 148 void UnoDataBrowserView::setTreeView(InterimDBTreeListBox* pTreeView)
 149 {
 150     if (m_pTreeView.get() != pTreeView)
 151     {
 152         m_pTreeView.disposeAndClear();
 153         m_pTreeView = pTreeView;
 154     }
 155 }
 156
 157 void UnoDataBrowserView::showStatus( const OUString& _rStatus )
 158 {
 159     if (_rStatus.isEmpty())
 160         hideStatus();
 161     else
 162     {
 163         if (!m_pTreeView)
 164             return;
 165         weld::Label& rLabel = m_pTreeView->GetStatusBar();
 166         rLabel.set_label(_rStatus);
 167         rLabel.show();
 168         Resize();
 169         PaintImmediately();
 170     }
 171 }
 172
 173 void UnoDataBrowserView::hideStatus()
 174 {
 175     if (!m_pTreeView)
 176         return;
 177     weld::Label& rLabel = m_pTreeView->GetStatusBar();
 178     if (!rLabel.get_visible())
 179     {
 180         // nothing to do
 181         return;
 182     }
 183     rLabel.hide();
 184     Resize();
 185     PaintImmediately();
 186 }
 187
 188 void UnoDataBrowserView::resizeDocumentView(tools::Rectangle& _rPlayground)
 189 {
 190     Point   aSplitPos;
 191     Size    aSplitSize;
 192     Point   aPlaygroundPos( _rPlayground.TopLeft() );
 193     Size    aPlaygroundSize( _rPlayground.GetSize() );
 194
 195     if (m_pTreeView && m_pTreeView->IsVisible() && m_pSplitter)
 196     {
 197         // calculate the splitter pos and size
 198         aSplitPos   = m_pSplitter->GetPosPixel();
 199         aSplitPos.setY( aPlaygroundPos.Y() );
 200         aSplitSize  = m_pSplitter->GetOutputSizePixel();
 201         aSplitSize.setHeight( aPlaygroundSize.Height() );
 202
 203         if( ( aSplitPos.X() + aSplitSize.Width() ) > ( aPlaygroundSize.Width() ))
 204             aSplitPos.setX( aPlaygroundSize.Width() - aSplitSize.Width() );
 205
 206         if( aSplitPos.X() <= aPlaygroundPos.X() )
 207             aSplitPos.setX( aPlaygroundPos.X() + sal_Int32(aPlaygroundSize.Width() * 0.2) );
 208
 209         // the tree pos and size
 210         Point   aTreeViewPos( aPlaygroundPos );
 211         Size    aTreeViewSize( aSplitPos.X(), aPlaygroundSize.Height() );
 212
 213         // set the size of treelistbox
 214         m_pTreeView->SetPosSizePixel( aTreeViewPos, aTreeViewSize );
 215         // Call this to trigger InterimItemWindow::Layout immediately, and
 216         // not later on idle so the statusbar will be shown to explain
 217         // a long delay on opening databases
 218         m_pTreeView->Resize();
 219
 220         //set the size of the splitter
 221         m_pSplitter->SetPosSizePixel( aSplitPos, Size( aSplitSize.Width(), aPlaygroundSize.Height() ) );
 222         m_pSplitter->SetDragRectPixel( _rPlayground );
 223     }
 224
 225     // set the size of grid control
 226     if (m_xGrid.is())
 227         m_xGrid->setPosSize( aSplitPos.X() + aSplitSize.Width(), aPlaygroundPos.Y(),
 228                                    aPlaygroundSize.Width() - aSplitSize.Width() - aSplitPos.X(), aPlaygroundSize.Height(), css::awt::PosSize::POSSIZE);
 229
 230     // just for completeness: there is no space left, we occupied it all ...
 231     _rPlayground.SetPos( _rPlayground.BottomRight() );
 232     _rPlayground.SetSize( Size( 0, 0 ) );
 233 }
 234
 235 sal_uInt16 UnoDataBrowserView::View2ModelPos(sal_uInt16 nPos) const
 236 {
 237     return m_pVclControl ? m_pVclControl->GetModelColumnPos(m_pVclControl->GetColumnIdFromViewPos(nPos)) : -1;
 238 }
 239
 240 SbaGridControl* UnoDataBrowserView::getVclControl() const
 241 {
 242     if ( !m_pVclControl )
 243     {
 244         OSL_ENSURE(m_xGrid.is(),"Grid not set!");
 245         if ( m_xGrid.is() )
 246         {
 247             Reference< css::awt::XWindowPeer >  xPeer = m_xGrid->getPeer();
 248             if ( xPeer.is() )
 249             {
 250                 SbaXGridPeer* pPeer = dynamic_cast<SbaXGridPeer*>(xPeer.get());
 251                 UnoDataBrowserView* pTHIS = const_cast<UnoDataBrowserView*>(this);
 252                 if ( pPeer )
 253                 {
 254                     m_pVclControl = static_cast<SbaGridControl*>(pPeer->GetWindow());
 255                     pTHIS->startComponentListening(VCLUnoHelper::GetInterface(m_pVclControl));
 256                 }
 257             }
 258         }
 259     }
 260     return m_pVclControl;
 261 }
 262
 263 void UnoDataBrowserView::GetFocus()
 264 {
 265     ODataView::GetFocus();
 266     if( m_pTreeView && m_pTreeView->IsVisible() && !m_pTreeView->HasChildPathFocus())
 267         m_pTreeView->GrabFocus();
 268     else if (m_pVclControl && m_xGrid.is())
 269     {
 270         bool bGrabFocus = false;
 271         if(!m_pVclControl->HasChildPathFocus())
 272         {
 273             bGrabFocus = isGrabVclControlFocusAllowed(this);
 274             if( bGrabFocus )
 275                 m_pVclControl->GrabFocus();
 276         }
 277         if(!bGrabFocus && m_pTreeView && m_pTreeView->IsVisible() )
 278             m_pTreeView->GrabFocus();
 279     }
 280 }
 281
 282 void UnoDataBrowserView::_disposing( const css::lang::EventObject& /*_rSource*/ )
 283 {
 284     stopComponentListening(VCLUnoHelper::GetInterface(m_pVclControl));
 285     m_pVclControl = nullptr;
 286 }
 287
 288 bool UnoDataBrowserView::PreNotify( NotifyEvent& rNEvt )
 289 {
 290     bool bDone = false;
 291     if(rNEvt.GetType() == NotifyEventType::KEYINPUT)
 292     {
 293         bool bGrabAllowed = isGrabVclControlFocusAllowed(this);
 294         if ( bGrabAllowed )
 295         {
 296             const KeyEvent* pKeyEvt = rNEvt.GetKeyEvent();
 297             const vcl::KeyCode& rKeyCode = pKeyEvt->GetKeyCode();
 298             if (  ( rKeyCode == vcl::KeyCode( KEY_E, true, true, false, false ) )
 299                || ( rKeyCode == vcl::KeyCode( KEY_TAB, true, false, false, false ) )
 300                )
 301             {
 302                 if ( m_pTreeView && m_pVclControl && m_pTreeView->HasChildPathFocus() )
 303                     m_pVclControl->GrabFocus();
 304                 else if ( m_pTreeView && m_pVclControl && m_pVclControl->HasChildPathFocus() )
 305                     m_pTreeView->GrabFocus();
 306
 307                 bDone = true;
 308             }
 309         }
 310     }
 311     return bDone || ODataView::PreNotify(rNEvt);
 312 }
 313
 314 BrowserViewStatusDisplay::BrowserViewStatusDisplay( UnoDataBrowserView* _pView, const OUString& _rStatus )
 315     :m_pView(_pView)
 316 {
 317
 318     if (m_pView)
 319         m_pView->showStatus(_rStatus);
 320 }
 321
 322 BrowserViewStatusDisplay::~BrowserViewStatusDisplay( )
 323 {
 324     if (m_pView)
 325         m_pView->showStatus(OUString());
 326
 327 }
 328
 329 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */