mir/libreoffice
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
63bb17180bb8601e07671069a68a463d6279ca3c
libreoffice/svx/source/fmcomp/gridctrl.cxx

3654 lines
129 KiB
C++
Raw Normal View History

initial import
2000-09-18 16:07:07 +00:00
/*************************************************************************
*
* $RCSfile: gridctrl.cxx,v $
*
#84686# call a FmGridSelectionListener if the selection changes
2001-05-16 13:16:06 +00:00
* $Revision: 1.22 $
initial import
2000-09-18 16:07:07 +00:00
*
#84686# call a FmGridSelectionListener if the selection changes
2001-05-16 13:16:06 +00:00
* last change: $Author: fs $ $Date: 2001-05-16 14:16:06 $
initial import
2000-09-18 16:07:07 +00:00
*
* The Contents of this file are made available subject to the terms of
* either of the following licenses
*
* - GNU Lesser General Public License Version 2.1
* - Sun Industry Standards Source License Version 1.1
*
* Sun Microsystems Inc., October, 2000
*
* GNU Lesser General Public License Version 2.1
* =============================================
* Copyright 2000 by Sun Microsystems, Inc.
* 901 San Antonio Road, Palo Alto, CA 94303, USA
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License version 2.1, as published by the Free Software Foundation.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307 USA
*
*
* Sun Industry Standards Source License Version 1.1
* =================================================
* The contents of this file are subject to the Sun Industry Standards
* Source License Version 1.1 (the "License"); You may not use this file
* except in compliance with the License. You may obtain a copy of the
* License at http://www.openoffice.org/license.html.
*
* Software provided under this License is provided on an "AS IS" basis,
* WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
* WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
* MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
* See the License for the specific provisions governing your rights and
* obligations concerning the Software.
*
* The Initial Developer of the Original Code is: Sun Microsystems, Inc.
*
* Copyright: 2000 by Sun Microsystems, Inc.
*
* All Rights Reserved.
*
* Contributor(s): _______________________________________
*
*
************************************************************************/
#pragma hdrstop
#ifndef _SVX_FMHELP_HRC
#include "fmhelp.hrc"
#endif
#ifndef _SVX_GRIDCTRL_HXX
#include "gridctrl.hxx"
#endif
#ifndef _SVX_GRIDCELL_HXX
#include "gridcell.hxx"
#endif
#ifndef _SVX_FMTOOLS_HXX
#include "fmtools.hxx"
#endif
#ifndef _SVX_FMPROP_HXX
#include "fmprop.hxx"
#endif
#ifndef _SVX_FMPROP_HRC
#include "fmprop.hrc"
#endif
new DnD implementations
2001-03-27 13:38:03 +00:00
#ifndef _SVTOOLS_STRINGTRANSFER_HXX_
#include <svtools/stringtransfer.hxx>
#endif
initial import
2000-09-18 16:07:07 +00:00
#ifndef _COM_SUN_STAR_SDB_XRESULTSETACCESS_HPP_
#include <com/sun/star/sdb/XResultSetAccess.hpp>
#endif
#ifndef _COM_SUN_STAR_SDBC_XRESULTSETUPDATE_HPP_
#include <com/sun/star/sdbc/XResultSetUpdate.hpp>
#endif
#ifndef _COM_SUN_STAR_SDBCX_PRIVILEGE_HPP_
#include <com/sun/star/sdbcx/Privilege.hpp>
#endif
#ifndef _COM_SUN_STAR_CONTAINER_XCHILD_HPP_
#include <com/sun/star/container/XChild.hpp>
#endif
#ifndef _COM_SUN_STAR_UTIL_XNUMBERFORMATTER_HPP_
#include <com/sun/star/util/XNumberFormatter.hpp>
#endif
#ifndef _COM_SUN_STAR_UTIL_XNUMBERFORMATSSUPPLIER_HPP_
#include <com/sun/star/util/XNumberFormatsSupplier.hpp>
#endif
#ifndef _COM_SUN_STAR_UTIL_XCLONEABLE_HPP_
#include <com/sun/star/util/XCloneable.hpp>
#endif
#ifndef _COM_SUN_STAR_BEANS_XPROPERTYSET_HPP_
#include <com/sun/star/beans/XPropertySet.hpp>
#endif
#ifndef _COM_SUN_STAR_BEANS_PROPERTYCHANGEEVENT_HPP_
#include <com/sun/star/beans/PropertyChangeEvent.hpp>
#endif
cppuhelper/extract -> comphelper/extract
2001-03-15 08:02:28 +00:00
#ifndef _COMPHELPER_EXTRACT_HXX_
#include <comphelper/extract.hxx>
initial import
2000-09-18 16:07:07 +00:00
#endif
#ifndef _TOOLS_RESID_HXX //autogen
#include <tools/resid.hxx>
#endif
#ifndef _SV_SYSTEM_HXX //autogen
#include <vcl/system.hxx>
#endif
#ifndef _SV_SOUND_HXX //autogen
#include <vcl/sound.hxx>
#endif
#ifndef _SV_DRAG_HXX //autogen
#include <vcl/drag.hxx>
#endif
#ifndef _SV_MENU_HXX //autogen
#include <vcl/menu.hxx>
#endif
#ifndef _SV_CLIP_HXX //autogen
#include <vcl/clip.hxx>
#endif
#ifndef _SVX_FMRESIDS_HRC
#include "fmresids.hrc"
#endif
#ifndef _SVX_SVXIDS_HRC
#include "svxids.hrc"
#endif
#ifndef _SHL_HXX
#include <tools/shl.hxx>
#endif
#ifndef _SVX_DIALMGR_HXX
#include "dialmgr.hxx"
#endif
#ifndef _SVX_FMSERVS_HXX
#include "fmservs.hxx"
#endif
#define CURSORPOSITION_UNKNOWN -2
#define HANDLE_ID 0
String INVALIDTEXT = String::CreateFromAscii("###");
String OBJECTTEXT = String::CreateFromAscii("<OBJECT>");
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
#ifndef _COMPHELPER_STLTYPES_HXX_
#include <comphelper/stl_types.hxx>
initial import
2000-09-18 16:07:07 +00:00
#endif
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
#ifndef _CONNECTIVITY_DBTOOLS_HXX_
#include <connectivity/dbtools.hxx>
initial import
2000-09-18 16:07:07 +00:00
#endif
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
#ifndef _DBHELPER_DBCONVERSION_HXX_
#include <connectivity/dbconversion.hxx>
initial import
2000-09-18 16:07:07 +00:00
#endif
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
#ifndef _COMPHELPER_DATETIME_HXX_
#include <comphelper/datetime.hxx>
#endif
#ifndef _COMPHELPER_PROPERTY_HXX_
#include <comphelper/property.hxx>
initial import
2000-09-18 16:07:07 +00:00
#endif
#ifndef _TRACE_HXX_
#include "trace.hxx"
#endif
#82151# put the string constants into a namespace - needed to disambiguate the symbols for solaris
2000-12-18 07:22:38 +00:00
using namespace ::dbtools;
using namespace ::svxform;
new DnD implementations
2001-03-27 13:38:03 +00:00
using namespace ::svt;
forgot namespace
2000-11-16 07:32:22 +00:00
using namespace ::com::sun::star::uno;
new DnD implementations
2001-03-27 13:38:03 +00:00
using namespace ::com::sun::star::datatransfer;
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
initial import
2000-09-18 16:07:07 +00:00
#define ROWSTATUS(row) !row.Is() ? "NULL" : row->GetStatus() == GRS_CLEAN ? "CLEAN" : row->GetStatus() == GRS_MODIFIED ? "MODIFIED" : row->GetStatus() == GRS_DELETED ? "DELETED" : "INVALID"
//==============================================================================
class GridFieldValueListener;
DECLARE_STL_MAP(sal_uInt16, GridFieldValueListener*, ::std::less<sal_uInt16>, ColumnFieldValueListeners);
//==============================================================================
DBG_NAME(GridFieldValueListener);
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
class GridFieldValueListener : protected ::comphelper::OPropertyChangeListener
initial import
2000-09-18 16:07:07 +00:00
{
osl::Mutex m_aMutex;
DbGridControl& m_rParent;
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
::comphelper::OPropertyChangeMultiplexer* m_pRealListener;
initial import
2000-09-18 16:07:07 +00:00
sal_uInt16 m_nId;
sal_Int16 m_nSuspended;
sal_Bool m_bDisposed : 1;
public:
GridFieldValueListener(DbGridControl& _rParent, const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet >& xField, sal_uInt16 _nId);
virtual ~GridFieldValueListener();
virtual void _propertyChanged(const ::com::sun::star::beans::PropertyChangeEvent& evt) throw( ::com::sun::star::uno::RuntimeException );
void suspend() { ++m_nSuspended; }
void resume() { --m_nSuspended; }
void dispose();
};
//------------------------------------------------------------------------------
GridFieldValueListener::GridFieldValueListener(DbGridControl& _rParent, const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet >& _rField, sal_uInt16 _nId)
:OPropertyChangeListener(m_aMutex)
,m_rParent(_rParent)
,m_nId(_nId)
,m_pRealListener(NULL)
,m_bDisposed(sal_False)
,m_nSuspended(0)
{
DBG_CTOR(GridFieldValueListener, NULL);
if (_rField.is())
{
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
m_pRealListener = new ::comphelper::OPropertyChangeMultiplexer(this, _rField);
initial import
2000-09-18 16:07:07 +00:00
m_pRealListener->addProperty(FM_PROP_VALUE);
m_pRealListener->acquire();
}
}
//------------------------------------------------------------------------------
GridFieldValueListener::~GridFieldValueListener()
{
DBG_DTOR(GridFieldValueListener, NULL);
dispose();
}
//------------------------------------------------------------------------------
void GridFieldValueListener::_propertyChanged(const ::com::sun::star::beans::PropertyChangeEvent& _evt) throw( ::com::sun::star::uno::RuntimeException )
{
DBG_ASSERT(m_nSuspended>=0, "GridFieldValueListener::_propertyChanged : resume > suspend !");
if (m_nSuspended <= 0)
m_rParent.FieldValueChanged(m_nId, _evt);
}
//------------------------------------------------------------------------------
void GridFieldValueListener::dispose()
{
if (m_bDisposed)
{
DBG_ASSERT(m_pRealListener == NULL, "GridFieldValueListener::dispose : inconsistent !");
return;
}
if (m_pRealListener)
{
m_pRealListener->dispose();
m_pRealListener->release();
m_pRealListener = NULL;
}
m_bDisposed = sal_True;
m_rParent.FieldListenerDisposing(m_nId);
}
//==============================================================================
class DisposeListenerGridBridge : public FmXDisposeListener
{
osl::Mutex m_aMutex;
DbGridControl& m_rParent;
FmXDisposeMultiplexer* m_pRealListener;
public:
DisposeListenerGridBridge( DbGridControl& _rParent, const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XComponent >& _rxObject, sal_Int16 _rId = -1);
virtual ~DisposeListenerGridBridge();
virtual void disposing(const ::com::sun::star::lang::EventObject& _rEvent, sal_Int16 _nId) throw( ::com::sun::star::uno::RuntimeException ) { m_rParent.disposing(_nId, _rEvent); }
};
//==============================================================================
DBG_NAME(DisposeListenerGridBridge);
//------------------------------------------------------------------------------
DisposeListenerGridBridge::DisposeListenerGridBridge(DbGridControl& _rParent, const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XComponent >& _rxObject, sal_Int16 _rId)
:FmXDisposeListener(m_aMutex)
,m_rParent(_rParent)
,m_pRealListener(NULL)
{
DBG_CTOR(DisposeListenerGridBridge,NULL);
if (_rxObject.is())
{
m_pRealListener = new FmXDisposeMultiplexer(this, _rxObject, _rId);
m_pRealListener->acquire();
}
}
//------------------------------------------------------------------------------
DisposeListenerGridBridge::~DisposeListenerGridBridge()
{
if (m_pRealListener)
{
m_pRealListener->dispose();
m_pRealListener->release();
m_pRealListener = NULL;
}
DBG_DTOR(DisposeListenerGridBridge,NULL);
}
//==============================================================================
static sal_uInt16 ControlMap[] =
{
DbGridControl::NavigationBar::RECORD_TEXT,
DbGridControl::NavigationBar::RECORD_ABSOLUTE,
DbGridControl::NavigationBar::RECORD_OF,
DbGridControl::NavigationBar::RECORD_COUNT,
DbGridControl::NavigationBar::RECORD_FIRST,
DbGridControl::NavigationBar::RECORD_NEXT,
DbGridControl::NavigationBar::RECORD_PREV,
DbGridControl::NavigationBar::RECORD_LAST,
DbGridControl::NavigationBar::RECORD_NEW,
0
};
//------------------------------------------------------------------------------
sal_Bool CompareBookmark(const ::com::sun::star::uno::Any& aLeft, const ::com::sun::star::uno::Any& aRight)
{
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
return ::comphelper::compare(aLeft, aRight);
initial import
2000-09-18 16:07:07 +00:00
}
//==============================================================================
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
class FmXGridSourcePropListener : public ::comphelper::OPropertyChangeListener
initial import
2000-09-18 16:07:07 +00:00
{
DbGridControl* m_pParent;
// a DbGridControl has no mutex, so we use our own as the base class expects one
osl::Mutex m_aMutex;
sal_Int16 m_nSuspended;
public:
FmXGridSourcePropListener(DbGridControl* _pParent);
void suspend() { ++m_nSuspended; }
void resume() { --m_nSuspended; }
virtual void _propertyChanged(const ::com::sun::star::beans::PropertyChangeEvent& evt) throw( ::com::sun::star::uno::RuntimeException );
};
//------------------------------------------------------------------------------
FmXGridSourcePropListener::FmXGridSourcePropListener(DbGridControl* _pParent)
:OPropertyChangeListener(m_aMutex)
,m_pParent(_pParent)
,m_nSuspended(0)
{
DBG_ASSERT(m_pParent, "FmXGridSourcePropListener::FmXGridSourcePropListener : invalid parent !");
}
//------------------------------------------------------------------------------
void FmXGridSourcePropListener::_propertyChanged(const ::com::sun::star::beans::PropertyChangeEvent& evt) throw( ::com::sun::star::uno::RuntimeException )
{
DBG_ASSERT(m_nSuspended>=0, "FmXGridSourcePropListener::_propertyChanged : resume > suspend !");
if (m_nSuspended <= 0)
m_pParent->DataSourcePropertyChanged(evt);
}
//==============================================================================
//------------------------------------------------------------------------------
DbGridControl::NavigationBar::AbsolutePos::AbsolutePos(Window* pParent, WinBits nStyle)
:NumericField(pParent, nStyle)
{
SetMin(1);
SetFirst(1);
SetSpinSize(1);
International rInt = GetInternational();
rInt.EnableNumThousandSep(sal_False);
SetInternational(rInt);
SetDecimalDigits(0);
SetStrictFormat(sal_True);
}
//------------------------------------------------------------------------------
void DbGridControl::NavigationBar::AbsolutePos::KeyInput(const KeyEvent& rEvt)
{
if (rEvt.GetKeyCode() == KEY_RETURN && GetText().Len())
{
sal_Int32 nRecord = GetValue();
if (nRecord < GetMin() || nRecord > GetMax())
return;
else
((NavigationBar*)GetParent())->PositionDataSource(nRecord);
}
else if (rEvt.GetKeyCode() == KEY_TAB)
GetParent()->GetParent()->GrabFocus();
else
NumericField::KeyInput(rEvt);
}
//------------------------------------------------------------------------------
void DbGridControl::NavigationBar::AbsolutePos::LoseFocus()
{
NumericField::LoseFocus();
sal_Int32 nRecord = GetValue();
if (nRecord < GetMin() || nRecord > GetMax())
return;
else
{
((NavigationBar*)GetParent())->PositionDataSource(nRecord);
((NavigationBar*)GetParent())->InvalidateState(NavigationBar::RECORD_ABSOLUTE);
}
}
//------------------------------------------------------------------------------
void DbGridControl::NavigationBar::PositionDataSource(sal_Int32 nRecord)
{
if (m_bPositioning)
return;
// the MoveToPosition may cause a LoseFocus which would lead to a second MoveToPosition, so protect agains this
// recursion
// 68167 - 13.08.99 - FS
m_bPositioning = sal_True;
((DbGridControl*)GetParent())->MoveToPosition(nRecord - 1);
m_bPositioning = sal_False;
}
//------------------------------------------------------------------------------
DbGridControl::NavigationBar::NavigationBar(Window* pParent, WinBits nStyle)
:Control(pParent, nStyle)
,m_aRecordText(this)
,m_aAbsolute(this)
,m_aRecordOf(this)
,m_aRecordCount(this, WinBits(WB_CENTER))
,m_aFirstBtn(this, WB_RECTSTYLE|WB_NOPOINTERFOCUS)
,m_aPrevBtn(this, WB_REPEAT|WB_RECTSTYLE|WB_NOPOINTERFOCUS)
,m_aNextBtn(this, WB_REPEAT|WB_RECTSTYLE|WB_NOPOINTERFOCUS)
,m_aLastBtn(this, WB_RECTSTYLE|WB_NOPOINTERFOCUS)
,m_aNewBtn(this, WB_RECTSTYLE|WB_NOPOINTERFOCUS)
,m_nDefaultWidth(0)
,m_nCurrentPos(-1)
,m_bPositioning(sal_False)
{
m_aFirstBtn.SetSymbol(SYMBOL_FIRST);
m_aPrevBtn.SetSymbol(SYMBOL_PREV);
m_aNextBtn.SetSymbol(SYMBOL_NEXT);
m_aLastBtn.SetSymbol(SYMBOL_LAST);
m_aNewBtn.SetImage(((DbGridControl*)pParent)->GetImage(DbBrowseBox::NEW));
m_aFirstBtn.SetHelpId(HID_GRID_TRAVEL_FIRST);
m_aPrevBtn.SetHelpId(HID_GRID_TRAVEL_PREV);
m_aNextBtn.SetHelpId(HID_GRID_TRAVEL_NEXT);
m_aLastBtn.SetHelpId(HID_GRID_TRAVEL_LAST);
m_aNewBtn.SetHelpId(HID_GRID_TRAVEL_NEW);
m_aAbsolute.SetHelpId(HID_GRID_TRAVEL_ABSOLUTE);
m_aRecordCount.SetHelpId(HID_GRID_NUMBEROFRECORDS);
// Handler fuer Buttons einrichten
m_aFirstBtn.SetClickHdl(LINK(this,NavigationBar,OnClick));
m_aPrevBtn.SetClickHdl(LINK(this,NavigationBar,OnClick));
m_aNextBtn.SetClickHdl(LINK(this,NavigationBar,OnClick));
m_aLastBtn.SetClickHdl(LINK(this,NavigationBar,OnClick));
m_aNewBtn.SetClickHdl(LINK(this,NavigationBar,OnClick));
m_aRecordText.SetText(XubString(SVX_RES(RID_STR_REC_TEXT)));
m_aRecordOf.SetText(XubString(SVX_RES(RID_STR_REC_FROM_TEXT)));
m_aRecordCount.SetText('?');
m_nDefaultWidth = ArrangeControls();
m_aFirstBtn.Disable();
m_aPrevBtn.Disable();
m_aNextBtn.Disable();
m_aLastBtn.Disable();
m_aNewBtn.Disable();
m_aRecordText.Disable();
m_aRecordOf.Disable();
m_aRecordCount.Disable();
m_aAbsolute.Disable();
AllSettings aSettings = m_aNextBtn.GetSettings();
MouseSettings aMouseSettings = aSettings.GetMouseSettings();
aMouseSettings.SetButtonRepeat(aMouseSettings.GetButtonRepeat() / 4);
aSettings.SetMouseSettings(aMouseSettings);
m_aNextBtn.SetSettings(aSettings, sal_True);
m_aPrevBtn.SetSettings(aSettings, sal_True);
m_aFirstBtn.Show();
m_aPrevBtn.Show();
m_aNextBtn.Show();
m_aLastBtn.Show();
m_aNewBtn.Show();
m_aRecordText.Show();
m_aRecordOf.Show();
m_aRecordCount.Show();
m_aAbsolute.Show();
}
//------------------------------------------------------------------------------
sal_uInt16 DbGridControl::NavigationBar::ArrangeControls()
{
// Positionierung der Controls
// Basisgroessen ermitteln
sal_uInt16 nX = 0;
sal_uInt16 nY = 0;
Rectangle aRect(((DbGridControl*)GetParent())->GetControlArea());
const long nH = aRect.GetSize().Height() - 1;
Size aBorder = LogicToPixel(Size(3, 3),MAP_APPFONT);
aBorder = Size(CalcZoom(aBorder.Width()), CalcZoom(aBorder.Height()));
// Controls Groessen und Positionen setzen
//
XubString aText = m_aRecordText.GetText();
long nTextWidth = m_aRecordText.GetTextWidth(aText);
m_aRecordText.SetPosPixel(Point(nX,nY+1) );
m_aRecordText.SetSizePixel(Size(nTextWidth,nH));
nX += (sal_uInt16)(nTextWidth + aBorder.Width());
m_aAbsolute.SetPosPixel( Point(nX,nY));
m_aAbsolute.SetSizePixel( Size(3*nH,aRect.GetSize().Height()) ); // Heuristik XXXXXXX
nX += (sal_uInt16)((3*nH) + aBorder.Width());
aText = m_aRecordOf.GetText();
nTextWidth = m_aRecordOf.GetTextWidth(aText);
m_aRecordOf.SetPosPixel(Point(nX,nY+1) );
m_aRecordOf.SetSizePixel(Size(nTextWidth,nH));
nX += (sal_uInt16)(nTextWidth + aBorder.Width());
nTextWidth = m_aRecordCount.GetTextWidth( String::CreateFromAscii("0000000 (00000)") );
m_aRecordCount.SetPosPixel(Point(nX,nY+1) );
m_aRecordCount.SetSizePixel(Size(nTextWidth,nH));
nX += (sal_uInt16)(nTextWidth + aBorder.Width());
m_aFirstBtn.SetPosPixel( Point(nX,nY) );
m_aFirstBtn.SetSizePixel( Size(nH,nH) );
nX += (sal_uInt16)nH;
m_aPrevBtn.SetPosPixel( Point(nX,nY) );
m_aPrevBtn.SetSizePixel( Size(nH,nH) );
nX += (sal_uInt16)nH;
m_aNextBtn.SetPosPixel( Point(nX,nY) );
m_aNextBtn.SetSizePixel( Size(nH,nH) );
nX += (sal_uInt16)nH;
m_aLastBtn.SetPosPixel( Point(nX,nY) );
m_aLastBtn.SetSizePixel( Size(nH,nH) );
nX += (sal_uInt16)nH;
m_aNewBtn.SetPosPixel( Point(nX,nY) );
m_aNewBtn.SetSizePixel( Size(nH,nH) );
nX += (sal_uInt16)(nH + aBorder.Width());
// Ist der Font des Edits groesser als das Feld?
Font aOutputFont = m_aAbsolute.GetFont();
if (aOutputFont.GetSize().Height() > nH)
{
Font aApplFont = System::GetStandardFont(STDFONT_SWISS);
aApplFont.SetSize(Size(0, nH-2));
m_aAbsolute.SetFont(aApplFont);
aApplFont.SetTransparent( sal_True );
m_aRecordText.SetFont( aApplFont );
m_aRecordOf.SetFont( aApplFont );
m_aRecordCount.SetFont( aApplFont );
}
return nX;
}
//------------------------------------------------------------------------------
IMPL_LINK(DbGridControl::NavigationBar, OnClick, Button *, pButton )
{
DbGridControl* pParent = (DbGridControl*)GetParent();
if (pParent->m_aMasterSlotExecutor.IsSet())
{
long lResult = 0;
if (pButton == &m_aFirstBtn)
lResult = pParent->m_aMasterSlotExecutor.Call((void*)RECORD_FIRST);
else if( pButton == &m_aPrevBtn )
lResult = pParent->m_aMasterSlotExecutor.Call((void*)RECORD_PREV);
else if( pButton == &m_aNextBtn )
lResult = pParent->m_aMasterSlotExecutor.Call((void*)RECORD_NEXT);
else if( pButton == &m_aLastBtn )
lResult = pParent->m_aMasterSlotExecutor.Call((void*)RECORD_LAST);
else if( pButton == &m_aNewBtn )
lResult = pParent->m_aMasterSlotExecutor.Call((void*)RECORD_NEW);
if (lResult)
// the link already handled it
return 0;
}
if (pButton == &m_aFirstBtn)
pParent->MoveToFirst();
else if( pButton == &m_aPrevBtn )
pParent->MoveToPrev();
else if( pButton == &m_aNextBtn )
pParent->MoveToNext();
else if( pButton == &m_aLastBtn )
pParent->MoveToLast();
else if( pButton == &m_aNewBtn )
pParent->AppendNew();
return 0;
}
//------------------------------------------------------------------------------
void DbGridControl::NavigationBar::InvalidateAll(sal_uInt32 nCurrentPos, sal_Bool bAll)
{
if (m_nCurrentPos != nCurrentPos || nCurrentPos < 0 || bAll)
{
DbGridControl* pParent = (DbGridControl*)GetParent();
// Wann mu<6D> alles invalidiert werden
if (bAll || m_nCurrentPos <= 0 ||
nCurrentPos <= 0 ||
use of correct position
2000-09-22 08:44:02 +00:00
m_nCurrentPos >= (pParent->GetRowCount() - ((pParent->GetOptions() & DbGridControl::OPT_INSERT) ? 2 : 1)) ||
nCurrentPos >= (pParent->GetRowCount() - ((pParent->GetOptions() & DbGridControl::OPT_INSERT) ? 2 : 1)))
initial import
2000-09-18 16:07:07 +00:00
{
m_nCurrentPos = nCurrentPos;
int i = 0;
while (ControlMap[i])
SetState(ControlMap[i++]);
}
else // befindet sich in der Mitte
{
m_nCurrentPos = nCurrentPos;
SetState(NavigationBar::RECORD_COUNT);
SetState(NavigationBar::RECORD_ABSOLUTE);
}
}
}
//------------------------------------------------------------------------------
sal_Bool DbGridControl::NavigationBar::GetState(sal_uInt16 nWhich) const
{
DbGridControl* pParent = (DbGridControl*)GetParent();
if (!pParent->IsOpen() || pParent->IsDesignMode() || !pParent->IsEnabled()
|| pParent->IsFilterMode() )
return sal_False;
else
{
// check if we have a master state provider
if (pParent->m_aMasterStateProvider.IsSet())
{
long nState = pParent->m_aMasterStateProvider.Call((void*)nWhich);
if (nState>=0)
return (nState>0);
}
sal_Bool bAvailable = sal_True;
switch (nWhich)
{
case NavigationBar::RECORD_FIRST:
case NavigationBar::RECORD_PREV:
bAvailable = m_nCurrentPos > 0;
break;
case NavigationBar::RECORD_NEXT:
corrected navigation bar
2000-09-29 07:25:14 +00:00
if(pParent->m_bRecordCountFinal)
{
bAvailable = m_nCurrentPos < (pParent->GetRowCount() - 1);
if (!bAvailable && pParent->GetOptions() & DbGridControl::OPT_INSERT)
bAvailable = (m_nCurrentPos == (pParent->GetRowCount() - 2)) && pParent->IsModified();
}
initial import
2000-09-18 16:07:07 +00:00
break;
case NavigationBar::RECORD_LAST:
corrected navigation bar
2000-09-29 07:25:14 +00:00
if(pParent->m_bRecordCountFinal)
{
if (pParent->GetOptions() & DbGridControl::OPT_INSERT)
bAvailable = pParent->IsCurrentAppending() ? pParent->GetRowCount() > 1 :
m_nCurrentPos != (pParent->GetRowCount() - 2);
else
bAvailable = m_nCurrentPos != (pParent->GetRowCount() - 1);
}
initial import
2000-09-18 16:07:07 +00:00
break;
case NavigationBar::RECORD_NEW:
bAvailable = (pParent->GetOptions() & DbGridControl::OPT_INSERT) && pParent->GetRowCount() && m_nCurrentPos < (pParent->GetRowCount() - 1);
break;
case NavigationBar::RECORD_ABSOLUTE:
bAvailable = pParent->GetRowCount() > 0;
break;
}
return bAvailable;
}
}
//------------------------------------------------------------------------------
void DbGridControl::NavigationBar::SetState(sal_uInt16 nWhich)
{
sal_Bool bAvailable = GetState(nWhich);
DbGridControl* pParent = (DbGridControl*)GetParent();
Window* pWnd = NULL;
switch (nWhich)
{
case NavigationBar::RECORD_FIRST:
pWnd = &m_aFirstBtn;
break;
case NavigationBar::RECORD_PREV:
pWnd = &m_aPrevBtn;
break;
case NavigationBar::RECORD_NEXT:
pWnd = &m_aNextBtn;
break;
case NavigationBar::RECORD_LAST:
pWnd = &m_aLastBtn;
break;
case NavigationBar::RECORD_NEW:
pWnd = &m_aNewBtn;
break;
case NavigationBar::RECORD_ABSOLUTE:
pWnd = &m_aAbsolute;
if (bAvailable)
{
if (pParent->m_nTotalCount >= 0)
{
if (pParent->IsCurrentAppending())
m_aAbsolute.SetMax(pParent->m_nTotalCount + 1);
else
m_aAbsolute.SetMax(pParent->m_nTotalCount);
}
else
m_aAbsolute.SetMax(LONG_MAX);
m_aAbsolute.SetValue(m_nCurrentPos + 1);
}
else
m_aAbsolute.SetText(String());
break;
case NavigationBar::RECORD_TEXT:
pWnd = &m_aRecordText;
break;
case NavigationBar::RECORD_OF:
pWnd = &m_aRecordOf;
break;
case NavigationBar::RECORD_COUNT:
{
pWnd = &m_aRecordCount;
String aText;
if (bAvailable)
{
if (pParent->GetOptions() & DbGridControl::OPT_INSERT)
{
if (pParent->IsCurrentAppending() && !pParent->IsModified())
aText = String::CreateFromInt32(pParent->GetRowCount());
else
aText = String::CreateFromInt32(pParent->GetRowCount() - 1);
}
else
aText = String::CreateFromInt32(pParent->GetRowCount());
}
else
aText = String();
// add the number of selected rows, if applicable
if (pParent->GetSelectRowCount())
{
String aExtendedInfo(aText);
aExtendedInfo.AppendAscii(" (");
aExtendedInfo += String::CreateFromInt32(pParent->GetSelectRowCount());
aExtendedInfo += ')';
pWnd->SetText(aExtendedInfo);
}
else
pWnd->SetText(aText);
{
vos::OGuard aPaintSafety(Application::GetSolarMutex());
// we want to update only the window, not our parent, so lock the latter
// (In fact, if we are in DbGridControl::RecalcRows, perhaps as a result of an setDataSource or
// a VisibleRowsChanged, the grid will be frozen and a SeekRow triggered implicitly by the update
// of pWnd will fail.)
// (the SetUpdateMode call goes to the data window : it's sufficient to prevent SeekRow's, but it
// avoids the Invalidate which would be triggered by BrowseBox::SetUpdateMode (which lead to massive
// flicker when scrolling))
// FS - 06.10.99
// don't use SetUpdateMode in those situations as all necessary paints get lost DG
// so update only if necessary (DG)
if (pParent->IsPaintEnabled())
{
pWnd->Update();
pWnd->Flush();
}
}
pParent->SetRealRowCount(aText);
} break;
}
DBG_ASSERT(pWnd, "kein Fenster");
if (pWnd && (pWnd->IsEnabled() != bAvailable))
// this "pWnd->IsEnabled() != bAvailable" is a little hack : Window::Enable always generates a user
// event (ImplGenerateMouseMove) even if nothing happened. This may lead to some unwanted effects, so we
// do this check.
// For further explanation see Bug 69900.
// FS - 18.11.99
pWnd->Enable(bAvailable);
}
//------------------------------------------------------------------------------
void DbGridControl::NavigationBar::Resize()
{
Control::Resize();
ArrangeControls();
}
//------------------------------------------------------------------------------
void DbGridControl::NavigationBar::Paint(const Rectangle& rRect)
{
Control::Paint(rRect);
Point aAbsolutePos = m_aAbsolute.GetPosPixel();
Size aAbsoluteSize = m_aAbsolute.GetSizePixel();
DrawLine(Point(aAbsolutePos.X() - 1, 0 ),
Point(aAbsolutePos.X() - 1, aAbsolutePos.Y() + aAbsoluteSize.Height()));
DrawLine(Point(aAbsolutePos.X() + aAbsoluteSize.Width() + 1, 0 ),
Point(aAbsolutePos.X() + aAbsoluteSize.Width() + 1, aAbsolutePos.Y() + aAbsoluteSize.Height()));
}
//------------------------------------------------------------------------------
void DbGridControl::NavigationBar::StateChanged( StateChangedType nType )
{
Control::StateChanged(nType);
if (STATE_CHANGE_ZOOM == nType)
{
Fraction aZoom = GetZoom();
m_aRecordText.SetZoom(aZoom);
m_aAbsolute.SetZoom(aZoom);
m_aRecordOf.SetZoom(aZoom);
m_aRecordCount.SetZoom(aZoom);
m_aFirstBtn.SetZoom(aZoom);
m_aPrevBtn.SetZoom(aZoom);
m_aNextBtn.SetZoom(aZoom);
m_aLastBtn.SetZoom(aZoom);
m_aNewBtn.SetZoom(aZoom);
// not all of these controls need to know the new zoom, but to be sure ...
// rearrange the controls
m_nDefaultWidth = ArrangeControls();
}
}
//------------------------------------------------------------------------------
DbGridRow::DbGridRow(CursorWrapper* pCur, sal_Bool bPaintCursor)
:m_bIsNew(sal_False)
{
if (pCur && pCur->Is())
{
::com::sun::star::uno::Reference< ::com::sun::star::container::XIndexAccess > xColumns(pCur->getColumns(), ::com::sun::star::uno::UNO_QUERY);
DataColumn* pColumn;
for (sal_Int32 i = 0; i < xColumns->getCount(); ++i)
{
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xColSet;
::cppu::extractInterface(xColSet, xColumns->getByIndex(i));
pColumn = new DataColumn(xColSet);
m_aVariants.Insert(pColumn, LIST_APPEND);
}
if (pCur->rowDeleted())
m_eStatus = GRS_DELETED;
else
{
if (bPaintCursor)
m_eStatus = (pCur->isAfterLast() || pCur->isBeforeFirst()) ? GRS_INVALID : GRS_CLEAN;
else
{
some casts needed
2000-11-06 06:53:20 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xSet((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*pCur,::com::sun::star::uno::UNO_QUERY);
initial import
2000-09-18 16:07:07 +00:00
if (xSet.is())
{
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
m_bIsNew = ::comphelper::getBOOL(xSet->getPropertyValue(FM_PROP_ISNEW));
initial import
2000-09-18 16:07:07 +00:00
if (!m_bIsNew && (pCur->isAfterLast() || pCur->isBeforeFirst()))
m_eStatus = GRS_INVALID;
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
else if (::comphelper::getBOOL(xSet->getPropertyValue(FM_PROP_ISMODIFIED)))
initial import
2000-09-18 16:07:07 +00:00
m_eStatus = GRS_MODIFIED;
else
m_eStatus = GRS_CLEAN;
}
else
m_eStatus = GRS_INVALID;
}
}
#80219# check if row is new
2000-12-06 09:59:16 +00:00
if (!m_bIsNew && IsValid())
initial import
2000-09-18 16:07:07 +00:00
m_aBookmark = pCur->getBookmark();
else
m_aBookmark = ::com::sun::star::uno::Any();
}
else
m_eStatus = GRS_INVALID;
}
//------------------------------------------------------------------------------
DbGridRow::~DbGridRow()
{
sal_uInt32 nCount = m_aVariants.Count();
for (sal_uInt32 i = 0; i < nCount; i++)
delete m_aVariants.GetObject(i);
}
//------------------------------------------------------------------------------
void DbGridRow::SetState(CursorWrapper* pCur, sal_Bool bPaintCursor)
{
if (pCur && pCur->Is())
{
if (pCur->rowDeleted())
{
m_eStatus = GRS_DELETED;
m_bIsNew = sal_False;
}
else
{
m_eStatus = GRS_CLEAN;
if (!bPaintCursor)
{
some casts needed
2000-11-06 06:53:20 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xSet((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*pCur, ::com::sun::star::uno::UNO_QUERY);
initial import
2000-09-18 16:07:07 +00:00
DBG_ASSERT(xSet.is(), "DbGridRow::SetState : invalid cursor !");
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
if (::comphelper::getBOOL(xSet->getPropertyValue(FM_PROP_ISMODIFIED)))
initial import
2000-09-18 16:07:07 +00:00
m_eStatus = GRS_MODIFIED;
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
m_bIsNew = ::comphelper::getBOOL(xSet->getPropertyValue(FM_PROP_ISNEW));
initial import
2000-09-18 16:07:07 +00:00
}
else
m_bIsNew = sal_False;
}
#80219# check if row is new
2000-12-06 09:59:16 +00:00
if (!m_bIsNew && IsValid())
initial import
2000-09-18 16:07:07 +00:00
m_aBookmark = pCur->getBookmark();
else
m_aBookmark = ::com::sun::star::uno::Any();
}
else
{
m_aBookmark = ::com::sun::star::uno::Any();
m_eStatus = GRS_INVALID;
m_bIsNew = sal_False;
}
}
DBG_NAME(DbGridControl);
//------------------------------------------------------------------------------
DbGridControl::DbGridControl(
::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory > _rxFactory,
Window* pParent,
WinBits nBits)
:DbBrowseBox(pParent, DBBF_NONE, nBits,
BROWSER_KEEPSELECTION |
BROWSER_COLUMNSELECTION |
BROWSER_MULTISELECTION |
BROWSER_TRACKING_TIPS |
BROWSER_HLINESFULL |
BROWSER_VLINESFULL |
BROWSER_AUTO_VSCROLL)
#pragma warning (disable : 4355)
new DnD (not finished, yet)
2001-03-23 10:40:35 +00:00
,m_aBar(this)
initial import
2000-09-18 16:07:07 +00:00
#pragma warning (default : 4355)
new DnD (not finished, yet)
2001-03-23 10:40:35 +00:00
,m_bSynchDisplay(sal_True)
,m_bForceROController(sal_False)
,m_bHandle(sal_False)
,m_aNullDate(DBTypeConversion::getStandardDate())
,m_nAsynAdjustEvent(0)
,m_pDataSourcePropMultiplexer(NULL)
,m_pDataSourcePropListener(NULL)
,m_pFieldListeners(NULL)
,m_pCursorDisposeListener(NULL)
,m_bWantDestruction(sal_False)
,m_bInAdjustDataSource(sal_False)
,m_bPendingAdjustRows(sal_False)
,m_xServiceFactory(_rxFactory)
#84686# call a FmGridSelectionListener if the selection changes
2001-05-16 13:16:06 +00:00
,m_pSelectionListener(NULL)
initial import
2000-09-18 16:07:07 +00:00
{
DBG_CTOR(DbGridControl,NULL);
Construct();
}
//------------------------------------------------------------------------------
DbGridControl::DbGridControl(
::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory > _rxFactory,
Window* pParent,
const ResId& rId)
:DbBrowseBox(pParent, rId, DBBF_NONE,
BROWSER_KEEPSELECTION |
BROWSER_COLUMNSELECTION |
BROWSER_MULTISELECTION |
BROWSER_TRACKING_TIPS |
BROWSER_HLINESFULL |
BROWSER_VLINESFULL |
BROWSER_AUTO_VSCROLL)
#pragma warning (disable : 4355)
new DnD (not finished, yet)
2001-03-23 10:40:35 +00:00
,m_aBar(this)
initial import
2000-09-18 16:07:07 +00:00
#pragma warning (default : 4355)
new DnD (not finished, yet)
2001-03-23 10:40:35 +00:00
,m_bSynchDisplay(sal_True)
,m_bForceROController(sal_False)
,m_bHandle(sal_False)
,m_aNullDate(DBTypeConversion::getStandardDate())
,m_pDataSourcePropMultiplexer(NULL)
,m_pDataSourcePropListener(NULL)
,m_pFieldListeners(NULL)
,m_bWantDestruction(sal_False)
,m_bInAdjustDataSource(sal_False)
,m_bPendingAdjustRows(sal_False)
,m_xServiceFactory(_rxFactory)
#84686# call a FmGridSelectionListener if the selection changes
2001-05-16 13:16:06 +00:00
,m_pSelectionListener(NULL)
initial import
2000-09-18 16:07:07 +00:00
{
DBG_CTOR(DbGridControl,NULL);
Construct();
}
//------------------------------------------------------------------------------
void DbGridControl::Construct()
{
m_nTotalCount = m_nSeekPos = m_nCurrentPos = -1;
m_bDesignMode = m_bUpdating = m_bRecordCountFinal = sal_False;
m_bFilterMode = sal_False;
m_nMode = BROWSER_KEEPSELECTION |
BROWSER_COLUMNSELECTION |
BROWSER_MULTISELECTION |
BROWSER_TRACKING_TIPS |
BROWSER_HLINESFULL |
BROWSER_VLINESFULL |
BROWSER_AUTO_VSCROLL |
BROWSER_HEADERBAR_NEW;
m_bNavigationBar = m_bMultiSelection = sal_True;
m_nOptions = OPT_READONLY;
m_nOptionMask = OPT_INSERT | OPT_UPDATE | OPT_DELETE;
m_nDeleteEvent = 0;
m_pSeekCursor = m_pDataCursor = NULL;
m_bHandle = sal_True;
m_aBar.Show();
EnableDrop(sal_True);
ImplInitSettings(sal_True,sal_True,sal_True);
}
//------------------------------------------------------------------------------
void DbGridControl::InsertHandleColumn()
{
// Handle Column einfuegen
// Da die BrowseBox ohne handleColums Paintprobleme hat
// wird diese versteckt
if (HasHandle())
BrowseBox::InsertHandleColumn(GetDefaultColumnWidth(String()), sal_True);
else
BrowseBox::InsertHandleColumn(0, sal_False);
}
//------------------------------------------------------------------------------
void DbGridControl::Init()
{
BrowserHeader* pHeader = CreateHeaderBar(this);
pHeader->SetMouseTransparent(sal_False);
SetHeaderBar(pHeader);
SetMode(m_nMode);
SetCursorColor(Color(0xFF, 0, 0));
InsertHandleColumn();
}
//------------------------------------------------------------------------------
DbGridControl::~DbGridControl()
{
RemoveColumns();
{
m_bWantDestruction = sal_True;
osl::MutexGuard aGuard(m_aDestructionSafety);
if (m_pFieldListeners)
DisconnectFromFields();
if (m_pCursorDisposeListener)
{
delete m_pCursorDisposeListener;
m_pCursorDisposeListener = NULL;
}
}
if (m_nDeleteEvent)
Application::RemoveUserEvent(m_nDeleteEvent);
if (m_pDataSourcePropMultiplexer)
{
m_pDataSourcePropMultiplexer->dispose();
m_pDataSourcePropMultiplexer->release(); // this should delete the multiplexer
delete m_pDataSourcePropListener;
m_pDataSourcePropMultiplexer = NULL;
m_pDataSourcePropListener = NULL;
}
delete m_pDataCursor;
delete m_pSeekCursor;
DBG_DTOR(DbGridControl,NULL);
}
//------------------------------------------------------------------------------
void DbGridControl::StateChanged( StateChangedType nType )
{
DbBrowseBox::StateChanged( nType );
switch (nType)
{
case STATE_CHANGE_ZOOM:
{
ImplInitSettings( sal_True, sal_False, sal_False );
// forward the zoom factor to the navigation bar
if (m_bNavigationBar)
m_aBar.SetZoom(GetZoom());
// and give it a chance to rearrange
Point aPoint = GetControlArea().TopLeft();
sal_uInt16 nX = (sal_uInt16)aPoint.X();
ArrangeControls(nX, (sal_uInt16)aPoint.Y());
ReserveControlArea((sal_uInt16)nX);
}
break;
case STATE_CHANGE_CONTROLFONT:
ImplInitSettings( sal_True, sal_False, sal_False );
Invalidate();
break;
case STATE_CHANGE_CONTROLFOREGROUND:
ImplInitSettings( sal_False, sal_True, sal_False );
Invalidate();
break;
case STATE_CHANGE_CONTROLBACKGROUND:
ImplInitSettings( sal_False, sal_False, sal_True );
Invalidate();
break;
}
}
//------------------------------------------------------------------------------
void DbGridControl::DataChanged( const DataChangedEvent& rDCEvt )
{
DbBrowseBox::DataChanged( rDCEvt );
if ( (rDCEvt.GetType() == DATACHANGED_SETTINGS ) &&
(rDCEvt.GetFlags() & SETTINGS_STYLE) )
{
ImplInitSettings( sal_True, sal_True, sal_True );
Invalidate();
}
}
//------------------------------------------------------------------------------
void DbGridControl::Select()
{
DbBrowseBox::Select();
// as the selected rows may have changed, udate the according display in our navigation bar
m_aBar.InvalidateState(NavigationBar::RECORD_COUNT);
#84686# call a FmGridSelectionListener if the selection changes
2001-05-16 13:16:06 +00:00
if (m_pSelectionListener)
m_pSelectionListener->selectionChanged();
initial import
2000-09-18 16:07:07 +00:00
}
//------------------------------------------------------------------------------
void DbGridControl::ImplInitSettings( sal_Bool bFont, sal_Bool bForeground, sal_Bool bBackground )
{
for (sal_uInt32 i = 0; i < m_aColumns.Count(); i++)
{
DbGridColumn* pCol = m_aColumns.GetObject(i);
if (pCol)
pCol->ImplInitSettings(&GetDataWindow(), bFont, bForeground, bBackground);
}
if (bBackground)
{
if (IsControlBackground())
{
GetDataWindow().SetBackground(GetControlBackground());
GetDataWindow().SetControlBackground(GetControlBackground());
GetDataWindow().SetFillColor(GetControlBackground());
}
else
{
GetDataWindow().SetControlBackground();
GetDataWindow().SetFillColor(GetFillColor());
}
}
}
//------------------------------------------------------------------------------
void DbGridControl::RemoveRows(sal_Bool bNewCursor)
{
// Hat sich der DatenCursor verandert ?
if (!bNewCursor)
{
DELETEZ(m_pSeekCursor);
m_xPaintRow = m_xDataRow = m_xEmptyRow = m_xCurrentRow = m_xSeekRow = NULL;
m_nCurrentPos = m_nSeekPos = -1;
m_nOptions = OPT_READONLY;
RowRemoved(0, GetRowCount(), sal_False);
m_nTotalCount = -1;
}
else
{
RemoveRows();
}
}
//------------------------------------------------------------------------------
void DbGridControl::RemoveRows()
{
#82612# RemoveColumns: deactivate the current cell so no dead references from the current controller to the (to-be-deleted) cell window exist
2001-01-17 08:56:13 +00:00
// we're going to remove all columns and all row, so deactivate the current cell
if (IsEditing())
DeactivateCell();
initial import
2000-09-18 16:07:07 +00:00
// alle Columns deinitialisieren
// existieren Spalten, dann alle Controller freigeben
for (sal_uInt32 i = 0; i < m_aColumns.Count(); i++)
m_aColumns.GetObject(i)->Clear();
DELETEZ(m_pSeekCursor);
DELETEZ(m_pDataCursor);
m_xPaintRow = m_xDataRow = m_xEmptyRow = m_xCurrentRow = m_xSeekRow = NULL;
m_nCurrentPos = m_nSeekPos = m_nTotalCount = -1;
m_nOptions = OPT_READONLY;
// Anzahl Saetze im Browser auf 0 zuruecksetzen
DbBrowseBox::RemoveRows();
m_aBar.InvalidateAll(m_nCurrentPos, sal_True);
}
//------------------------------------------------------------------------------
void DbGridControl::ArrangeControls(sal_uInt16& nX, sal_uInt16 nY)
{
// Positionierung der Controls
if (m_bNavigationBar)
{
nX = m_aBar.GetDefaultWidth();
Rectangle aRect(GetControlArea());
m_aBar.SetPosSizePixel(Point(0,nY + 1), Size(nX, aRect.GetSize().Height() - 1));
}
}
//------------------------------------------------------------------------------
void DbGridControl::EnableHandle(sal_Bool bEnable)
{
if (m_bHandle == bEnable)
return;
// HandleColumn wird nur ausgeblendet,
// da es sonst etliche Probleme mit dem Zeichnen gibt
RemoveColumn(0);
m_bHandle = bEnable;
InsertHandleColumn();
}
//------------------------------------------------------------------------------
void DbGridControl::EnableNavigationBar(sal_Bool bEnable)
{
if (m_bNavigationBar == bEnable)
return;
if (bEnable)
{
m_aBar.Show();
m_aBar.Enable();
m_aBar.InvalidateAll(m_nCurrentPos, sal_True);
m_nMode &= ~BROWSER_AUTO_HSCROLL;
SetMode(m_nMode);
// liefert die Groe<6F>e der Reserved ControlArea
Point aPoint = GetControlArea().TopLeft();
sal_uInt16 nX = (sal_uInt16)aPoint.X();
m_bNavigationBar = bEnable;
ArrangeControls(nX, (sal_uInt16)aPoint.Y());
ReserveControlArea((sal_uInt16)nX);
}
else
{
m_aBar.Hide();
m_aBar.Disable();
m_nMode |= BROWSER_AUTO_HSCROLL;
SetMode(m_nMode);
ReserveControlArea();
m_bNavigationBar = bEnable;
}
}
//------------------------------------------------------------------------------
sal_uInt16 DbGridControl::SetOptions(sal_uInt16 nOpt)
{
DBG_ASSERT(!m_xCurrentRow || !m_xCurrentRow->IsModified(),
"DbGridControl::SetOptions : please do not call when editing a record (things are much easier this way ;) !");
// for the next setDataSource (which is triggered by a refresh, for instance)
m_nOptionMask = nOpt;
// normalize the new options
some casts needed
2000-11-06 06:53:20 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xDataSourceSet((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*m_pDataCursor, ::com::sun::star::uno::UNO_QUERY);
initial import
2000-09-18 16:07:07 +00:00
if (xDataSourceSet.is())
{
// feststellen welche Updatem<65>glichkeiten bestehen
sal_Int32 nPrivileges;
xDataSourceSet->getPropertyValue(FM_PROP_PRIVILEGES) >>= nPrivileges;
if ((nPrivileges & ::com::sun::star::sdbcx::Privilege::INSERT) == 0)
nOpt &= ~OPT_INSERT;
if ((nPrivileges & ::com::sun::star::sdbcx::Privilege::UPDATE) == 0)
nOpt &= ~OPT_UPDATE;
if ((nPrivileges & ::com::sun::star::sdbcx::Privilege::DELETE) == 0)
nOpt &= ~OPT_DELETE;
}
else
nOpt = OPT_READONLY;
// need to do something after that ?
if (nOpt == m_nOptions)
return m_nOptions;
// the 'update' option only affects our BrowserMode (with or w/o focus rect)
BrowserMode nNewMode = m_nMode;
if ((m_nMode & BROWSER_CURSOR_WO_FOCUS) == 0)
{
if (nOpt & OPT_UPDATE)
nNewMode |= BROWSER_HIDECURSOR;
else
nNewMode &= ~BROWSER_HIDECURSOR;
}
else
nNewMode &= ~BROWSER_HIDECURSOR;
// should not be neccessary if EnablePermanentCursor is used to change the cursor behaviour, but to be sure ...
if (nNewMode != m_nMode)
{
SetMode(nNewMode);
m_nMode = nNewMode;
}
// _after_ setting the mode because this results in an ActivateCell
DeactivateCell();
sal_Bool bInsertChanged = (nOpt & OPT_INSERT) != (m_nOptions & OPT_INSERT);
m_nOptions = nOpt;
// we need to set this before the code below because it indirectly uses m_nOptions
// the 'insert' option affects our empty row
if (bInsertChanged)
if (m_nOptions & OPT_INSERT)
{ // the insert option is to be set
m_xEmptyRow = new DbGridRow();
RowInserted(GetRowCount(), 1, sal_True);
}
else
{ // the insert option is to be reset
m_xEmptyRow = NULL;
if ((GetCurRow() == GetRowCount() - 1) && (GetCurRow() > 0))
GoToRowColumnId(GetCurRow() - 1, GetCurColumnId());
RowRemoved(GetRowCount(), 1, sal_True);
}
// the 'delete' options has no immediate consequences
ActivateCell();
Invalidate();
return m_nOptions;
}
//------------------------------------------------------------------------------
void DbGridControl::EnablePermanentCursor(sal_Bool bEnable)
{
if (IsPermanentCursorEnabled() == bEnable)
return;
if (bEnable)
{
m_nMode &= ~BROWSER_HIDECURSOR; // without this BROWSER_CURSOR_WO_FOCUS won't have any affect
m_nMode |= BROWSER_CURSOR_WO_FOCUS;
}
else
{
if (m_nOptions & OPT_UPDATE)
m_nMode |= BROWSER_HIDECURSOR; // no cursor at all
else
m_nMode &= ~BROWSER_HIDECURSOR; // at least the "non-permanent" cursor
m_nMode &= ~BROWSER_CURSOR_WO_FOCUS;
}
SetMode(m_nMode);
sal_Bool bWasEditing = IsEditing();
DeactivateCell();
if (bWasEditing)
ActivateCell();
}
//------------------------------------------------------------------------------
sal_Bool DbGridControl::IsPermanentCursorEnabled() const
{
return ((m_nMode & BROWSER_CURSOR_WO_FOCUS) != 0) && ((m_nMode & BROWSER_HIDECURSOR) == 0);
}
#86706# +refreshController
2001-05-14 11:06:53 +00:00
//------------------------------------------------------------------------------
void DbGridControl::refreshController(sal_uInt16 _nColId, GrantCellControlAccess _aAccess)
{
if ((GetCurColumnId() == _nColId) && IsEditing())
{ // the controller which is currently active needs to be refreshed
DeactivateCell();
ActivateCell();
}
}
initial import
2000-09-18 16:07:07 +00:00
//------------------------------------------------------------------------------
void DbGridControl::SetMultiSelection(sal_Bool bMulti)
{
m_bMultiSelection = bMulti;
if (m_bMultiSelection)
m_nMode |= BROWSER_MULTISELECTION;
else
m_nMode &= ~BROWSER_MULTISELECTION;
SetMode(m_nMode);
}
//------------------------------------------------------------------------------
void DbGridControl::setDataSource(const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XRowSet >& _xCursor, sal_uInt16 nOpts)
{
if (!_xCursor.is() && !m_pDataCursor)
return;
if (m_pDataSourcePropMultiplexer)
{
m_pDataSourcePropMultiplexer->dispose();
m_pDataSourcePropMultiplexer->release(); // this should delete the multiplexer
delete m_pDataSourcePropListener;
m_pDataSourcePropMultiplexer = NULL;
m_pDataSourcePropListener = NULL;
}
// is the new cursor valid ?
// the cursor is only valid if it contains some columns
// if there is no cursor or the cursor is not valid we have to clean up an leave
if (!_xCursor.is() || !::com::sun::star::uno::Reference< ::com::sun::star::sdbcx::XColumnsSupplier > (_xCursor, ::com::sun::star::uno::UNO_QUERY)->getColumns()->hasElements())
{
RemoveRows();
return;
}
// Hat sich der DatenCursor verandert ?
sal_uInt16 nCurPos = GetColumnPos(GetCurColumnId());
SetUpdateMode(sal_False);
RemoveRows();
DisconnectFromFields();
DELETEZ(m_pCursorDisposeListener);
{
::osl::MutexGuard aGuard(m_aAdjustSafety);
if (m_nAsynAdjustEvent)
{
// the adjust was thought to work with the old cursor which we don't have anymore
RemoveUserEvent(m_nAsynAdjustEvent);
m_nAsynAdjustEvent = 0;
}
}
// get a new formatter and data cursor
m_xFormatter = NULL;
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::util::XNumberFormatsSupplier > xSupplier = ::dbtools::getNumberFormats(::dbtools::getConnection(_xCursor), sal_True);
initial import
2000-09-18 16:07:07 +00:00
if (xSupplier.is() && m_xServiceFactory.is())
{
m_xFormatter = ::com::sun::star::uno::Reference< ::com::sun::star::util::XNumberFormatter >(
m_xServiceFactory->createInstance(FM_NUMBER_FORMATTER),
::com::sun::star::uno::UNO_QUERY);
if (m_xFormatter.is())
{
m_xFormatter->attachNumberFormatsSupplier(xSupplier);
// retrieve the datebase of the Numberformatter
try
{
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
xSupplier->getNumberFormatSettings()->getPropertyValue(rtl::OUString::createFromAscii("NullDate")) >>= m_aNullDate;
initial import
2000-09-18 16:07:07 +00:00
}
need of MultiServiceFactory
2000-11-03 13:56:25 +00:00
catch(::com::sun::star::uno::Exception&)
initial import
2000-09-18 16:07:07 +00:00
{
}
}
}
#82645# setdatasource to null when our clone is in dispose
2001-01-10 14:43:10 +00:00
initial import
2000-09-18 16:07:07 +00:00
m_pDataCursor = new CursorWrapper(_xCursor);
// now create a cursor for painting rows
// we need that cursor only if we are not in insert only mode
::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XResultSet > xClone;
::com::sun::star::uno::Reference< ::com::sun::star::sdb::XResultSetAccess > xAccess(_xCursor, ::com::sun::star::uno::UNO_QUERY);
try
{
xClone = xAccess.is() ? xAccess->createResultSet() : ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XResultSet > ();
}
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
catch(Exception&)
initial import
2000-09-18 16:07:07 +00:00
{
}
if (xClone.is())
m_pSeekCursor = new CursorWrapper(xClone);
// property listening on the data source
// (Normally one class would be sufficient : the multiplexer which could forward the property change to us.
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
// But for that we would have been derived from ::comphelper::OPropertyChangeListener, which isn't exported.
// So we introduce a second class, which is a ::comphelper::OPropertyChangeListener (in the implementation file we know this class)
initial import
2000-09-18 16:07:07 +00:00
// and forwards the property changes to a our special method "DataSourcePropertyChanged".)
if (m_pDataCursor)
{
m_pDataSourcePropListener = new FmXGridSourcePropListener(this);
some casts needed
2000-11-06 06:53:20 +00:00
m_pDataSourcePropMultiplexer = new ::comphelper::OPropertyChangeMultiplexer(m_pDataSourcePropListener, ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > ((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*m_pDataCursor, ::com::sun::star::uno::UNO_QUERY));
initial import
2000-09-18 16:07:07 +00:00
m_pDataSourcePropMultiplexer->acquire();
m_pDataSourcePropMultiplexer->addProperty(FM_PROP_ISMODIFIED);
m_pDataSourcePropMultiplexer->addProperty(FM_PROP_ISNEW);
}
BrowserMode nOldMode = m_nMode;
if (m_pSeekCursor)
{
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xSet(_xCursor, ::com::sun::star::uno::UNO_QUERY);
if (xSet.is())
{
// feststellen welche Updatem<65>glichkeiten bestehen
sal_Int32 nPrivileges;
xSet->getPropertyValue(FM_PROP_PRIVILEGES) >>= nPrivileges;
// Insert Option should be set if insert only otherwise you won't see any rows
// and no insertion is possible
if ((m_nOptionMask & OPT_INSERT) && ((nPrivileges & ::com::sun::star::sdbcx::Privilege::INSERT) == ::com::sun::star::sdbcx::Privilege::INSERT) && (nOpts & OPT_INSERT))
m_nOptions |= OPT_INSERT;
if ((m_nOptionMask & OPT_UPDATE) && ((nPrivileges & ::com::sun::star::sdbcx::Privilege::UPDATE) == ::com::sun::star::sdbcx::Privilege::UPDATE) && (nOpts & OPT_UPDATE))
m_nOptions |= OPT_UPDATE;
if ((m_nOptionMask & OPT_DELETE) && ((nPrivileges & ::com::sun::star::sdbcx::Privilege::DELETE) == ::com::sun::star::sdbcx::Privilege::DELETE) && (nOpts & OPT_DELETE))
m_nOptions |= OPT_DELETE;
}
sal_Bool bPermanentCursor = IsPermanentCursorEnabled();
m_nMode = BROWSER_COLUMNSELECTION | BROWSER_KEEPSELECTION |
BROWSER_TRACKING_TIPS |
BROWSER_HLINESFULL | BROWSER_VLINESFULL | BROWSER_HEADERBAR_NEW |
BROWSER_AUTO_VSCROLL;
if (bPermanentCursor)
{
m_nMode |= BROWSER_CURSOR_WO_FOCUS;
m_nMode &= ~BROWSER_HIDECURSOR;
}
else
// Duerfen Updates gemacht werden, kein Focus-RechtEck
if (m_nOptions & OPT_UPDATE)
m_nMode |= BROWSER_HIDECURSOR;
if (m_bMultiSelection)
m_nMode |= BROWSER_MULTISELECTION;
if (!m_bNavigationBar)
{
m_nMode |= BROWSER_AUTO_HSCROLL;
m_nMode |= BROWSER_NO_HSCROLL;
ReserveControlArea();
}
::com::sun::star::uno::Reference< ::com::sun::star::sdbcx::XColumnsSupplier > xSupplyColumns(_xCursor, ::com::sun::star::uno::UNO_QUERY);
if (xSupplyColumns.is())
InitColumnsByFields(::com::sun::star::uno::Reference< ::com::sun::star::container::XIndexAccess > (xSupplyColumns->getColumns(), ::com::sun::star::uno::UNO_QUERY));
ConnectToFields();
}
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
sal_uInt32 nRecordCount(0);
if (m_pSeekCursor)
initial import
2000-09-18 16:07:07 +00:00
{
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xSet((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*m_pDataCursor, ::com::sun::star::uno::UNO_QUERY);
xSet->getPropertyValue(FM_PROP_ROWCOUNT) >>= nRecordCount;
m_bRecordCountFinal = ::comphelper::getBOOL(xSet->getPropertyValue(FM_PROP_ROWCOUNTFINAL));
initial import
2000-09-18 16:07:07 +00:00
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
// insert the currently known rows
// and one row if we are able to insert rows
if (m_nOptions & OPT_INSERT)
initial import
2000-09-18 16:07:07 +00:00
{
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
// insert the empty row for insertion
m_xEmptyRow = new DbGridRow();
nRecordCount++;
}
if (nRecordCount)
{
m_xPaintRow = m_xSeekRow = new DbGridRow(m_pSeekCursor, sal_True);
m_xDataRow = new DbGridRow(m_pDataCursor, sal_False);
RowInserted(0, nRecordCount, sal_False);
initial import
2000-09-18 16:07:07 +00:00
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
if (m_xSeekRow->IsValid())
m_nSeekPos = m_pSeekCursor->getRow() - 1;
initial import
2000-09-18 16:07:07 +00:00
}
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
else
{
// no rows so we don't need a seekcursor
DELETEZ(m_pSeekCursor);
}
}
initial import
2000-09-18 16:07:07 +00:00
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
// Zur alten Spalte gehen
if (!nCurPos || nCurPos >= ColCount())
nCurPos = 1;
initial import
2000-09-18 16:07:07 +00:00
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
// there are rows so go to the selected current column
if (nRecordCount)
GoToRowColumnId(0, GetColumnId(nCurPos));
// else stop the editing if neccessary
else if (IsEditing())
DeactivateCell();
initial import
2000-09-18 16:07:07 +00:00
// now reset the mode
if (m_nMode != nOldMode)
SetMode(m_nMode);
// beim Resizen wird RecalcRows gerufen
if (!IsResizing() && GetRowCount())
RecalcRows(GetTopRow(), GetVisibleRows(), sal_True);
m_aBar.InvalidateAll(m_nCurrentPos, sal_True);
SetUpdateMode(sal_True);
// start listening on the seek cursor
if (m_pSeekCursor)
some casts needed
2000-11-06 06:53:20 +00:00
m_pCursorDisposeListener = new DisposeListenerGridBridge(*this, ::com::sun::star::uno::Reference< ::com::sun::star::lang::XComponent > ((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*m_pSeekCursor, ::com::sun::star::uno::UNO_QUERY), 0);
initial import
2000-09-18 16:07:07 +00:00
}
//------------------------------------------------------------------------------
void DbGridControl::RemoveColumns()
{
for (sal_uInt32 i = 0; i < m_aColumns.Count(); i++)
delete m_aColumns.GetObject(i);
m_aColumns.Clear();
DbBrowseBox::RemoveColumns();
}
//------------------------------------------------------------------------------
DbGridColumn* DbGridControl::CreateColumn(sal_uInt16 nId, const DbGridRowRef& _xRow) const
{
return new DbGridColumn(nId, *(DbGridControl*)this);
}
//------------------------------------------------------------------------------
sal_uInt16 DbGridControl::AppendColumn(const XubString& rName, sal_uInt16 nWidth, sal_uInt16 nModelPos, sal_uInt16 nId)
{
DBG_ASSERT(nId == (sal_uInt16)-1, "DbGridControl::AppendColumn : I want to set the ID myself ...");
sal_uInt16 nRealPos = nModelPos;
if (nModelPos != HEADERBAR_APPEND)
{
// calc the view pos. we can't use our converting functions because the new column
// has no VCL-representation, yet.
sal_Int16 nViewPos = nModelPos;
while (nModelPos--)
{
if (m_aColumns.GetObject(nModelPos)->IsHidden())
--nViewPos;
}
// restore nModelPos, we need it later
nModelPos = nRealPos;
// the position the base class gets is the view pos + 1 (because of the handle column)
nRealPos = nViewPos + 1;
}
// calculate the new id
for (nId=1; (GetModelColumnPos(nId) != (sal_uInt16)-1) && (nId<=m_aColumns.Count()); ++nId)
;
DBG_ASSERT(GetViewColumnPos(nId) == (sal_uInt16)-1, "DbGridControl::AppendColumn : inconsistent internal state !");
// my column's models say "there is no column with id nId", but the view (the base class) says "there is a column ..."
DbBrowseBox::AppendColumn(rName, nWidth, nRealPos, nId);
if (nModelPos == HEADERBAR_APPEND)
m_aColumns.Insert(CreateColumn(nId, m_xCurrentRow), LIST_APPEND);
else
m_aColumns.Insert(CreateColumn(nId, m_xCurrentRow), nModelPos);
return nId;
}
//------------------------------------------------------------------------------
void DbGridControl::RemoveColumn(sal_uInt16 nId)
{
sal_uInt16 nIndex = GetModelColumnPos(nId);
DbBrowseBox::RemoveColumn(nId);
delete m_aColumns.Remove(nIndex);
}
//------------------------------------------------------------------------------
void DbGridControl::ColumnMoved(sal_uInt16 nId)
{
DbBrowseBox::ColumnMoved(nId);
// remove the col from the model
sal_uInt16 nOldModelPos = GetModelColumnPos(nId);
#ifdef DBG_UTIL
DbGridColumn* pCol = m_aColumns.GetObject((sal_uInt32)nOldModelPos);
DBG_ASSERT(!pCol->IsHidden(), "DbGridControl::ColumnMoved : moved a hidden col ? how this ?");
#endif
// for the new model pos we can't use GetModelColumnPos because we are altering the model at the moment
// so the method won't work (in fact it would return the old model pos)
// the new view pos is calculated easily
sal_uInt16 nNewViewPos = GetViewColumnPos(nId);
// from that we can compute the new model pos
sal_uInt16 nNewModelPos;
for (nNewModelPos = 0; nNewModelPos < m_aColumns.Count(); ++nNewModelPos)
{
if (!m_aColumns.GetObject(nNewModelPos)->IsHidden())
if (!nNewViewPos)
break;
else
--nNewViewPos;
}
DBG_ASSERT(nNewModelPos<m_aColumns.Count(), "DbGridControl::ColumnMoved : could not find the new model position !");
// this will work. of course the model isn't fully consistent with our view right now, but let's
// look at the situation : a column has been moved with in the VIEW from pos m to n, say m<n (in the
// other case we can use analogue arguments).
// All cols k with m<k<=n have been shifted left on pos, the former col m now has pos n.
// In the model this affects a range of cols x to y, where x<=m and y<=n. And the number of hidden cols
// within this range is constant, so we may calculate the view pos from the model pos in the above way.
//
// for instance, let's look at a grid with six columns where the third one is hidden. this will
// initially look like this :
//
// +---+---+---+---+---+---+
// model pos | 0 | 1 |*2*| 3 | 4 | 5 |
// +---+---+---+---+---+---+
// ID | 1 | 2 | 3 | 4 | 5 | 6 |
// +---+---+---+---+---+---+
// view pos | 0 | 1 | - | 2 | 3 | 4 |
// +---+---+---+---+---+---+
//
// if we move the column at (view) pos 1 to (view) pos 3 we have :
//
// +---+---+---+---+---+---+
// model pos | 0 | 3 |*2*| 4 | 1 | 5 | // not reflecting the changes, yet
// +---+---+---+---+---+---+
// ID | 1 | 4 | 3 | 5 | 2 | 6 | // already reflecting the changes
// +---+---+---+---+---+---+
// view pos | 0 | 1 | - | 2 | 3 | 4 |
// +---+---+---+---+---+---+
//
// or, sorted by the out-of-date model positions :
//
// +---+---+---+---+---+---+
// model pos | 0 | 1 |*2*| 3 | 4 | 5 |
// +---+---+---+---+---+---+
// ID | 1 | 2 | 3 | 4 | 5 | 6 |
// +---+---+---+---+---+---+
// view pos | 0 | 3 | - | 1 | 2 | 4 |
// +---+---+---+---+---+---+
//
// We know the new view pos (3) of the moved column because our base class tells us. So we look at our
// model for the 4th (the pos is zero-based) visible column, it is at (model) position 4. And this is
// exactly the pos where we have to re-insert our column's model, so it looks ike this :
//
// +---+---+---+---+---+---+
// model pos | 0 |*1*| 2 | 3 | 4 | 5 |
// +---+---+---+---+---+---+
// ID | 1 | 3 | 4 | 5 | 2 | 6 |
// +---+---+---+---+---+---+
// view pos | 0 | - | 1 | 2 | 3 | 4 |
// +---+---+---+---+---+---+
//
// Now, all is consistent again.
// (except of the hidden column : The cycling of the cols occured on the model, not on the view. maybe
// the user expected the latter but there really is no good argument against our method ;) ...)
//
// And no, this large explanation isn't just because I wanted to play a board game or something like
// that. It's because it took me a while to see it myself, and the whole theme (hidden cols, model col
// positions, view col positions) is really painful (at least for me) so the above pictures helped me a lot ;)
m_aColumns.Insert(m_aColumns.Remove((sal_uInt32)nOldModelPos), nNewModelPos);
}
//------------------------------------------------------------------------------
sal_Bool DbGridControl::SeekRow(long nRow)
{
// in filter mode or in insert only mode we don't have any cursor!
if (SeekCursor(nRow))
{
if (m_pSeekCursor)
{
// on the current position we have to take the current row for display as we want
// to have the most recent values for display
if ((nRow == m_nCurrentPos) && getDisplaySynchron())
m_xPaintRow = m_xCurrentRow;
// seek to the empty insert row
else if (IsEmptyRow(nRow))
m_xPaintRow = m_xEmptyRow;
else
{
m_xSeekRow->SetState(m_pSeekCursor, sal_True);
m_xPaintRow = m_xSeekRow;
}
}
else if (IsFilterMode())
{
DBG_ASSERT(IsFilterRow(nRow), "DbGridControl::SeekRow(): No filter row, wrong mode");
m_xPaintRow = m_xEmptyRow;
}
DbBrowseBox::SeekRow(nRow);
}
return m_nSeekPos >= 0;
}
//------------------------------------------------------------------------------
// Wird aufgerufen, wenn die dargestellte Datenmenge sich aendert
//------------------------------------------------------------------------------
void DbGridControl::VisibleRowsChanged( long nNewTopRow, sal_uInt16 nLinesOnScreen )
{
RecalcRows(nNewTopRow, nLinesOnScreen , sal_False);
}
//------------------------------------------------------------------------------
void DbGridControl::RecalcRows(long nNewTopRow, sal_uInt16 nLinesOnScreen, sal_Bool bUpdateCursor)
{
DBG_CHKTHIS( DbGridControl, NULL );
// Wenn kein Cursor -> keine Rows im Browser.
if (!m_pSeekCursor)
{
DBG_ASSERT(GetRowCount() == 0,"DbGridControl: ohne Cursor darf es keine Rows geben");
return;
}
// ignore any updates implicit made
sal_Bool bDisablePaint = !bUpdateCursor && IsPaintEnabled();
if (bDisablePaint)
EnablePaint(sal_False);
// Cache an den sichtbaren Bereich anpassen
some casts needed
2000-11-06 06:53:20 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xSet((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*m_pSeekCursor, ::com::sun::star::uno::UNO_QUERY);
initial import
2000-09-18 16:07:07 +00:00
sal_Int32 nCacheSize;
xSet->getPropertyValue(FM_PROP_FETCHSIZE) >>= nCacheSize;
sal_Bool bCacheAligned = sal_False;
// Nach der Initialisierung (m_nSeekPos < 0) keine Cursorbewegung, da bereits auf den ersten
// Satz positioniert
long nDelta = nNewTopRow - GetTopRow();
// Limit fuer relative Positionierung
long nLimit = (nCacheSize) ? nCacheSize / 2 : 0;
// mehr Zeilen auf dem Bildschirm als im Cache
if (nLimit < nLinesOnScreen)
{
::com::sun::star::uno::Any aCacheSize;
aCacheSize <<= sal_Int32(nLinesOnScreen*2);
xSet->setPropertyValue(FM_PROP_FETCHSIZE, aCacheSize);
// jetzt auf alle Faelle den Cursor anpassen
bUpdateCursor = sal_True;
bCacheAligned = sal_True;
nLimit = nLinesOnScreen;
}
// Im folgenden werden die Positionierungen so vorgenommen, da<64> sichergestellt ist
// da<64> ausreichend Zeilen im DatenCache vorhanden sind
// Fenster geht nach unten, weniger als zwei Fenster Differenz
// oder Cache angepasst und noch kein Rowcount
if (nDelta < nLimit && (nDelta > 0
|| (bCacheAligned && m_nTotalCount < 0)) )
SeekCursor(nNewTopRow + nLinesOnScreen - 1, sal_False);
else if (nDelta < 0 && Abs(nDelta) < nLimit)
SeekCursor(nNewTopRow, sal_False);
else if (nDelta != 0 || bUpdateCursor)
SeekCursor(nNewTopRow, sal_True);
AdjustRows();
// ignore any updates implicit made
EnablePaint(sal_True);
}
//------------------------------------------------------------------------------
void DbGridControl::RowInserted(long nRow, long nNumRows, sal_Bool bDoPaint)
{
if (nNumRows)
{
if (m_bRecordCountFinal && m_nTotalCount < 0)
{
// if we have an insert row we have to reduce to count by 1
// as the total count reflects only the existing rows in database
m_nTotalCount = GetRowCount() + nNumRows;
if (m_xEmptyRow.Is())
--m_nTotalCount;
}
else if (m_nTotalCount >= 0)
m_nTotalCount += nNumRows;
DbBrowseBox::RowInserted(nRow, nNumRows, bDoPaint);
m_aBar.InvalidateState(NavigationBar::RECORD_COUNT);
}
}
//------------------------------------------------------------------------------
void DbGridControl::RowRemoved(long nRow, long nNumRows, sal_Bool bDoPaint)
{
if (nNumRows)
{
if (m_bRecordCountFinal && m_nTotalCount < 0)
{
m_nTotalCount = GetRowCount() - nNumRows;
// if we have an insert row reduce by 1
if (m_xEmptyRow.Is())
--m_nTotalCount;
}
else if (m_nTotalCount >= 0)
m_nTotalCount -= nNumRows;
DbBrowseBox::RowRemoved(nRow, nNumRows, bDoPaint);
m_aBar.InvalidateState(NavigationBar::RECORD_COUNT);
}
}
//------------------------------------------------------------------------------
void DbGridControl::AdjustRows()
{
if (!m_pSeekCursor)
return;
some casts needed
2000-11-06 06:53:20 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xSet((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*m_pDataCursor, ::com::sun::star::uno::UNO_QUERY);
initial import
2000-09-18 16:07:07 +00:00
// Aktualisieren des RecordCounts
sal_Int32 nRecordCount;
xSet->getPropertyValue(FM_PROP_ROWCOUNT) >>= nRecordCount;
if (!m_bRecordCountFinal)
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
m_bRecordCountFinal = ::comphelper::getBOOL(xSet->getPropertyValue(FM_PROP_ROWCOUNTFINAL));
initial import
2000-09-18 16:07:07 +00:00
// hat sich die aktuelle Anzahl Rows veraendert
// hierbei muss auch beruecksichtigt werden,
// das eine zusaetzliche Zeile zum einfuegen von Datensaetzen vorhanden sein kann
// zusaetzliche AppendRow fuers einfuegen
if (m_nOptions & OPT_INSERT)
nRecordCount++;
// wird gerade eingefuegt, dann gehoert die gerade hinzuzufuegende
// Zeile nicht zum RecordCount und die Appendrow ebenfalls nicht
if (!IsUpdating() && m_bRecordCountFinal && IsModified() && m_xCurrentRow != m_xEmptyRow &&
m_xCurrentRow->IsNew())
nRecordCount++;
// das ist mit !m_bUpdating abgesichert : innerhalb von SaveRow (m_bUpdating == sal_True) wuerde sonst der Datensatz, den ich editiere
// (und den SaveRow gerade angefuegt hat, wodurch diese Methode hier getriggert wurde), doppelt zaehlen : einmal ist er schon
// in dem normalen RecordCount drin, zum zweiten wuerde er hier gezaehlt werden (60787 - FS)
if (nRecordCount != GetRowCount())
{
long nDelta = GetRowCount() - (long)nRecordCount;
if (nDelta > 0) // zuviele
{
RowRemoved(GetRowCount() - nDelta, nDelta, sal_False);
// es sind Zeilen weggefallen, dann ab der aktuellen Position neu zeichen
Invalidate();
}
else // zuwenig
RowInserted(GetRowCount(), -nDelta, sal_True);
}
if (m_bRecordCountFinal && m_nTotalCount < 0)
{
if (m_nOptions & OPT_INSERT)
m_nTotalCount = GetRowCount() - 1;
else
m_nTotalCount = GetRowCount();
}
m_aBar.InvalidateState(NavigationBar::RECORD_COUNT);
}
//------------------------------------------------------------------------------
DbBrowseBox::RowStatus DbGridControl::GetRowStatus(long nRow) const
{
if (IsFilterRow(nRow))
return DbBrowseBox::FILTER;
else if (m_nCurrentPos >= 0 && nRow == m_nCurrentPos)
{
// neue Zeile
if (!IsValid(m_xCurrentRow))
return DbBrowseBox::DELETED;
else if (IsModified())
return DbBrowseBox::MODIFIED;
else if (m_xCurrentRow->IsNew())
return DbBrowseBox::CURRENTNEW;
else
return DbBrowseBox::CURRENT;
}
else if (IsEmptyRow(nRow))
return DbBrowseBox::NEW;
else if (!IsValid(m_xSeekRow))
return DbBrowseBox::DELETED;
else
return DbBrowseBox::CLEAN;
}
//------------------------------------------------------------------------------
void DbGridControl::PaintStatusCell(OutputDevice& rDev, const Rectangle& rRect) const
{
DbBrowseBox::PaintStatusCell(rDev, rRect);
}
//------------------------------------------------------------------------------
void DbGridControl::PaintCell(OutputDevice& rDev, const Rectangle& rRect, sal_uInt16 nColumnId) const
{
if (!IsValid(m_xPaintRow))
return;
DbGridColumn* pColumn = m_aColumns.GetObject(GetModelColumnPos(nColumnId));
if (pColumn)
{
Rectangle aArea(rRect);
if ((GetMode() & BROWSER_CURSOR_WO_FOCUS) == BROWSER_CURSOR_WO_FOCUS)
{
aArea.Top() += 1;
aArea.Bottom() -= 1;
}
pColumn->Paint(rDev, aArea, m_xPaintRow, getNumberFormatter());
}
}
//------------------------------------------------------------------------------
sal_Bool DbGridControl::CursorMoving(long nNewRow, sal_uInt16 nNewCol)
{
DBG_CHKTHIS( DbGridControl, NULL );
if (m_pDataCursor &&
m_nCurrentPos != nNewRow &&
!SetCurrent(nNewRow, !m_bInAdjustDataSource))
return sal_False;
return DbBrowseBox::CursorMoving(nNewRow, nNewCol);
}
//------------------------------------------------------------------------------
sal_Bool DbGridControl::SetCurrent(long nNewRow, sal_Bool bForceInsertIfNewRow)
{
// Each movement of the datacursor must start with BeginCursorAction and end with
// EndCursorAction to block all notifications during the movement
BeginCursorAction();
try
{
// Abgleichen der Positionen
if (SeekCursor(nNewRow))
{
if (IsFilterRow(nNewRow)) // special mode for filtering
{
m_xCurrentRow = m_xDataRow = m_xPaintRow = m_xEmptyRow;
m_nCurrentPos = nNewRow;
}
else
{
sal_Bool bNewRowInserted = sal_False;
// Should we go to the insertrow ?
if (IsEmptyRow(nNewRow))
{
// to we need to move the cursor to the insert row?
// we need to insert the if the current row isn't the insert row or if the
// cursor triggered the move by itselt and we need a reinitialization of the row
some casts needed
2000-11-06 06:53:20 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xCursorProps((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*m_pDataCursor, ::com::sun::star::uno::UNO_QUERY);
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
if (bForceInsertIfNewRow || !::comphelper::getBOOL(xCursorProps->getPropertyValue(FM_PROP_ISNEW)))
initial import
2000-09-18 16:07:07 +00:00
{
some casts needed
2000-11-06 06:53:20 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XResultSetUpdate > xUpdateCursor((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*m_pDataCursor, ::com::sun::star::uno::UNO_QUERY);
initial import
2000-09-18 16:07:07 +00:00
xUpdateCursor->moveToInsertRow();
}
bNewRowInserted = sal_True;
}
else
{
::com::sun::star::uno::Any aBookmark = m_pSeekCursor->getBookmark();
if (!m_xCurrentRow || m_xCurrentRow->IsNew() || !CompareBookmark(aBookmark, m_pDataCursor->getBookmark()))
{
// adjust the cursor to the new desired row
if (!m_pDataCursor->moveToBookmark(aBookmark))
{
EndCursorAction();
return sal_False;
}
}
}
m_xDataRow->SetState(m_pDataCursor, sal_False);
m_xCurrentRow = m_xDataRow;
long nPaintPos = -1;
// do we have to repaint the last regular row in case of setting defaults or autovalues
if (m_nCurrentPos >= 0 && m_nCurrentPos >= (GetRowCount() - 2))
nPaintPos = m_nCurrentPos;
m_nCurrentPos = nNewRow;
// repaint the new row to display all defaults
if (bNewRowInserted)
RowModified(m_nCurrentPos);
if (nPaintPos >= 0)
RowModified(nPaintPos);
}
}
else
{
DBG_ERROR("DbGridControl::SetCurrent : SeekRow failed !");
EndCursorAction();
return sal_False;
}
}
corrected navigation bar
2000-09-29 07:25:14 +00:00
catch(com::sun::star::sdbc::SQLException& )
{
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
DBG_ERROR("DbGridControl::SetCurrent : caught an exception !");
corrected navigation bar
2000-09-29 07:25:14 +00:00
EndCursorAction();
return sal_False;
}
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
catch (Exception)
initial import
2000-09-18 16:07:07 +00:00
{
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
DBG_ERROR("DbGridControl::SetCurrent : caught an exception !");
initial import
2000-09-18 16:07:07 +00:00
EndCursorAction();
return sal_False;
}
EndCursorAction();
return sal_True;
}
//------------------------------------------------------------------------------
void DbGridControl::CursorMoved()
{
DBG_CHKTHIS( DbGridControl, NULL );
// CursorBewegung durch loeschen oder einfuegen von Zeilen
if (m_pDataCursor && m_nCurrentPos != GetCurRow())
{
DeactivateCell(sal_True);
SetCurrent(GetCurRow(), sal_False);
}
DbBrowseBox::CursorMoved();
m_aBar.InvalidateAll(m_nCurrentPos);
}
//------------------------------------------------------------------------------
void DbGridControl::setDisplaySynchron(sal_Bool bSync)
{
if (bSync == m_bSynchDisplay)
return;
m_bSynchDisplay = bSync;
if (m_bSynchDisplay)
AdjustDataSource(sal_False);
}
//------------------------------------------------------------------------------
void DbGridControl::forceSyncDisplay()
{
sal_Bool bOld = getDisplaySynchron();
setDisplaySynchron(sal_True);
if (!bOld)
setDisplaySynchron(bOld);
}
//------------------------------------------------------------------------------
void DbGridControl::forceROController(sal_Bool bForce)
{
if (m_bForceROController == bForce)
return;
m_bForceROController = bForce;
// alle Columns durchgehen und denen Bescheid geben
for (sal_uInt16 i=0; i<m_aColumns.Count(); ++i)
{
DbGridColumn* pColumn = m_aColumns.GetObject(i);
if (!pColumn)
continue;
DbCellController* pReturn = &pColumn->GetController();
if (!pReturn)
continue;
// nur wenn es eine Edit-Zeile ist, kann ich ihr das forced read-only mitgeben
if (!pReturn->ISA(DbEditCellController) && !pReturn->ISA(DbSpinCellController))
continue;
Edit& rEdit = (Edit&)pReturn->GetWindow();
rEdit.SetReadOnly(m_bForceROController);
if (m_bForceROController)
rEdit.SetStyle(rEdit.GetStyle() | WB_NOHIDESELECTION);
else
rEdit.SetStyle(rEdit.GetStyle() & ~WB_NOHIDESELECTION);
}
// die aktive Zelle erneut aktivieren, da sich ihr Controller geaendert haben kann
if (IsEditing())
DeactivateCell();
ActivateCell();
}
//------------------------------------------------------------------------------
void DbGridControl::AdjustDataSource(sal_Bool bFull)
{
TRACE_RANGE("DbGridControl::AdjustDataSource");
::vos::OGuard aGuard(Application::GetSolarMutex());
// wird die aktuelle Zeile gerade neu bestimmt,
// wird kein abgleich vorgenommen
if (bFull)
m_xCurrentRow = NULL;
// if we are on the same row only repaint
// but this is only possible for rows which are not inserted, in that case the comparision result
// may not be correct
else if (m_xCurrentRow.Is() && !m_xCurrentRow->IsNew() &&
CompareBookmark(m_xCurrentRow->GetBookmark(), m_pDataCursor->getBookmark()) &&
some casts needed
2000-11-06 06:53:20 +00:00
!::comphelper::getBOOL(::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > ((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*m_pDataCursor, ::com::sun::star::uno::UNO_QUERY)->getPropertyValue(FM_PROP_ISNEW)))
initial import
2000-09-18 16:07:07 +00:00
{
// Position ist ein und dieselbe
// Status uebernehmen, neuzeichnen fertig
DBG_ASSERT(m_xDataRow == m_xCurrentRow, "Fehler in den Datenzeilen");
TRACE_RANGE_MESSAGE1("same position, new state : %s", ROWSTATUS(m_xCurrentRow));
RowModified(m_nCurrentPos);
return;
}
// weg von der Row des DatenCursors
if (m_xPaintRow == m_xCurrentRow)
m_xPaintRow = m_xSeekRow;
// keine aktuelle Zeile dann komplett anpassen
if (!m_xCurrentRow)
AdjustRows();
sal_Int32 nNewPos = AlignSeekCursor();
if (nNewPos < 0) // keine Position gefunden
return;
m_bInAdjustDataSource = TRUE;
if (nNewPos != m_nCurrentPos)
{
if (m_bSynchDisplay)
DbBrowseBox::GoToRow(nNewPos);
if (!m_xCurrentRow.Is())
// das tritt zum Beispiel auf, wenn man die n (n>1) letzten Datensaetze geloescht hat, waehrend der Cursor auf dem letzten
// steht : AdjustRows entfernt dann zwei Zeilen aus der BrowseBox, wodurch diese ihre CurrentRow um zwei nach unten
// korrigiert, so dass dann das GoToRow in's Leere laeuft (da wir uns ja angeblich schon an der richtigen Position
// befinden)
SetCurrent(nNewPos, sal_False);
}
else
{
SetCurrent(nNewPos, sal_False);
RowModified(nNewPos);
}
m_bInAdjustDataSource = FALSE;
// Wird der DatenCursor von aussen bewegt, wird die selektion aufgehoben
SetNoSelection();
m_aBar.InvalidateAll(m_nCurrentPos, m_xCurrentRow.Is());
}
//------------------------------------------------------------------------------
sal_Int32 DbGridControl::AlignSeekCursor()
{
DBG_CHKTHIS( DbGridControl, NULL );
// Positioniert den SeekCursor auf den DatenCursor, Daten werden nicht uebertragen
if (!m_pSeekCursor)
return -1;
some casts needed
2000-11-06 06:53:20 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xSet((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*m_pDataCursor, ::com::sun::star::uno::UNO_QUERY);
initial import
2000-09-18 16:07:07 +00:00
// jetzt den seekcursor an den DatenCursor angleichen
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
if (::comphelper::getBOOL(xSet->getPropertyValue(FM_PROP_ISNEW)))
initial import
2000-09-18 16:07:07 +00:00
m_nSeekPos = GetRowCount() - 1;
else
{
try
{
m_pSeekCursor->moveToBookmark(m_pDataCursor->getBookmark());
if (!CompareBookmark(m_pDataCursor->getBookmark(), m_pSeekCursor->getBookmark()))
// dummerweise kann das moveToBookmark indirekt dazu fuehren, dass der Seek-Cursor wieder neu positoniert wird (wenn
// naemlich das mit all seinen zu feuernden Events relativ komplexe moveToBookmark irgendwo ein Update ausloest),
// also muss ich es nochmal versuchen
m_pSeekCursor->moveToBookmark(m_pDataCursor->getBookmark());
// Nicht dass das jetzt nicht auch schief gegangen sein koennte, aber es ist zumindest unwahrscheinlicher geworden.
// Und die Alternative waere eine Schleife so lange bis es stimmt, und das kann auch nicht die Loesung sein
m_nSeekPos = m_pSeekCursor->getRow() - 1;
}
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
catch(Exception&)
initial import
2000-09-18 16:07:07 +00:00
{
}
}
return m_nSeekPos;
}
//------------------------------------------------------------------------------
sal_Bool DbGridControl::SeekCursor(long nRow, sal_Bool bAbsolute)
{
DBG_CHKTHIS( DbGridControl, NULL );
// Positioniert den SeekCursor, Daten werden nicht uebertragen
// additions for the filtermode
if (IsFilterRow(nRow))
{
m_nSeekPos = 0;
return sal_True;
}
if (!m_pSeekCursor)
return sal_False;
// Befinden wir uns gerade beim Einfuegen
if (IsValid(m_xCurrentRow) && m_xCurrentRow->IsNew() &&
nRow >= m_nCurrentPos)
{
// dann darf auf alle Faelle nicht weiter nach unten gescrollt werden
// da der letzte Datensatz bereits erreicht wurde!
if (nRow == m_nCurrentPos)
{
// auf die aktuelle Zeile bewegt, dann mu<6D> kein abgleich gemacht werden, wenn
// gerade ein Datensatz eingefuegt wird
m_nSeekPos = nRow;
}
else if (IsEmptyRow(nRow)) // Leerzeile zum Einfuegen von Datensaetzen
m_nSeekPos = nRow;
}
else if (IsEmptyRow(nRow)) // Leerzeile zum Einfuegen von Datensaetzen
m_nSeekPos = nRow;
else if ((-1 == nRow) && (GetRowCount() == ((m_nOptions & OPT_INSERT) ? 1 : 0)) && m_pSeekCursor->isAfterLast())
m_nSeekPos = nRow;
else
{
long nSteps = nRow - (m_pSeekCursor->getRow() - 1);// Tatsaechliche Position im Cursor
bAbsolute = bAbsolute || (abs(nSteps) > 100); // Sprung zu gro<72> ?
sal_Bool bSuccess=sal_False;
try
{
if (bAbsolute) // absolut positionierung
{
if ((bSuccess = m_pSeekCursor->absolute(nRow + 1)))
m_nSeekPos = nRow;
}
else
{
if (nSteps > 0) // auf den letzten benoetigten Datensatz positionieren
{
if (m_pSeekCursor->isAfterLast())
bSuccess = sal_False;
else if (m_pSeekCursor->isBeforeFirst())
bSuccess = m_pSeekCursor->absolute(nSteps);
else
bSuccess = m_pSeekCursor->relative(nSteps);
}
else if (nSteps < 0)
{
if (m_pSeekCursor->isBeforeFirst())
bSuccess = sal_False;
else if (m_pSeekCursor->isAfterLast())
bSuccess = m_pSeekCursor->absolute(nSteps);
else
bSuccess = m_pSeekCursor->relative(nSteps);
}
else
{
m_nSeekPos = nRow;
return sal_True;
}
}
}
enable drag&drop
2000-11-15 13:55:12 +00:00
catch(Exception&)
initial import
2000-09-18 16:07:07 +00:00
{
DBG_ERROR("DbGridControl::SeekCursor : failed ...");
}
try
{
if (!bSuccess)
{
if (bAbsolute || nSteps > 0)
bSuccess = m_pSeekCursor->last();
else
bSuccess = m_pSeekCursor->first();
}
if (bSuccess)
m_nSeekPos = m_pSeekCursor->getRow() - 1;
else
m_nSeekPos = -1;
}
enable drag&drop
2000-11-15 13:55:12 +00:00
catch(Exception&)
initial import
2000-09-18 16:07:07 +00:00
{
DBG_ERROR("DbGridControl::SeekCursor : failed ...");
m_nSeekPos = -1; // kein Datensatz mehr vorhanden
}
}
return m_nSeekPos == nRow;
}
//------------------------------------------------------------------------------
void DbGridControl::MoveToFirst()
{
if (!m_pSeekCursor)
return;
if (GetCurRow() != 0)
MoveToPosition(0);
}
//------------------------------------------------------------------------------
void DbGridControl::MoveToLast()
{
if (!m_pSeekCursor)
return;
if (m_nTotalCount < 0) // RecordCount steht noch nicht fest
{
try
{
sal_Bool bRes = m_pSeekCursor->last();
if (bRes)
{
m_nSeekPos = m_pSeekCursor->getRow() - 1;
AdjustRows();
}
}
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
catch(Exception&)
initial import
2000-09-18 16:07:07 +00:00
{
}
}
// auf den letzen Datensatz positionieren, nicht auf die Leerzeile
if (m_nOptions & OPT_INSERT)
{
if ((GetRowCount() - 1) > 0)
MoveToPosition(GetRowCount() - 2);
}
else if (GetRowCount())
MoveToPosition(GetRowCount() - 1);
}
//------------------------------------------------------------------------------
void DbGridControl::MoveToPrev()
{
long nNewRow = max(GetCurRow() - 1L, 0L);
if (GetCurRow() != nNewRow)
MoveToPosition(nNewRow);
}
//------------------------------------------------------------------------------
void DbGridControl::MoveToNext()
{
if (!m_pSeekCursor)
return;
if (m_nTotalCount > 0)
{
use of correct position
2000-09-22 08:44:02 +00:00
// move the data cursor to the right position
initial import
2000-09-18 16:07:07 +00:00
long nNewRow = min(GetRowCount() - 1, GetCurRow() + 1);
if (GetCurRow() != nNewRow)
MoveToPosition(nNewRow);
}
else
{
use of correct position
2000-09-22 08:44:02 +00:00
sal_Bool bOk;
initial import
2000-09-18 16:07:07 +00:00
try
{
use of correct position
2000-09-22 08:44:02 +00:00
// try to move to next row
// when not possible our paint cursor is already on the last row
// then we must be sure that the data cursor is on the position
// we call ourself again
if (bOk = m_pSeekCursor->next())
initial import
2000-09-18 16:07:07 +00:00
{
m_nSeekPos = m_pSeekCursor->getRow() - 1;
MoveToPosition(GetCurRow() + 1);
}
}
corrected navigation bar
2000-09-29 07:25:14 +00:00
catch(::com::sun::star::sdbc::SQLException &)
use of correct position
2000-09-22 08:44:02 +00:00
{
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
DBG_ERROR("DbGridControl::MoveToNext: SQLException caught");
use of correct position
2000-09-22 08:44:02 +00:00
}
if(!bOk)
initial import
2000-09-18 16:07:07 +00:00
{
use of correct position
2000-09-22 08:44:02 +00:00
AdjustRows();
if (m_nTotalCount > 0) // only to avoid infinte recursion
MoveToNext();
initial import
2000-09-18 16:07:07 +00:00
}
}
}
//------------------------------------------------------------------------------
void DbGridControl::MoveToPosition(sal_uInt32 nPos)
{
if (!m_pSeekCursor)
return;
if (nPos >= 0)
{
if (m_nTotalCount < 0 && (long)nPos >= GetRowCount())
{
try
{
if (!m_pSeekCursor->absolute(nPos + 1))
{
AdjustRows();
Sound::Beep();
return;
}
else
{
m_nSeekPos = m_pSeekCursor->getRow() - 1;
AdjustRows();
}
}
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
catch(Exception&)
initial import
2000-09-18 16:07:07 +00:00
{
return;
}
}
DbBrowseBox::GoToRow(nPos);
m_aBar.InvalidateAll(m_nCurrentPos);
}
}
//------------------------------------------------------------------------------
void DbGridControl::AppendNew()
{
if (!m_pSeekCursor || !(m_nOptions & OPT_INSERT))
return;
if (m_nTotalCount < 0) // RecordCount steht noch nicht fest
{
try
{
sal_Bool bRes = m_pSeekCursor->last();
if (bRes)
{
m_nSeekPos = m_pSeekCursor->getRow() - 1;
AdjustRows();
}
}
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
catch(Exception&)
initial import
2000-09-18 16:07:07 +00:00
{
return;
}
}
long nNewRow = m_nTotalCount + 1;
if (nNewRow > 0 && GetCurRow() != nNewRow)
MoveToPosition(nNewRow - 1);
}
//------------------------------------------------------------------------------
void DbGridControl::SetDesignMode(sal_Bool bMode)
{
if (IsDesignMode() != bMode)
{
// Enable/Disable f<>r den Designmode anpassen damit die Headerbar konfigurierbar bleibt
if (bMode)
{
if (!IsEnabled())
{
Enable();
GetDataWindow().Disable();
}
}
else
{
// komplett disablen
if (!GetDataWindow().IsEnabled())
Disable();
}
m_bDesignMode = bMode;
GetDataWindow().SetMouseTransparent(bMode);
SetMouseTransparent(bMode);
m_aBar.InvalidateAll(m_nCurrentPos, sal_True);
}
}
//------------------------------------------------------------------------------
void DbGridControl::SetFilterMode(sal_Bool bMode)
{
if (IsFilterMode() != bMode)
{
m_bFilterMode = bMode;
if (bMode)
{
SetUpdateMode(sal_False);
// es gibt kein Cursor mehr
if (IsEditing())
DeactivateCell();
RemoveRows(sal_False);
m_xEmptyRow = new DbGridRow();
// setting the new filter controls
for (sal_uInt16 i = 0; i<m_aColumns.Count(); ++i)
{
DbGridColumn* pCurCol = m_aColumns.GetObject(i);
if (!pCurCol->IsHidden())
pCurCol->UpdateControl();
}
// one row for filtering
RowInserted(0, 1, sal_True);
SetUpdateMode(sal_True);
}
else
setDataSource(::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XRowSet > ());
}
}
//------------------------------------------------------------------------------
XubString DbGridControl::GetCellText(DbGridColumn* pColumn) const
{
// Ausgabe des Textes fuer eine Zelle
XubString aText;
if (pColumn)
aText = pColumn->GetCellText(m_xPaintRow, m_xFormatter);
return aText;
}
//------------------------------------------------------------------------------
sal_uInt32 DbGridControl::GetTotalCellWidth(long nRow, sal_uInt16 nColId)
{
if (SeekRow(nRow))
{
DbGridColumn* pColumn = m_aColumns.GetObject(GetModelColumnPos(nColId));
return GetDataWindow().GetTextWidth(GetCellText(pColumn));
}
else
return 30; //xxxx
}
//------------------------------------------------------------------------------
void DbGridControl::PreExecuteRowContextMenu(sal_uInt16 nRow, PopupMenu& rMenu)
{
sal_Bool bDelete = (m_nOptions & OPT_DELETE) && GetSelectRowCount() && !IsCurrentAppending();
// ist nur die Leerzeile selektiert, dann nicht loeschen
bDelete = bDelete && !((m_nOptions & OPT_INSERT) && GetSelectRowCount() == 1 && IsRowSelected(GetRowCount() - 1));
rMenu.EnableItem(SID_FM_DELETEROWS, bDelete);
rMenu.EnableItem(SID_FM_RECORD_UNDO, IsModified());
rMenu.EnableItem(SID_FM_RECORD_SAVE, IsModified());
}
//------------------------------------------------------------------------------
void DbGridControl::PostExecuteRowContextMenu(sal_uInt16 nRow, const PopupMenu& rMenu, sal_uInt16 nExecutionResult)
{
switch (nExecutionResult)
{
case SID_FM_DELETEROWS:
// delete asynchron
if (m_nDeleteEvent)
Application::RemoveUserEvent(m_nDeleteEvent);
m_nDeleteEvent = Application::PostUserEvent(LINK(this,DbGridControl,OnDelete));
break;
case SID_FM_RECORD_UNDO:
Undo();
break;
case SID_FM_RECORD_SAVE:
SaveRow();
break;
default:
break;
}
}
//------------------------------------------------------------------------------
void DbGridControl::DataSourcePropertyChanged(const ::com::sun::star::beans::PropertyChangeEvent& evt) throw( ::com::sun::star::uno::RuntimeException )
{
TRACE_RANGE("DbGridControl::DataSourcePropertyChanged");
::vos::OGuard aGuard( Application::GetSolarMutex() );
// prop "IsModified" changed ?
// during update don't care about the modified state
if (!IsUpdating() && evt.PropertyName.compareTo(FM_PROP_ISMODIFIED) == COMPARE_EQUAL)
{
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xSource(evt.Source, ::com::sun::star::uno::UNO_QUERY);
sal_Bool bIsNew = sal_False;
if (xSource.is())
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
bIsNew = ::comphelper::getBOOL(xSource->getPropertyValue(FM_PROP_ISNEW));
initial import
2000-09-18 16:07:07 +00:00
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
if (bIsNew && m_xCurrentRow.Is())
initial import
2000-09-18 16:07:07 +00:00
{
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
DBG_ASSERT(::comphelper::getBOOL(xSource->getPropertyValue(FM_PROP_ROWCOUNTFINAL)), "DbGridControl::DataSourcePropertyChanged : somebody moved the form to a new record before the row count was final !");
initial import
2000-09-18 16:07:07 +00:00
sal_Int32 nRecordCount;
xSource->getPropertyValue(FM_PROP_ROWCOUNT) >>= nRecordCount;
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
if (::comphelper::getBOOL(evt.NewValue))
initial import
2000-09-18 16:07:07 +00:00
{ // modified state changed from sal_False to sal_True and we're on a insert row
// -> we've to add a new grid row
if ((nRecordCount == GetRowCount() - 1) && m_xCurrentRow->IsNew())
{
RowInserted(GetRowCount(), 1, sal_True);
InvalidateStatusCell(m_nCurrentPos);
m_aBar.InvalidateAll(m_nCurrentPos);
}
}
else
{ // modified state changed from sal_True to sal_False and we're on a insert row
// we have two "new row"s at the moment : the one we're editing currently (where the current
// column is the only dirty element) and a "new new" row which is completely clean. As the first
// one is about to be cleaned, too, the second one is obsolet now.
if (m_xCurrentRow->IsNew() && nRecordCount == (GetRowCount() - 2))
{
RowRemoved(GetRowCount() - 1, 1, sal_True);
InvalidateStatusCell(m_nCurrentPos);
m_aBar.InvalidateAll(m_nCurrentPos);
}
}
}
if (m_xCurrentRow.Is())
{
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
m_xCurrentRow->SetStatus(::comphelper::getBOOL(evt.NewValue) ? GRS_MODIFIED : GRS_CLEAN);
initial import
2000-09-18 16:07:07 +00:00
TRACE_RANGE_MESSAGE1("modified flag changed, new state : %s", ROWSTATUS(m_xCurrentRow));
}
}
}
//------------------------------------------------------------------------------
new DnD (not finished, yet)
2001-03-23 10:40:35 +00:00
void DbGridControl::StartDrag( sal_Int8 nAction, const Point& rPosPixel )
initial import
2000-09-18 16:07:07 +00:00
{
new DnD (not finished, yet)
2001-03-23 10:40:35 +00:00
if (!m_pSeekCursor || IsResizing())
return;
sal_uInt16 nColId = GetColumnAtXPosPixel(rPosPixel.X());
long nRow = GetRowAtYPosPixel(rPosPixel.Y());
if (nColId != HANDLE_ID && nRow >= 0)
initial import
2000-09-18 16:07:07 +00:00
{
new DnD (not finished, yet)
2001-03-23 10:40:35 +00:00
if (GetDataWindow().IsMouseCaptured())
GetDataWindow().ReleaseMouse();
initial import
2000-09-18 16:07:07 +00:00
new DnD implementations
2001-03-27 13:38:03 +00:00
DbGridColumn* pColumn = m_aColumns.GetObject(GetModelColumnPos(nColId));
OStringTransferable* pTransferable = new OStringTransferable(GetCellText(pColumn));
Reference< XTransferable > xEnsureDelete(pTransferable);
pTransferable->StartDrag(this, DND_ACTION_COPY);
new DnD (not finished, yet)
2001-03-23 10:40:35 +00:00
}
}
#86969# +canCopyCellText/copyCellText
2001-05-14 14:07:09 +00:00
//------------------------------------------------------------------------------
sal_Bool DbGridControl::canCopyCellText(sal_Int32 _nRow, sal_Int16 _nColId)
{
return (_nRow >= 0)
&& (_nRow < GetRowCount())
&& (_nColId > HANDLE_ID)
&& (_nColId <= ColCount());
}
//------------------------------------------------------------------------------
void DbGridControl::copyCellText(sal_Int32 _nRow, sal_Int16 _nColId)
{
DBG_ASSERT(canCopyCellText(_nRow, _nColId), "DbGridControl::copyCellText: invalid call!");
DbGridColumn* pColumn = m_aColumns.GetObject(GetModelColumnPos(_nColId));
SeekRow(_nRow);
OStringTransfer::CopyString(GetCellText(pColumn));
}
new DnD (not finished, yet)
2001-03-23 10:40:35 +00:00
//------------------------------------------------------------------------------
void DbGridControl::Command(const CommandEvent& rEvt)
{
switch (rEvt.GetCommand())
{
initial import
2000-09-18 16:07:07 +00:00
case COMMAND_CONTEXTMENU:
{
if (!rEvt.IsMouseEvent() || !m_pSeekCursor)
{
DbBrowseBox::Command(rEvt);
return;
}
sal_uInt16 nColId = GetColumnAtXPosPixel(rEvt.GetMousePosPixel().X());
long nRow = GetRowAtYPosPixel(rEvt.GetMousePosPixel().Y());
if (nColId == HANDLE_ID)
{
PopupMenu aContextMenu(SVX_RES(RID_SVXMNU_ROWS));
PreExecuteRowContextMenu(nRow, aContextMenu);
aContextMenu.RemoveDisabledEntries(sal_True, sal_True);
PostExecuteRowContextMenu(nRow, aContextMenu, aContextMenu.Execute(this, rEvt.GetMousePosPixel()));
}
#86969# +canCopyCellText/copyCellText
2001-05-14 14:07:09 +00:00
else if (canCopyCellText(nRow, nColId))
initial import
2000-09-18 16:07:07 +00:00
{
PopupMenu aContextMenu(SVX_RES(RID_SVXMNU_CELL));
aContextMenu.RemoveDisabledEntries(sal_True, sal_True);
switch (aContextMenu.Execute(this, rEvt.GetMousePosPixel()))
{
case SID_COPY:
#86969# +canCopyCellText/copyCellText
2001-05-14 14:07:09 +00:00
copyCellText(nRow, nColId);
break;
initial import
2000-09-18 16:07:07 +00:00
}
}
else
{
DbBrowseBox::Command(rEvt);
return;
}
}
default:
DbBrowseBox::Command(rEvt);
}
}
//------------------------------------------------------------------------------
IMPL_LINK(DbGridControl, OnDelete, void*, EMPTYTAG )
{
DBG_CHKTHIS(DbGridControl, NULL );
m_nDeleteEvent = 0;
DeleteSelectedRows();
return 0;
}
//------------------------------------------------------------------------------
void DbGridControl::DeleteSelectedRows()
{
DBG_ASSERT(GetSelection(), "keine selection!!!");
if (!m_pSeekCursor)
return;
/* Application::EnterWait();
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xSet = (::com::sun::star::beans::XPropertySet*)xSeekCursor->queryInterface(::com::sun::star::beans::XPropertySet::getSmartUik());
// wenn mehr als 25 Datensaetze geloescht werden, wird der Cache abgeschaltet
// da das loeschen ansonsten zu langsam wird
sal_uInt16 nCacheSize = 0;
if (GetSelectRowCount() > 25)
{
// CacheSize merken und Cache zuruecksetzen
nCacheSize = xSet->getPropertyValue(L"CacheSize").getUINT16();
if (nCacheSize)
xSet->setPropertyValue(L"CacheSize", ::com::sun::star::uno::Any(sal_uInt16(0)));
} */
/*
// mu<6D> der Cache wiederhergestellt werden?
if (nCacheSize)
{
// Cache wieder einschalten
xSet->setPropertyValue(L"CacheSize", ::com::sun::star::uno::Any(sal_uInt16(nCacheSize)));
// Browser neu einstellen
RecalcRows(GetTopRow(), GetVisibleRows(), sal_True);
// aktuelle Zeile aktualisieren
SeekCursor(GetCurRow());
if (IsAppendRow(m_nSeekPos))
xDataCursor->addRecord();
else
{
::com::sun::star::uno::Any aBookmark = xSeekCursor->getBookmark();
xDataCursor->moveToBookmark(aBookmark);
}
m_xCurrentRow = new DbGridRow(xDataCursor);
m_nCurrentPos = m_nSeekPos;
// complett invalidieren
Invalidate();
}
else
// Browser neu einstellen
RecalcRows(GetTopRow(), GetVisibleRows(), sal_True);
// gibt es keine ::com::sun::star::awt::Selection mehr?
if (!GetSelectRowCount())
ActivateCell();
m_aBar.InvalidateAll();
Application::LeaveWait();
m_bUpdating = sal_False;
*/
}
//------------------------------------------------------------------------------
DbCellController* DbGridControl::GetController(long nRow, sal_uInt16 nColumnId)
{
if (!IsValid(m_xCurrentRow) || !IsEnabled())
return NULL;
DbGridColumn* pColumn = m_aColumns.GetObject(GetModelColumnPos(nColumnId));
if (!pColumn)
return NULL;
DbCellController* pReturn = NULL;
if (IsFilterMode())
pReturn = &pColumn->GetController();
else
{
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
if (::comphelper::hasProperty(FM_PROP_ENABLED, pColumn->getModel()))
initial import
2000-09-18 16:07:07 +00:00
{
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
if (!::comphelper::getBOOL(pColumn->getModel()->getPropertyValue(FM_PROP_ENABLED)))
initial import
2000-09-18 16:07:07 +00:00
return NULL;
}
sal_Bool bInsert = (m_xCurrentRow->IsNew() && (m_nOptions & OPT_INSERT));
sal_Bool bUpdate = (!m_xCurrentRow->IsNew() && (m_nOptions & OPT_UPDATE));
if ((bInsert && !pColumn->IsAutoValue()) || bUpdate || m_bForceROController)
{
pReturn = &pColumn->GetController();
if (pReturn)
{
// wenn es eine Edit-Zeile ist, kann ich ihr das forced read-only mitgeben
if (!pReturn->ISA(DbEditCellController) && !pReturn->ISA(DbSpinCellController))
// ich konnte den Controller in forceROController nicht auf ReadOnly setzen
if (!bInsert && !bUpdate)
// ich bin nur hier, da m_bForceROController gesetzt war
// -> lieber kein Controller als einer ohne RO
pReturn = NULL;
}
}
}
return pReturn;
}
//------------------------------------------------------------------------------
void DbGridControl::InitController(DbCellControllerRef& rController, long nRow, sal_uInt16 nColumnId)
{
DbGridColumn* pColumn = m_aColumns.GetObject(GetModelColumnPos(nColumnId));
if (pColumn)
pColumn->UpdateFromField(m_xCurrentRow, m_xFormatter);
}
//------------------------------------------------------------------------------
void DbGridControl::CellModified()
{
TRACE_RANGE("DbGridControl::CellModified");
{
::osl::MutexGuard aGuard(m_aAdjustSafety);
if (m_nAsynAdjustEvent)
{
TRACE_RANGE_MESSAGE1("forcing a synchron call to ", m_bPendingAdjustRows ? "AdjustRows" : "AdustDataSource");
RemoveUserEvent(m_nAsynAdjustEvent);
m_nAsynAdjustEvent = 0;
// force the call : this should be no problem as we're probably running in the solar thread here
// (cell modified is triggered by user actions)
if (m_bPendingAdjustRows)
AdjustRows();
else
AdjustDataSource();
}
}
if (!IsFilterMode() && IsValid(m_xCurrentRow) && !m_xCurrentRow->IsModified())
{
// Einschalten des Editiermodus
// Datensatz soll eingefuegt werden
if (m_xCurrentRow->IsNew())
{
m_xCurrentRow->SetStatus(GRS_MODIFIED);
TRACE_RANGE_MESSAGE("current row is new, new state : MODIFIED");
// wenn noch keine Zeile hinzugefuegt wurde, dann neue hinzunehmen
if (m_nCurrentPos == GetRowCount() - 1)
{
// RowCount um einen erhoehen
RowInserted(GetRowCount(), 1, sal_True);
InvalidateStatusCell(m_nCurrentPos);
m_aBar.InvalidateAll(m_nCurrentPos);
}
}
else if (m_xCurrentRow->GetStatus() != GRS_MODIFIED)
{
m_xCurrentRow->SetState(m_pDataCursor, sal_False);
TRACE_RANGE_MESSAGE1("current row is not new, after SetState, new state : %s", ROWSTATUS(m_xCurrentRow));
m_xCurrentRow->SetStatus(GRS_MODIFIED);
TRACE_RANGE_MESSAGE("current row is not new, new state : MODIFIED");
InvalidateStatusCell(m_nCurrentPos);
}
}
}
//------------------------------------------------------------------------------
void DbGridControl::Dispatch(sal_uInt16 nId)
{
if (nId == BROWSER_CURSORENDOFFILE)
{
if (m_nOptions & OPT_INSERT)
AppendNew();
else
MoveToLast();
}
else
DbBrowseBox::Dispatch(nId);
}
//------------------------------------------------------------------------------
void DbGridControl::Undo()
{
if (!IsFilterMode() && IsValid(m_xCurrentRow) && IsModified())
{
// check if we have somebody doin' the UNDO for us
long nState = -1;
if (m_aMasterStateProvider.IsSet())
nState = m_aMasterStateProvider.Call((void*)SID_FM_RECORD_UNDO);
if (nState>0)
{ // yes, we have, and the slot is enabled
DBG_ASSERT(m_aMasterSlotExecutor.IsSet(), "DbGridControl::Undo : a state, but no execute link ?");
long lResult = m_aMasterSlotExecutor.Call((void*)SID_FM_RECORD_UNDO);
if (lResult)
// handled
return;
}
else if (nState == 0)
// yes, we have, and the slot is disabled
return;
BeginCursorAction();
sal_Bool bAppending = m_xCurrentRow->IsNew();
sal_Bool bDirty = m_xCurrentRow->IsModified();
try
{
// Editieren abbrechen
some casts needed
2000-11-06 06:53:20 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XResultSetUpdate > xUpdateCursor((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*m_pDataCursor, ::com::sun::star::uno::UNO_QUERY);
initial import
2000-09-18 16:07:07 +00:00
// no effects if we're not updating currently
if (bAppending)
// just refresh the row
xUpdateCursor->moveToInsertRow();
else
xUpdateCursor->cancelRowUpdates();
}
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
catch(Exception&)
initial import
2000-09-18 16:07:07 +00:00
{
}
EndCursorAction();
m_xDataRow->SetState(m_pDataCursor, sal_False);
if (&m_xPaintRow == &m_xCurrentRow)
m_xPaintRow = m_xCurrentRow = m_xDataRow;
else
m_xCurrentRow = m_xDataRow;
if (bAppending && (DbBrowseBox::IsModified() || bDirty))
// remove the row
if (m_nCurrentPos == GetRowCount() - 2)
{ // maybe we already removed it (in resetCurrentRow, called if the above moveToInsertRow
// caused our data source form to be reset - which should be the usual case ....)
RowRemoved(GetRowCount() - 1, 1, sal_True);
m_aBar.InvalidateAll(m_nCurrentPos);
}
RowModified(m_nCurrentPos);
}
}
//------------------------------------------------------------------------------
void DbGridControl::resetCurrentRow()
{
if (IsModified())
{
// scenario : we're on the insert row, the row is dirty, and thus there exists a "second" insert row (which
// is clean). Normally in DataSourcePropertyChanged we would remove this second row if the modified state of
// the insert row changes from sal_True to sal_False. But if our current cell is the only modified element (means the
// data source isn't modified) and we're reset this DataSourcePropertyChanged would never be called, so we
// would never delete the obsolet "second insert row". Thus in this special case this method here
// is the only possibility to determine the redundance of the row (resetCurrentRow is called when the
// "first insert row" is about to be cleaned, so of course the "second insert row" is redundant now)
some casts needed
2000-11-06 06:53:20 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xDataSource((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*getDataSource(), ::com::sun::star::uno::UNO_QUERY);
migration unotools->comphelper
2000-10-20 13:13:45 +00:00
if (xDataSource.is() && !::comphelper::getBOOL(xDataSource->getPropertyValue(FM_PROP_ISMODIFIED)))
initial import
2000-09-18 16:07:07 +00:00
{
// are we on a new row currently ?
if (m_xCurrentRow->IsNew())
{
if (m_nCurrentPos == GetRowCount() - 2)
{
RowRemoved(GetRowCount() - 1, 1, sal_True);
m_aBar.InvalidateAll(m_nCurrentPos);
}
}
}
// update the rows
m_xDataRow->SetState(m_pDataCursor, sal_False);
if (&m_xPaintRow == &m_xCurrentRow)
m_xPaintRow = m_xCurrentRow = m_xDataRow;
else
m_xCurrentRow = m_xDataRow;
}
RowModified(GetCurRow()); // will update the current controller if affected
}
//------------------------------------------------------------------------------
void DbGridControl::RowModified( long nRow, sal_uInt16 nColId )
{
if (nRow == m_nCurrentPos && IsEditing())
{
DbCellControllerRef aTmpRef = Controller();
aTmpRef->ClearModified();
InitController(aTmpRef, m_nCurrentPos, GetCurColumnId());
}
DbBrowseBox::RowModified(nRow);
}
//------------------------------------------------------------------------------
sal_Bool DbGridControl::IsModified() const
{
return !IsFilterMode() && IsValid(m_xCurrentRow) && (m_xCurrentRow->IsModified() || DbBrowseBox::IsModified());
}
//------------------------------------------------------------------------------
sal_Bool DbGridControl::IsCurrentAppending() const
{
return m_xCurrentRow.Is() && m_xCurrentRow->IsNew();
}
//------------------------------------------------------------------------------
sal_Bool DbGridControl::IsEmptyRow(long nRow) const
{
return (m_nOptions & OPT_INSERT) && m_nTotalCount >= 0 && (nRow == GetRowCount() - 1);
}
//------------------------------------------------------------------------------
sal_Bool DbGridControl::SaveModified()
{
TRACE_RANGE("DbGridControl::SaveModified");
DBG_ASSERT(IsValid(m_xCurrentRow), "GridControl:: Invalid row");
if (!IsValid(m_xCurrentRow))
return sal_True;
// Uebernimmt die Dateneingabe fuer das Feld
// Hat es aenderungen im aktuellen Eingabefeld gegeben ?
if (!DbBrowseBox::IsModified())
return sal_True;
DbGridColumn* pColumn = m_aColumns.GetObject(GetModelColumnPos(GetCurColumnId()));
sal_Bool bOK = pColumn->Commit();
if (bOK)
{
Controller()->ClearModified();
if (IsValid(m_xCurrentRow) && !m_xCurrentRow->IsModified())
{
m_xCurrentRow->SetState(m_pDataCursor, sal_False);
TRACE_RANGE_MESSAGE1("explicit SetState, new state : %s", ROWSTATUS(m_xCurrentRow));
}
else
{
TRACE_RANGE_MESSAGE1("no SetState, new state : %s", ROWSTATUS(m_xCurrentRow));
}
}
return bOK;
}
//------------------------------------------------------------------------------
sal_Bool DbGridControl::SaveRow()
{
TRACE_RANGE("DbGridControl::SaveRow");
// gueltige Zeile
if (!IsValid(m_xCurrentRow) || !IsModified())
return sal_True;
// Wert des Controllers noch nicht gespeichert
else if (Controller().Is() && Controller()->IsModified())
{
if (!SaveModified())
return sal_False;
}
m_bUpdating = sal_True;
BeginCursorAction();
sal_Bool bAppending = m_xCurrentRow->IsNew();
sal_Bool bSuccess = sal_False;
try
{
some casts needed
2000-11-06 06:53:20 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XResultSetUpdate > xUpdateCursor((::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >)*m_pDataCursor, ::com::sun::star::uno::UNO_QUERY);
initial import
2000-09-18 16:07:07 +00:00
if (bAppending)
xUpdateCursor->insertRow();
else
xUpdateCursor->updateRow();
bSuccess = sal_True;
}
catch(::com::sun::star::sdbc::SQLException& e)
{
e; // make compiler happy
EndCursorAction();
m_bUpdating = sal_False;
return sal_False;
}
try
{
if (bSuccess)
{
// if we are appending we still sit on the insert row
// we don't move just clear the flags not to move on the current row
m_xCurrentRow->SetState(m_pDataCursor, sal_False);
TRACE_RANGE_MESSAGE1("explicit SetState after a successfull update, new state : %s", ROWSTATUS(m_xCurrentRow));
m_xCurrentRow->SetNew(sal_False);
// adjust the seekcursor if it is on the same position as the datacursor
if (m_nSeekPos == m_nCurrentPos || bAppending)
{
// get the bookmark to refetch the data
// in insert mode we take the new bookmark of the data cursor
::com::sun::star::uno::Any aBookmark = bAppending ? m_pDataCursor->getBookmark() : m_pSeekCursor->getBookmark();
m_pSeekCursor->moveToBookmark(aBookmark);
// get the data
m_xSeekRow->SetState(m_pSeekCursor, sal_True);
m_nSeekPos = m_pSeekCursor->getRow() - 1;
}
}
// and repaint the row
RowModified(m_nCurrentPos);
}
when setting a new data source, initialize property even if we have no columns at this moment
2001-03-26 14:07:52 +00:00
catch(Exception&)
initial import
2000-09-18 16:07:07 +00:00
{
}
m_bUpdating = sal_False;
EndCursorAction();
// The old code returned (nRecords != 0) here.
// Me thinks this is wrong : If something goes wrong while update the record, an exception will be thrown,
// which results in a "return sal_False" (see above). If no exception is thrown, everything is fine. If nRecords
// is zero, this simply means all fields had their original values.
// FS - 06.12.99 - 70502
return sal_True;
}
//------------------------------------------------------------------------------
long DbGridControl::PreNotify(NotifyEvent& rEvt)
{
// keine Events der Navbar behandeln
if (m_aBar.IsWindowOrChild(rEvt.GetWindow()))
return BrowseBox::PreNotify(rEvt);
switch (rEvt.GetType())
{
case EVENT_KEYINPUT:
{
const KeyEvent* pKeyEvent = rEvt.GetKeyEvent();
if (!pKeyEvent->GetKeyCode().IsShift() &&
!pKeyEvent->GetKeyCode().IsMod1() &&
pKeyEvent->GetKeyCode().GetCode() == KEY_ESCAPE)
{
if (IsModified())
{
Undo();
return 1;
}
}
else if (pKeyEvent->GetKeyCode().GetCode() == KEY_DELETE && // Delete rows
!pKeyEvent->GetKeyCode().IsShift() &&
!pKeyEvent->GetKeyCode().IsMod1())
{
if ((m_nOptions & OPT_DELETE) && GetSelectRowCount())
{
// delete asynchron
if (m_nDeleteEvent)
Application::RemoveUserEvent(m_nDeleteEvent);
m_nDeleteEvent = Application::PostUserEvent(LINK(this,DbGridControl,OnDelete));
return 1;
}
}
} // kein break!
default:
return DbBrowseBox::PreNotify(rEvt);
}
}
//------------------------------------------------------------------------------
sal_Bool DbGridControl::IsTabAllowed(sal_Bool bRight) const
{
if (bRight)
// Tab nur wenn nicht auf der letzten Zelle
return GetCurRow() < (GetRowCount() - 1) || !m_bRecordCountFinal ||
GetViewColumnPos(GetCurColumnId()) < (GetViewColCount() - 1);
else
{
// Tab nur wenn nicht auf der ersten Zelle
return GetCurRow() > 0 || (GetCurColumnId() && GetViewColumnPos(GetCurColumnId()) > 0);
}
}
//------------------------------------------------------------------------------
void DbGridControl::KeyInput( const KeyEvent& rEvt )
{
if (rEvt.GetKeyCode().GetFunction() == KEYFUNC_COPY)
{
long nRow = GetCurRow();
sal_uInt16 nColId = GetCurColumnId();
if (nRow >= 0 && nRow < GetRowCount() && nColId < ColCount())
{
DbGridColumn* pColumn = m_aColumns.GetObject(GetModelColumnPos(nColId));
Clipboard::Clear();
Clipboard::CopyString(GetCellText(pColumn));
return;
}
}
DbBrowseBox::KeyInput(rEvt);
}
//------------------------------------------------------------------------------
void DbGridControl::HideColumn(sal_uInt16 nId)
{
DeactivateCell();
// determine the col for the focus to set to after removal
sal_uInt16 nPos = GetViewColumnPos(nId);
sal_uInt16 nNewColId = nPos == (ColCount()-1)
? GetColumnIdFromViewPos(nPos-1) // last col is to be removed -> take the previous
: GetColumnIdFromViewPos(nPos+1); // take the next
long lCurrentWidth = GetColumnWidth(nId);
DbBrowseBox::RemoveColumn(nId);
// don't use my own RemoveColumn, this would remove it from m_aColumns, too
// update my model
DbGridColumn* pColumn = m_aColumns.GetObject(GetModelColumnPos(nId));
DBG_ASSERT(pColumn, "DbGridControl::HideColumn : somebody did hide a nonexistent column !");
if (pColumn)
{
pColumn->m_bHidden = sal_True;
pColumn->m_nLastVisibleWidth = CalcReverseZoom(lCurrentWidth);
}
// and reset the focus
GoToColumnId( nNewColId );
}
//------------------------------------------------------------------------------
void DbGridControl::ShowColumn(sal_uInt16 nId)
{
sal_uInt16 nPos = GetModelColumnPos(nId);
DBG_ASSERT(nPos != (sal_uInt16)-1, "DbGridControl::ShowColumn : invalid argument !");
if (nPos == (sal_uInt16)-1)
return;
DbGridColumn* pColumn = m_aColumns.GetObject(nPos);
if (!pColumn->IsHidden())
{
DBG_ASSERT(GetViewColumnPos(nId) != (sal_uInt16)-1, "DbGridControl::ShowColumn : inconsistent internal state !");
// if the column isn't marked as hidden, it should be visible, shouldn't it ?
return;
}
DBG_ASSERT(GetViewColumnPos(nId) == (sal_uInt16)-1, "DbGridControl::ShowColumn : inconsistent internal state !");
// the opposite situation ...
// to determine the new view position we need an adjacent non-hidden column
sal_uInt16 nNextNonHidden = (sal_uInt16)-1;
// first search the cols to the right
for (sal_uInt16 i = nPos + 1; i<m_aColumns.Count(); ++i)
{
DbGridColumn* pCurCol = m_aColumns.GetObject(i);
if (!pCurCol->IsHidden())
{
nNextNonHidden = i;
break;
}
}
if ((nNextNonHidden == (sal_uInt16)-1) && (nPos > 0))
{
// then to the left
for (sal_uInt16 i = nPos; i>0; --i)
{
DbGridColumn* pCurCol = m_aColumns.GetObject(i-1);
if (!pCurCol->IsHidden())
{
nNextNonHidden = i-1;
break;
}
}
}
sal_uInt16 nNewViewPos = (nNextNonHidden == (sal_uInt16)-1)
? 1 // there is no visible column -> insert behinde the handle col
: GetViewColumnPos(m_aColumns.GetObject(nNextNonHidden)->GetId()) + 1;
// the first non-handle col has "view pos" 0, but the pos arg for InsertDataColumn expects
// a position 1 for the first non-handle col -> +1
DBG_ASSERT(nNewViewPos != (sal_uInt16)-1, "DbGridControl::ShowColumn : inconsistent internal state !");
// we found a col marked as visible but got no view pos for it ...
if ((nNextNonHidden<nPos) && (nNextNonHidden != (sal_uInt16)-1))
// nNextNonHidden is a column to the left, so we want to insert the new col _right_ beside it's pos
++nNewViewPos;
DeactivateCell();
::rtl::OUString aName;
pColumn->getModel()->getPropertyValue(FM_PROP_LABEL) >>= aName;
InsertDataColumn(nId, aName, CalcZoom(pColumn->m_nLastVisibleWidth), HIB_CENTER | HIB_VCENTER | HIB_CLICKABLE, nNewViewPos);
pColumn->m_bHidden = sal_False;
ActivateCell();
Invalidate();
}
//------------------------------------------------------------------------------
sal_uInt16 DbGridControl::GetColumnIdFromModelPos( sal_uInt16 nPos ) const
{
if (nPos >= m_aColumns.Count())
{
DBG_ERROR("DbGridControl::GetColumnIdFromModelPos : invalid argument !");
return (sal_uInt16)-1;
}
DbGridColumn* pCol = m_aColumns.GetObject(nPos);
#if _DEBUG || DBG_UTIL
// in der Debug-Version rechnen wir die ModelPos in eine ViewPos um und vergleichen das mit dem Wert,
// den wir zurueckliefern werden (nId an der entsprechenden Col in m_aColumns)
if (!pCol->IsHidden())
{ // macht nur Sinn, wenn die Spalte sichtbar ist
sal_uInt16 nViewPos = nPos;
for (sal_uInt16 i=0; i<m_aColumns.Count() && i<nPos; ++i)
if (m_aColumns.GetObject(i)->IsHidden())
--nViewPos;
DBG_ASSERT(pCol && GetColumnIdFromViewPos(nViewPos) == pCol->GetId(),
"DbGridControl::GetColumnIdFromModelPos : this isn't consistent .... did I misunderstand something ?");
}
#endif
return pCol->GetId();
}
//------------------------------------------------------------------------------
sal_uInt16 DbGridControl::GetModelColumnPos( sal_uInt16 nId ) const
{
for (sal_uInt16 i=0; i<m_aColumns.Count(); ++i)
if (m_aColumns.GetObject(i)->GetId() == nId)
return i;
return -1;
}
//------------------------------------------------------------------------------
void DbGridControl::implAdjustInSolarThread(BOOL _bRows)
{
TRACE_RANGE("DbGridControl::implAdjustInSolarThread");
::osl::MutexGuard aGuard(m_aAdjustSafety);
if (::vos::OThread::getCurrentIdentifier() != Application::GetMainThreadIdentifier())
{
m_nAsynAdjustEvent = PostUserEvent(LINK(this, DbGridControl, OnAsyncAdjust), (void*)_bRows);
m_bPendingAdjustRows = _bRows;
#ifdef DBG_UTIL
if (_bRows)
TRACE_RANGE_MESSAGE("posting an AdjustRows")
else
TRACE_RANGE_MESSAGE("posting an AdjustDataSource")
#endif
}
else
{
#ifdef DBG_UTIL
if (_bRows)
TRACE_RANGE_MESSAGE("doing an AdjustRows")
else
TRACE_RANGE_MESSAGE("doing an AdjustDataSource")
#endif
if (_bRows)
AdjustRows();
else
AdjustDataSource();
}
}
//------------------------------------------------------------------------------
IMPL_LINK(DbGridControl, OnAsyncAdjust, void*, pAdjustWhat)
{
m_nAsynAdjustEvent = 0;
if (pAdjustWhat)
AdjustRows();
else
AdjustDataSource();
return 0L;
}
//------------------------------------------------------------------------------
void DbGridControl::BeginCursorAction()
{
if (m_pFieldListeners)
{
ColumnFieldValueListeners* pListeners = (ColumnFieldValueListeners*)m_pFieldListeners;
ConstColumnFieldValueListenersIterator aIter = pListeners->begin();
while (aIter != pListeners->end())
{
GridFieldValueListener* pCurrent = (*aIter).second;
if (pCurrent)
pCurrent->suspend();
++aIter;
}
}
if (m_pDataSourcePropListener)
m_pDataSourcePropListener->suspend();
}
//------------------------------------------------------------------------------
void DbGridControl::EndCursorAction()
{
if (m_pFieldListeners)
{
ColumnFieldValueListeners* pListeners = (ColumnFieldValueListeners*)m_pFieldListeners;
ConstColumnFieldValueListenersIterator aIter = pListeners->begin();
while (aIter != pListeners->end())
{
GridFieldValueListener* pCurrent = (*aIter).second;
if (pCurrent)
pCurrent->resume();
++aIter;
}
}
if (m_pDataSourcePropListener)
m_pDataSourcePropListener->resume();
}
//------------------------------------------------------------------------------
void DbGridControl::ConnectToFields()
{
ColumnFieldValueListeners* pListeners = (ColumnFieldValueListeners*)m_pFieldListeners;
DBG_ASSERT(!pListeners || pListeners->size() == 0, "DbGridControl::ConnectToFields : please call DisconnectFromFields first !");
if (!pListeners)
{
pListeners = new ColumnFieldValueListeners;
m_pFieldListeners = pListeners;
}
for (sal_Int32 i=0; i<m_aColumns.Count(); ++i)
{
DbGridColumn* pCurrent = m_aColumns.GetObject(i);
sal_uInt16 nViewPos = pCurrent ? GetViewColumnPos(pCurrent->GetId()) : (sal_uInt16)-1;
if ((sal_uInt16)-1 == nViewPos)
continue;
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > xField = pCurrent->GetField();
if (!xField.is())
continue;
// column is visible and bound here
GridFieldValueListener*& rpListener = (*pListeners)[pCurrent->GetId()];
DBG_ASSERT(!rpListener, "DbGridControl::ConnectToFields : already a listener for this column ?!");
rpListener = new GridFieldValueListener(*this, xField, pCurrent->GetId());
}
}
//------------------------------------------------------------------------------
void DbGridControl::DisconnectFromFields()
{
if (!m_pFieldListeners)
return;
ColumnFieldValueListeners* pListeners = (ColumnFieldValueListeners*)m_pFieldListeners;
while (pListeners->size())
{
#if DBG_UTIL
sal_Int32 nOldSize = pListeners->size();
#endif
pListeners->begin()->second->dispose();
DBG_ASSERT(nOldSize > pListeners->size(), "DbGridControl::DisconnectFromFields : dispose on a listener should result in a removal from my list !");
}
delete pListeners;
m_pFieldListeners = NULL;
}
//------------------------------------------------------------------------------
void DbGridControl::FieldValueChanged(sal_uInt16 _nId, const ::com::sun::star::beans::PropertyChangeEvent& /*_evt*/)
{
osl::MutexGuard aPreventDestruction(m_aDestructionSafety);
// needed as this may run in a thread other than the main one
if (GetRowStatus(GetCurRow()) != DbBrowseBox::MODIFIED)
// all other cases are handled elsewhere
return;
DbGridColumn* pColumn = m_aColumns.GetObject(GetModelColumnPos(_nId));
if (pColumn)
{
sal_Bool bAcquiredPaintSafety = sal_False;
while (!m_bWantDestruction && !bAcquiredPaintSafety)
bAcquiredPaintSafety = Application::GetSolarMutex().tryToAcquire();
if (m_bWantDestruction)
{ // at this moment, within another thread, our destructor tries to destroy the listener which called this method
// => don't do anything
// 73365 - 23.02.00 - FS
if (bAcquiredPaintSafety)
// though the above while-loop suggests that (m_bWantDestruction && bAcquiredPaintSafety) is impossible,
// it isnt't, as m_bWantDestruction isn't protected with any mutex
Application::GetSolarMutex().release();
return;
}
// here we got the solar mutex, transfer it to a guard for safety reasons
::vos::OGuard aPaintSafety(Application::GetSolarMutex());
Application::GetSolarMutex().release();
// and finally do the update ...
pColumn->UpdateFromField(m_xCurrentRow, m_xFormatter);
RowModified(GetCurRow(), _nId);
}
}
//------------------------------------------------------------------------------
void DbGridControl::FieldListenerDisposing(sal_uInt16 _nId)
{
ColumnFieldValueListeners* pListeners = (ColumnFieldValueListeners*)m_pFieldListeners;
if (!pListeners)
{
DBG_ERROR("DbGridControl::FieldListenerDisposing : invalid call (have no listener array) !");
return;
}
ColumnFieldValueListenersIterator aPos = pListeners->find(_nId);
if (aPos == pListeners->end())
{
DBG_ERROR("DbGridControl::FieldListenerDisposing : invalid call (did not find the listener) !");
return;
}
delete aPos->second;
pListeners->erase(aPos);
}
//------------------------------------------------------------------------------
void DbGridControl::disposing(sal_uInt16 _nId, const ::com::sun::star::lang::EventObject& _rEvt)
{
if (_nId == 0)
#82645# setdatasource to null when our clone is in dispose
2001-01-10 14:43:10 +00:00
{ // the seek cursor is beeing disposed
initial import
2000-09-18 16:07:07 +00:00
::osl::MutexGuard aGuard(m_aAdjustSafety);
#82645# setdatasource to null when our clone is in dispose
2001-01-10 14:43:10 +00:00
setDataSource(NULL,0); // our clone was disposed so we set our datasource to null to avoid later acces to it
initial import
2000-09-18 16:07:07 +00:00
if (m_nAsynAdjustEvent)
{
RemoveUserEvent(m_nAsynAdjustEvent);
m_nAsynAdjustEvent = 0;
}
}
}
Reference in New Issue Copy Permalink