dbaccess/source/ui/control/ScrollHelper.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*************************************************************************
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * Copyright 2000, 2010 Oracle and/or its affiliates.
   7  *
   8  * OpenOffice.org - a multi-platform office productivity suite
   9  *
  10  * This file is part of OpenOffice.org.
  11  *
  12  * OpenOffice.org is free software: you can redistribute it and/or modify
  13  * it under the terms of the GNU Lesser General Public License version 3
  14  * only, as published by the Free Software Foundation.
  15  *
  16  * OpenOffice.org is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU Lesser General Public License version 3 for more details
  20  * (a copy is included in the LICENSE file that accompanied this code).
  21  *
  22  * You should have received a copy of the GNU Lesser General Public License
  23  * version 3 along with OpenOffice.org.  If not, see
  24  * <http://www.openoffice.org/license.html>
  25  * for a copy of the LGPLv3 License.
  26  *
  27  ************************************************************************/
  28
  29
  30 #include "ScrollHelper.hxx"
  31 #include <tools/debug.hxx>
  32
  33 #define LISTBOX_SCROLLING_AREA  12
  34 namespace dbaui
  35 {
  36 DBG_NAME(OScrollHelper)
  37
  38 // -----------------------------------------------------------------------------
  39
  40
  41     OScrollHelper::OScrollHelper()
  42     {
  43         DBG_CTOR(OScrollHelper,NULL);
  44     }
  45     // -----------------------------------------------------------------------------
  46     OScrollHelper::~OScrollHelper()
  47     {
  48
  49         DBG_DTOR(OScrollHelper,NULL);
  50     }
  51     // -----------------------------------------------------------------------------
  52     void OScrollHelper::scroll(const Point& _rPoint, const Size& _rOutputSize)
  53     {
  54         // Scrolling Areas
  55         Rectangle aScrollArea( Point(0, _rOutputSize.Height() - LISTBOX_SCROLLING_AREA),
  56                                      Size(_rOutputSize.Width(), LISTBOX_SCROLLING_AREA) );
  57
  58         Link aToCall;
  59         // if pointer in bottom area begin scroll
  60         if( aScrollArea.IsInside(_rPoint) )
  61             aToCall = m_aUpScroll;
  62         else
  63         {
  64             aScrollArea.SetPos(Point(0,0));
  65             // if pointer in top area begin scroll
  66             if( aScrollArea.IsInside(_rPoint) )
  67                 aToCall = m_aDownScroll;
  68         }
  69         if ( aToCall.IsSet() )
  70             aToCall.Call( NULL );
  71     }
  72     // -----------------------------------------------------------------------------
  73 }
  74 // -----------------------------------------------------------------------------
  75
  76
  77 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */