xref: /trunk/main/sc/source/ui/vba/vbapane.hxx (revision cdf0e10c)
1  /*************************************************************************
2   *
3   * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4   *
5   * Copyright 2000, 2010 Oracle and/or its affiliates.
6   *
7   * OpenOffice.org - a multi-platform office productivity suite
8   *
9   * This file is part of OpenOffice.org.
10   *
11   * OpenOffice.org is free software: you can redistribute it and/or modify
12   * it under the terms of the GNU Lesser General Public License version 3
13   * only, as published by the Free Software Foundation.
14   *
15   * OpenOffice.org is distributed in the hope that it will be useful,
16   * but WITHOUT ANY WARRANTY; without even the implied warranty of
17   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18   * GNU Lesser General Public License version 3 for more details
19   * (a copy is included in the LICENSE file that accompanied this code).
20   *
21   * You should have received a copy of the GNU Lesser General Public License
22   * version 3 along with OpenOffice.org.  If not, see
23   * <http://www.openoffice.org/license.html>
24   * for a copy of the LGPLv3 License.
25   *
26   ************************************************************************/
27  #ifndef SC_VBA_PANE_HXX
28  #define SC_VBA_PANE_HXX
29  
30  #include <com/sun/star/sheet/XViewPane.hpp>
31  #include <ooo/vba/excel/XPane.hpp>
32  #include <vbahelper/vbahelperinterface.hxx>
33  #include "excelvbahelper.hxx"
34  
35  typedef InheritedHelperInterfaceImpl1< ov::excel::XPane > ScVbaPane_BASE;
36  
37  class ScVbaPane : public ScVbaPane_BASE
38  {
39  public:
40      ScVbaPane(
41          const css::uno::Reference< ov::XHelperInterface >& xParent,
42          const css::uno::Reference< css::uno::XComponentContext >& xContext,
43          const css::uno::Reference< css::frame::XModel >& xModel,
44          const css::uno::Reference< css::sheet::XViewPane > xViewPane ) throw (css::uno::RuntimeException);
45  
46      css::uno::Reference< css::sheet::XViewPane > getViewPane() { return m_xViewPane; }
47  
48      // XPane attributes
49      virtual sal_Int32 SAL_CALL getScrollColumn() throw (css::uno::RuntimeException);
50      virtual void SAL_CALL setScrollColumn( sal_Int32 _scrollcolumn ) throw (css::uno::RuntimeException);
51      virtual sal_Int32 SAL_CALL getScrollRow() throw (css::uno::RuntimeException);
52      virtual void SAL_CALL setScrollRow( sal_Int32 _scrollrow ) throw (css::uno::RuntimeException);
53   	virtual css::uno::Reference< ov::excel::XRange > SAL_CALL getVisibleRange() throw (css::uno::RuntimeException);
54  
55      // XPane methods
56      virtual void SAL_CALL SmallScroll( const css::uno::Any& Down, const css::uno::Any& Up, const css::uno::Any& ToRight, const css::uno::Any& ToLeft ) throw (css::uno::RuntimeException);
57      virtual void SAL_CALL LargeScroll( const css::uno::Any& Down, const css::uno::Any& Up, const css::uno::Any& ToRight, const css::uno::Any& ToLeft ) throw (css::uno::RuntimeException);
58  
59  	// XHelperInterface
60      VBAHELPER_DECL_XHELPERINTERFACE
61  
62  protected:
63  	css::uno::Reference< css::frame::XModel > m_xModel;
64      css::uno::Reference< css::sheet::XViewPane > m_xViewPane;
65  };
66  
67  #endif //SC_VBA_PANE_HXX
68