1398 lines
47 KiB
C++
1398 lines
47 KiB
C++
/*************************************************************************
|
|
*
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
*
|
|
* Copyright 2000, 2010 Oracle and/or its affiliates.
|
|
*
|
|
* OpenOffice.org - a multi-platform office productivity suite
|
|
*
|
|
* This file is part of OpenOffice.org.
|
|
*
|
|
* OpenOffice.org is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Lesser General Public License version 3
|
|
* only, as published by the Free Software Foundation.
|
|
*
|
|
* OpenOffice.org 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 version 3 for more details
|
|
* (a copy is included in the LICENSE file that accompanied this code).
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public License
|
|
* version 3 along with OpenOffice.org. If not, see
|
|
* <http://www.openoffice.org/license.html>
|
|
* for a copy of the LGPLv3 License.
|
|
*
|
|
************************************************************************/
|
|
|
|
// MARKER(update_precomp.py): autogen include statement, do not remove
|
|
#include "precompiled_svtools.hxx"
|
|
|
|
#include <stdio.h>
|
|
#include <tools/debug.hxx>
|
|
#include <comphelper/processfactory.hxx>
|
|
#include <unotools/localedatawrapper.hxx>
|
|
#include <vcl/svapp.hxx>
|
|
#include <svl/zformat.hxx>
|
|
#include <svtools/fmtfield.hxx>
|
|
#include <i18npool/mslangid.hxx>
|
|
#include <com/sun/star/lang/Locale.hpp>
|
|
#include <com/sun/star/util/SearchOptions.hpp>
|
|
#include <com/sun/star/util/SearchAlgorithms.hpp>
|
|
#include <com/sun/star/util/SearchResult.hpp>
|
|
#include <com/sun/star/util/SearchFlags.hpp>
|
|
#include <com/sun/star/lang/Locale.hpp>
|
|
#include <unotools/syslocale.hxx>
|
|
|
|
#ifndef REGEXP_SUPPORT
|
|
#include <map>
|
|
#endif
|
|
|
|
#if !defined INCLUDED_RTL_MATH_HXX
|
|
#include <rtl/math.hxx>
|
|
#endif
|
|
|
|
using namespace ::com::sun::star::lang;
|
|
using namespace ::com::sun::star::util;
|
|
|
|
|
|
#ifdef REGEXP_SUPPORT
|
|
|
|
//==============================================================================
|
|
// regular expression to validate complete numbers, plus every fragment which can occur during the input
|
|
// of a complete number
|
|
// [+/-][{digit}*.]*{digit}*[,{digit}*][e[+/-]{digit}*]
|
|
const char __FAR_DATA szNumericInput[] = "_[-+]?([0-9]*\\,)*[0-9]*(\\.[0-9]*)?(e[-+]?[0-9]*)?_";
|
|
// (the two _ are for normalizing it: With this, we can ensure that a to-be-checked text is always
|
|
// matched as a _whole_)
|
|
#else
|
|
|
|
// hmm. No support for regular expression. Well, I always (not really :) wanted to write a finite automat
|
|
// so here comes a finite automat ...
|
|
|
|
namespace validation
|
|
{
|
|
// the states of our automat.
|
|
enum State
|
|
{
|
|
START, // at the very start of the string
|
|
NUM_START, // the very start of the number
|
|
|
|
DIGIT_PRE_COMMA, // some pre-comma digits are read, perhaps including some thousand separators
|
|
|
|
DIGIT_POST_COMMA, // reading digits after the comma
|
|
EXPONENT_START, // at the very start of the exponent value
|
|
// (means: not including the "e" which denotes the exponent)
|
|
EXPONENT_DIGIT, // currently reading the digits of the exponent
|
|
|
|
END // reached the end of the string
|
|
};
|
|
|
|
// a row in the transition table (means the set of states to be reached from a given state)
|
|
typedef ::std::map< sal_Unicode, State > StateTransitions;
|
|
|
|
// a single transition
|
|
typedef StateTransitions::value_type Transition;
|
|
|
|
// the complete transition table
|
|
typedef ::std::map< State, StateTransitions > TransitionTable;
|
|
|
|
// the validator class
|
|
class NumberValidator
|
|
{
|
|
private:
|
|
TransitionTable m_aTransitions;
|
|
const sal_Unicode m_cThSep;
|
|
const sal_Unicode m_cDecSep;
|
|
|
|
public:
|
|
NumberValidator( const sal_Unicode _cThSep, const sal_Unicode _cDecSep );
|
|
|
|
sal_Bool isValidNumericFragment( const String& _rText );
|
|
|
|
private:
|
|
sal_Bool implValidateNormalized( const String& _rText );
|
|
};
|
|
|
|
//--------------------------------------------------------------------------
|
|
//..........................................................................
|
|
static void lcl_insertStopTransition( StateTransitions& _rRow )
|
|
{
|
|
_rRow.insert( Transition( '_', END ) );
|
|
}
|
|
|
|
//..........................................................................
|
|
static void lcl_insertStartExponentTransition( StateTransitions& _rRow )
|
|
{
|
|
_rRow.insert( Transition( 'e', EXPONENT_START ) );
|
|
}
|
|
|
|
//..........................................................................
|
|
static void lcl_insertSignTransitions( StateTransitions& _rRow, const State eNextState )
|
|
{
|
|
_rRow.insert( Transition( '-', eNextState ) );
|
|
_rRow.insert( Transition( '+', eNextState ) );
|
|
}
|
|
|
|
//..........................................................................
|
|
static void lcl_insertDigitTransitions( StateTransitions& _rRow, const State eNextState )
|
|
{
|
|
for ( sal_Unicode aChar = '0'; aChar <= '9'; ++aChar )
|
|
_rRow.insert( Transition( aChar, eNextState ) );
|
|
}
|
|
|
|
//..........................................................................
|
|
static void lcl_insertCommonPreCommaTransitions( StateTransitions& _rRow, const sal_Unicode _cThSep, const sal_Unicode _cDecSep )
|
|
{
|
|
// digits are allowed
|
|
lcl_insertDigitTransitions( _rRow, DIGIT_PRE_COMMA );
|
|
|
|
// the thousand separator is allowed
|
|
_rRow.insert( Transition( _cThSep, DIGIT_PRE_COMMA ) );
|
|
|
|
// a comma is allowed
|
|
_rRow.insert( Transition( _cDecSep, DIGIT_POST_COMMA ) );
|
|
}
|
|
|
|
//--------------------------------------------------------------------------
|
|
NumberValidator::NumberValidator( const sal_Unicode _cThSep, const sal_Unicode _cDecSep )
|
|
:m_cThSep( _cThSep )
|
|
,m_cDecSep( _cDecSep )
|
|
{
|
|
// build up our transition table
|
|
|
|
// how to procede from START
|
|
{
|
|
StateTransitions& rRow = m_aTransitions[ START ];
|
|
rRow.insert( Transition( '_', NUM_START ) );
|
|
// if we encounter the normalizing character, we want to procede with the number
|
|
}
|
|
|
|
// how to procede from NUM_START
|
|
{
|
|
StateTransitions& rRow = m_aTransitions[ NUM_START ];
|
|
|
|
// a sign is allowed
|
|
lcl_insertSignTransitions( rRow, DIGIT_PRE_COMMA );
|
|
|
|
// common transitions for the two pre-comma states
|
|
lcl_insertCommonPreCommaTransitions( rRow, m_cThSep, m_cDecSep );
|
|
|
|
// the exponent may start here
|
|
// (this would mean string like "_+e10_", but this is a valid fragment, though no valid number)
|
|
lcl_insertStartExponentTransition( rRow );
|
|
}
|
|
|
|
// how to procede from DIGIT_PRE_COMMA
|
|
{
|
|
StateTransitions& rRow = m_aTransitions[ DIGIT_PRE_COMMA ];
|
|
|
|
// common transitions for the two pre-comma states
|
|
lcl_insertCommonPreCommaTransitions( rRow, m_cThSep, m_cDecSep );
|
|
|
|
// the exponent may start here
|
|
lcl_insertStartExponentTransition( rRow );
|
|
|
|
// the final transition indicating the end of the string
|
|
// (if there is no comma and no post-comma, then the string may end here)
|
|
lcl_insertStopTransition( rRow );
|
|
}
|
|
|
|
// how to procede from DIGIT_POST_COMMA
|
|
{
|
|
StateTransitions& rRow = m_aTransitions[ DIGIT_POST_COMMA ];
|
|
|
|
// there might be digits, which would keep the state at DIGIT_POST_COMMA
|
|
lcl_insertDigitTransitions( rRow, DIGIT_POST_COMMA );
|
|
|
|
// the exponent may start here
|
|
lcl_insertStartExponentTransition( rRow );
|
|
|
|
// the string may end here
|
|
lcl_insertStopTransition( rRow );
|
|
}
|
|
|
|
// how to procede from EXPONENT_START
|
|
{
|
|
StateTransitions& rRow = m_aTransitions[ EXPONENT_START ];
|
|
|
|
// there may be a sign
|
|
lcl_insertSignTransitions( rRow, EXPONENT_DIGIT );
|
|
|
|
// there may be digits
|
|
lcl_insertDigitTransitions( rRow, EXPONENT_DIGIT );
|
|
|
|
// the string may end here
|
|
lcl_insertStopTransition( rRow );
|
|
}
|
|
|
|
// how to procede from EXPONENT_DIGIT
|
|
{
|
|
StateTransitions& rRow = m_aTransitions[ EXPONENT_DIGIT ];
|
|
|
|
// there may be digits
|
|
lcl_insertDigitTransitions( rRow, EXPONENT_DIGIT );
|
|
|
|
// the string may end here
|
|
lcl_insertStopTransition( rRow );
|
|
}
|
|
|
|
// how to procede from END
|
|
{
|
|
/*StateTransitions& rRow =*/ m_aTransitions[ EXPONENT_DIGIT ];
|
|
// no valid transition to leave this state
|
|
// (note that we, for consistency, nevertheless want to have a row in the table)
|
|
}
|
|
}
|
|
|
|
//--------------------------------------------------------------------------
|
|
sal_Bool NumberValidator::implValidateNormalized( const String& _rText )
|
|
{
|
|
const sal_Unicode* pCheckPos = _rText.GetBuffer();
|
|
State eCurrentState = START;
|
|
|
|
while ( END != eCurrentState )
|
|
{
|
|
// look up the transition row for the current state
|
|
TransitionTable::const_iterator aRow = m_aTransitions.find( eCurrentState );
|
|
DBG_ASSERT( m_aTransitions.end() != aRow,
|
|
"NumberValidator::implValidateNormalized: invalid transition table (row not found)!" );
|
|
|
|
if ( m_aTransitions.end() != aRow )
|
|
{
|
|
// look up the current character in this row
|
|
StateTransitions::const_iterator aTransition = aRow->second.find( *pCheckPos );
|
|
if ( aRow->second.end() != aTransition )
|
|
{
|
|
// there is a valid transition for this character
|
|
eCurrentState = aTransition->second;
|
|
++pCheckPos;
|
|
continue;
|
|
}
|
|
}
|
|
|
|
// if we're here, there is no valid transition
|
|
break;
|
|
}
|
|
|
|
DBG_ASSERT( ( END != eCurrentState ) || ( 0 == *pCheckPos ),
|
|
"NumberValidator::implValidateNormalized: inconsistency!" );
|
|
// if we're at END, then the string should be done, too - the string should be normalized, means ending
|
|
// a "_" and not containing any other "_" (except at the start), and "_" is the only possibility
|
|
// to reach the END state
|
|
|
|
// the string is valid if and only if we reached the final state
|
|
return ( END == eCurrentState );
|
|
}
|
|
|
|
//--------------------------------------------------------------------------
|
|
sal_Bool NumberValidator::isValidNumericFragment( const String& _rText )
|
|
{
|
|
if ( !_rText.Len() )
|
|
// empty strings are always allowed
|
|
return sal_True;
|
|
|
|
// normalize the string
|
|
String sNormalized( RTL_CONSTASCII_STRINGPARAM( "_") );
|
|
sNormalized.Append( _rText );
|
|
sNormalized.AppendAscii( "_" );
|
|
|
|
return implValidateNormalized( sNormalized );
|
|
}
|
|
}
|
|
|
|
#endif
|
|
|
|
//==============================================================================
|
|
SvNumberFormatter* FormattedField::StaticFormatter::s_cFormatter = NULL;
|
|
ULONG FormattedField::StaticFormatter::s_nReferences = 0;
|
|
|
|
//------------------------------------------------------------------------------
|
|
SvNumberFormatter* FormattedField::StaticFormatter::GetFormatter()
|
|
{
|
|
if (!s_cFormatter)
|
|
{
|
|
// get the Office's locale and translate
|
|
LanguageType eSysLanguage = MsLangId::convertLocaleToLanguage(
|
|
SvtSysLocale().GetLocaleData().getLocale() );
|
|
s_cFormatter = new SvNumberFormatter(
|
|
::comphelper::getProcessServiceFactory(),
|
|
eSysLanguage);
|
|
}
|
|
return s_cFormatter;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
FormattedField::StaticFormatter::StaticFormatter()
|
|
{
|
|
++s_nReferences;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
FormattedField::StaticFormatter::~StaticFormatter()
|
|
{
|
|
if (--s_nReferences == 0)
|
|
{
|
|
delete s_cFormatter;
|
|
s_cFormatter = NULL;
|
|
}
|
|
}
|
|
|
|
//==============================================================================
|
|
DBG_NAME(FormattedField);
|
|
|
|
#define INIT_MEMBERS() \
|
|
m_aLastSelection(0,0) \
|
|
,m_dMinValue(0) \
|
|
,m_dMaxValue(0) \
|
|
,m_bHasMin(FALSE) \
|
|
,m_bHasMax(FALSE) \
|
|
,m_bStrictFormat(TRUE) \
|
|
,m_bValueDirty(TRUE) \
|
|
,m_bEnableEmptyField(TRUE) \
|
|
,m_bAutoColor(FALSE) \
|
|
,m_bEnableNaN(FALSE) \
|
|
,m_dCurrentValue(0) \
|
|
,m_dDefaultValue(0) \
|
|
,m_nFormatKey(0) \
|
|
,m_pFormatter(NULL) \
|
|
,m_dSpinSize(1) \
|
|
,m_dSpinFirst(-1000000) \
|
|
,m_dSpinLast(1000000) \
|
|
,m_bTreatAsNumber(TRUE) \
|
|
,m_pLastOutputColor(NULL) \
|
|
,m_bUseInputStringForFormatting(false)
|
|
|
|
//------------------------------------------------------------------------------
|
|
FormattedField::FormattedField(Window* pParent, WinBits nStyle, SvNumberFormatter* pInitialFormatter, INT32 nFormatKey)
|
|
:SpinField(pParent, nStyle)
|
|
,INIT_MEMBERS()
|
|
{
|
|
DBG_CTOR(FormattedField, NULL);
|
|
|
|
if (pInitialFormatter)
|
|
{
|
|
m_pFormatter = pInitialFormatter;
|
|
m_nFormatKey = nFormatKey;
|
|
}
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
FormattedField::FormattedField(Window* pParent, const ResId& rResId, SvNumberFormatter* pInitialFormatter, INT32 nFormatKey)
|
|
:SpinField(pParent, rResId)
|
|
,INIT_MEMBERS()
|
|
{
|
|
DBG_CTOR(FormattedField, NULL);
|
|
|
|
if (pInitialFormatter)
|
|
{
|
|
m_pFormatter = pInitialFormatter;
|
|
m_nFormatKey = nFormatKey;
|
|
}
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
FormattedField::~FormattedField()
|
|
{
|
|
DBG_DTOR(FormattedField, NULL);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetValidateText(const XubString& rText, const String* pErrorText)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
|
|
if (CheckText(rText))
|
|
SetText(rText);
|
|
else
|
|
if (pErrorText)
|
|
ImplSetTextImpl(*pErrorText, NULL);
|
|
else
|
|
ImplSetValue(m_dDefaultValue, TRUE);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetText(const XubString& rStr)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
|
|
SpinField::SetText(rStr);
|
|
m_bValueDirty = TRUE;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetText( const XubString& rStr, const Selection& rNewSelection )
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
|
|
SpinField::SetText( rStr, rNewSelection );
|
|
m_bValueDirty = TRUE;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetTextFormatted(const XubString& rStr)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
|
|
#if defined DBG_UTIL
|
|
if (ImplGetFormatter()->IsTextFormat(m_nFormatKey))
|
|
DBG_WARNING("FormattedField::SetTextFormatted : valid only with text formats !");
|
|
#endif
|
|
|
|
m_sCurrentTextValue = rStr;
|
|
|
|
String sFormatted;
|
|
double dNumber = 0.0;
|
|
// IsNumberFormat changes the format key parameter
|
|
sal_uInt32 nTempFormatKey = static_cast< sal_uInt32 >( m_nFormatKey );
|
|
if( IsUsingInputStringForFormatting() &&
|
|
ImplGetFormatter()->IsNumberFormat(m_sCurrentTextValue, nTempFormatKey, dNumber) )
|
|
ImplGetFormatter()->GetInputLineString(dNumber, m_nFormatKey, sFormatted);
|
|
else
|
|
ImplGetFormatter()->GetOutputString(m_sCurrentTextValue, m_nFormatKey, sFormatted, &m_pLastOutputColor);
|
|
|
|
// calculate the new selection
|
|
Selection aSel(GetSelection());
|
|
Selection aNewSel(aSel);
|
|
aNewSel.Justify();
|
|
USHORT nNewLen = sFormatted.Len();
|
|
USHORT nCurrentLen = GetText().Len();
|
|
if ((nNewLen > nCurrentLen) && (aNewSel.Max() == nCurrentLen))
|
|
{ // the new text is longer and the cursor was behind the last char (of the old text)
|
|
if (aNewSel.Min() == 0)
|
|
{ // the whole text was selected -> select the new text on the whole, too
|
|
aNewSel.Max() = nNewLen;
|
|
if (!nCurrentLen)
|
|
{ // there wasn't really a previous selection (as there was no previous text), we're setting a new one -> check the selection options
|
|
ULONG nSelOptions = GetSettings().GetStyleSettings().GetSelectionOptions();
|
|
if (nSelOptions & SELECTION_OPTION_SHOWFIRST)
|
|
{ // selection should be from right to left -> swap min and max
|
|
aNewSel.Min() = aNewSel.Max();
|
|
aNewSel.Max() = 0;
|
|
}
|
|
}
|
|
}
|
|
else if (aNewSel.Max() == aNewSel.Min())
|
|
{ // there was no selection -> set the cursor behind the new last char
|
|
aNewSel.Max() = nNewLen;
|
|
aNewSel.Min() = nNewLen;
|
|
}
|
|
}
|
|
else if (aNewSel.Max() > nNewLen)
|
|
aNewSel.Max() = nNewLen;
|
|
else
|
|
aNewSel = aSel; // don't use the justified version
|
|
SpinField::SetText(sFormatted, aNewSel);
|
|
m_bValueDirty = FALSE;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
String FormattedField::GetTextValue() const
|
|
{
|
|
if (m_bValueDirty)
|
|
{
|
|
((FormattedField*)this)->m_sCurrentTextValue = GetText();
|
|
((FormattedField*)this)->m_bValueDirty = FALSE;
|
|
}
|
|
return m_sCurrentTextValue;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::EnableNotANumber( BOOL _bEnable )
|
|
{
|
|
if ( m_bEnableNaN == _bEnable )
|
|
return;
|
|
|
|
m_bEnableNaN = _bEnable;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetAutoColor(BOOL _bAutomatic)
|
|
{
|
|
if (_bAutomatic == m_bAutoColor)
|
|
return;
|
|
|
|
m_bAutoColor = _bAutomatic;
|
|
if (m_bAutoColor)
|
|
{ // if auto color is switched on, adjust the current text color, too
|
|
if (m_pLastOutputColor)
|
|
SetControlForeground(*m_pLastOutputColor);
|
|
else
|
|
SetControlForeground();
|
|
}
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::Modify()
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
|
|
if (!IsStrictFormat())
|
|
{
|
|
m_bValueDirty = TRUE;
|
|
SpinField::Modify();
|
|
return;
|
|
}
|
|
|
|
String sCheck = GetText();
|
|
if (CheckText(sCheck))
|
|
{
|
|
m_sLastValidText = sCheck;
|
|
m_aLastSelection = GetSelection();
|
|
m_bValueDirty = TRUE;
|
|
}
|
|
else
|
|
{
|
|
ImplSetTextImpl(m_sLastValidText, &m_aLastSelection);
|
|
}
|
|
|
|
SpinField::Modify();
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::ImplSetTextImpl(const XubString& rNew, Selection* pNewSel)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
|
|
if (m_bAutoColor)
|
|
{
|
|
if (m_pLastOutputColor)
|
|
SetControlForeground(*m_pLastOutputColor);
|
|
else
|
|
SetControlForeground();
|
|
}
|
|
|
|
if (pNewSel)
|
|
SpinField::SetText(rNew, *pNewSel);
|
|
else
|
|
{
|
|
Selection aSel(GetSelection());
|
|
aSel.Justify();
|
|
|
|
USHORT nNewLen = rNew.Len();
|
|
USHORT nCurrentLen = GetText().Len();
|
|
|
|
if ((nNewLen > nCurrentLen) && (aSel.Max() == nCurrentLen))
|
|
{ // new new text is longer and the cursor is behind the last char
|
|
if (aSel.Min() == 0)
|
|
{ // the whole text was selected -> select the new text on the whole, too
|
|
aSel.Max() = nNewLen;
|
|
if (!nCurrentLen)
|
|
{ // there wasn't really a previous selection (as there was no previous text), we're setting a new one -> check the selection options
|
|
ULONG nSelOptions = GetSettings().GetStyleSettings().GetSelectionOptions();
|
|
if (nSelOptions & SELECTION_OPTION_SHOWFIRST)
|
|
{ // selection should be from right to left -> swap min and max
|
|
aSel.Min() = aSel.Max();
|
|
aSel.Max() = 0;
|
|
}
|
|
}
|
|
}
|
|
else if (aSel.Max() == aSel.Min())
|
|
{ // there was no selection -> set the cursor behind the new last char
|
|
aSel.Max() = nNewLen;
|
|
aSel.Min() = nNewLen;
|
|
}
|
|
}
|
|
else if (aSel.Max() > nNewLen)
|
|
aSel.Max() = nNewLen;
|
|
SpinField::SetText(rNew, aSel);
|
|
}
|
|
|
|
m_bValueDirty = TRUE;
|
|
// muss nicht stimmen, aber sicherheitshalber ...
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
long FormattedField::PreNotify(NotifyEvent& rNEvt)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
if (rNEvt.GetType() == EVENT_KEYINPUT)
|
|
m_aLastSelection = GetSelection();
|
|
return SpinField::PreNotify(rNEvt);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::ImplSetFormatKey(ULONG nFormatKey)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
|
|
m_nFormatKey = nFormatKey;
|
|
BOOL bNeedFormatter = (m_pFormatter == NULL) && (nFormatKey != 0);
|
|
if (bNeedFormatter)
|
|
{
|
|
ImplGetFormatter(); // damit wird ein Standard-Formatter angelegt
|
|
|
|
m_nFormatKey = nFormatKey;
|
|
// kann sein, dass das in dem Standard-Formatter keinen Sinn macht, aber der nimmt dann ein Default-Format an.
|
|
// Auf diese Weise kann ich einfach einen der - formatteruebergreifended gleichen - Standard-Keys setzen.
|
|
DBG_ASSERT(m_pFormatter->GetEntry(nFormatKey) != NULL, "FormattedField::ImplSetFormatKey : invalid format key !");
|
|
// Wenn SetFormatKey aufgerufen wird, ohne dass ein Formatter existiert, muss der Key einer der Standard-Werte
|
|
// sein, der in allen Formattern (also auch in meinem neu angelegten) vorhanden ist.
|
|
}
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetFormatKey(ULONG nFormatKey)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
BOOL bNoFormatter = (m_pFormatter == NULL);
|
|
ImplSetFormatKey(nFormatKey);
|
|
FormatChanged((bNoFormatter && (m_pFormatter != NULL)) ? FCT_FORMATTER : FCT_KEYONLY);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetFormatter(SvNumberFormatter* pFormatter, BOOL bResetFormat)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
|
|
if (bResetFormat)
|
|
{
|
|
m_pFormatter = pFormatter;
|
|
|
|
// calc the default format key from the Office's UI locale
|
|
if ( m_pFormatter )
|
|
{
|
|
// get the Office's locale and translate
|
|
LanguageType eSysLanguage = MsLangId::convertLocaleToLanguage(
|
|
SvtSysLocale().GetLocaleData().getLocale() );
|
|
// get the standard numeric format for this language
|
|
m_nFormatKey = m_pFormatter->GetStandardFormat( NUMBERFORMAT_NUMBER, eSysLanguage );
|
|
}
|
|
else
|
|
m_nFormatKey = 0;
|
|
}
|
|
else
|
|
{
|
|
XubString sOldFormat;
|
|
LanguageType aOldLang;
|
|
GetFormat(sOldFormat, aOldLang);
|
|
|
|
sal_uInt32 nDestKey = pFormatter->TestNewString(sOldFormat);
|
|
if (nDestKey == NUMBERFORMAT_ENTRY_NOT_FOUND)
|
|
{
|
|
// die Sprache des neuen Formatters
|
|
const SvNumberformat* pDefaultEntry = pFormatter->GetEntry(0);
|
|
LanguageType aNewLang = pDefaultEntry ? pDefaultEntry->GetLanguage() : LANGUAGE_DONTKNOW;
|
|
|
|
// den alten Format-String in die neue Sprache konvertieren
|
|
USHORT nCheckPos;
|
|
short nType;
|
|
pFormatter->PutandConvertEntry(sOldFormat, nCheckPos, nType, nDestKey, aOldLang, aNewLang);
|
|
m_nFormatKey = nDestKey;
|
|
}
|
|
m_pFormatter = pFormatter;
|
|
}
|
|
|
|
FormatChanged(FCT_FORMATTER);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::GetFormat(XubString& rFormatString, LanguageType& eLang) const
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
const SvNumberformat* pFormatEntry = ImplGetFormatter()->GetEntry(m_nFormatKey);
|
|
DBG_ASSERT(pFormatEntry != NULL, "FormattedField::GetFormat: no number format for the given format key.");
|
|
rFormatString = pFormatEntry ? pFormatEntry->GetFormatstring() : XubString();
|
|
eLang = pFormatEntry ? pFormatEntry->GetLanguage() : LANGUAGE_DONTKNOW;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
BOOL FormattedField::SetFormat(const XubString& rFormatString, LanguageType eLang)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
sal_uInt32 nNewKey = ImplGetFormatter()->TestNewString(rFormatString, eLang);
|
|
if (nNewKey == NUMBERFORMAT_ENTRY_NOT_FOUND)
|
|
{
|
|
USHORT nCheckPos;
|
|
short nType;
|
|
XubString rFormat(rFormatString);
|
|
if (!ImplGetFormatter()->PutEntry(rFormat, nCheckPos, nType, nNewKey, eLang))
|
|
return FALSE;
|
|
DBG_ASSERT(nNewKey != NUMBERFORMAT_ENTRY_NOT_FOUND, "FormattedField::SetFormatString : PutEntry returned an invalid key !");
|
|
}
|
|
|
|
if (nNewKey != m_nFormatKey)
|
|
SetFormatKey(nNewKey);
|
|
return TRUE;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
BOOL FormattedField::GetThousandsSep() const
|
|
{
|
|
DBG_ASSERT(!ImplGetFormatter()->IsTextFormat(m_nFormatKey),
|
|
"FormattedField::GetThousandsSep : your'e sure what your'e doing when setting the precision of a text format ?");
|
|
|
|
BOOL bThousand, IsRed;
|
|
USHORT nPrecision, nAnzLeading;
|
|
ImplGetFormatter()->GetFormatSpecialInfo(m_nFormatKey, bThousand, IsRed, nPrecision, nAnzLeading);
|
|
|
|
return bThousand;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetThousandsSep(BOOL _bUseSeparator)
|
|
{
|
|
DBG_ASSERT(!ImplGetFormatter()->IsTextFormat(m_nFormatKey),
|
|
"FormattedField::SetThousandsSep : your'e sure what your'e doing when setting the precision of a text format ?");
|
|
|
|
// get the current settings
|
|
BOOL bThousand, IsRed;
|
|
USHORT nPrecision, nAnzLeading;
|
|
ImplGetFormatter()->GetFormatSpecialInfo(m_nFormatKey, bThousand, IsRed, nPrecision, nAnzLeading);
|
|
if (bThousand == _bUseSeparator)
|
|
return;
|
|
|
|
// we need the language for the following
|
|
LanguageType eLang;
|
|
String sFmtDescription;
|
|
GetFormat(sFmtDescription, eLang);
|
|
|
|
// generate a new format ...
|
|
ImplGetFormatter()->GenerateFormat(sFmtDescription, m_nFormatKey, eLang, _bUseSeparator, IsRed, nPrecision, nAnzLeading);
|
|
// ... and introduce it to the formatter
|
|
USHORT nCheckPos;
|
|
sal_uInt32 nNewKey;
|
|
short nType;
|
|
ImplGetFormatter()->PutEntry(sFmtDescription, nCheckPos, nType, nNewKey, eLang);
|
|
|
|
// set the new key
|
|
ImplSetFormatKey(nNewKey);
|
|
FormatChanged(FCT_THOUSANDSSEP);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
USHORT FormattedField::GetDecimalDigits() const
|
|
{
|
|
DBG_ASSERT(!ImplGetFormatter()->IsTextFormat(m_nFormatKey),
|
|
"FormattedField::GetDecimalDigits : your'e sure what your'e doing when setting the precision of a text format ?");
|
|
|
|
BOOL bThousand, IsRed;
|
|
USHORT nPrecision, nAnzLeading;
|
|
ImplGetFormatter()->GetFormatSpecialInfo(m_nFormatKey, bThousand, IsRed, nPrecision, nAnzLeading);
|
|
|
|
return nPrecision;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetDecimalDigits(USHORT _nPrecision)
|
|
{
|
|
DBG_ASSERT(!ImplGetFormatter()->IsTextFormat(m_nFormatKey),
|
|
"FormattedField::SetDecimalDigits : your'e sure what your'e doing when setting the precision of a text format ?");
|
|
|
|
// get the current settings
|
|
BOOL bThousand, IsRed;
|
|
USHORT nPrecision, nAnzLeading;
|
|
ImplGetFormatter()->GetFormatSpecialInfo(m_nFormatKey, bThousand, IsRed, nPrecision, nAnzLeading);
|
|
if (nPrecision == _nPrecision)
|
|
return;
|
|
|
|
// we need the language for the following
|
|
LanguageType eLang;
|
|
String sFmtDescription;
|
|
GetFormat(sFmtDescription, eLang);
|
|
|
|
// generate a new format ...
|
|
ImplGetFormatter()->GenerateFormat(sFmtDescription, m_nFormatKey, eLang, bThousand, IsRed, _nPrecision, nAnzLeading);
|
|
// ... and introduce it to the formatter
|
|
USHORT nCheckPos;
|
|
sal_uInt32 nNewKey;
|
|
short nType;
|
|
ImplGetFormatter()->PutEntry(sFmtDescription, nCheckPos, nType, nNewKey, eLang);
|
|
|
|
// set the new key
|
|
ImplSetFormatKey(nNewKey);
|
|
FormatChanged(FCT_PRECISION);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::FormatChanged( FORMAT_CHANGE_TYPE _nWhat )
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
m_pLastOutputColor = NULL;
|
|
|
|
if ( ( 0 != ( _nWhat & FCT_FORMATTER ) ) && m_pFormatter )
|
|
m_pFormatter->SetEvalDateFormat( NF_EVALDATEFORMAT_INTL_FORMAT );
|
|
// 95845 - 03.04.2002 - fs@openoffice.org
|
|
|
|
ReFormat();
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::Commit()
|
|
{
|
|
// remember the old text
|
|
String sOld( GetText() );
|
|
|
|
// do the reformat
|
|
ReFormat();
|
|
|
|
// did the text change?
|
|
if ( GetText() != sOld )
|
|
{ // consider the field as modified
|
|
Modify();
|
|
// but we have the most recent value now
|
|
m_bValueDirty = FALSE;
|
|
}
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::ReFormat()
|
|
{
|
|
if (!IsEmptyFieldEnabled() || GetText().Len())
|
|
{
|
|
if (TreatingAsNumber())
|
|
{
|
|
double dValue = GetValue();
|
|
if ( m_bEnableNaN && ::rtl::math::isNan( dValue ) )
|
|
return;
|
|
ImplSetValue( dValue, TRUE );
|
|
}
|
|
else
|
|
SetTextFormatted(GetTextValue());
|
|
}
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
long FormattedField::Notify(NotifyEvent& rNEvt)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
|
|
if ((rNEvt.GetType() == EVENT_KEYINPUT) && !IsReadOnly())
|
|
{
|
|
const KeyEvent& rKEvt = *rNEvt.GetKeyEvent();
|
|
USHORT nMod = rKEvt.GetKeyCode().GetModifier();
|
|
switch ( rKEvt.GetKeyCode().GetCode() )
|
|
{
|
|
case KEY_UP:
|
|
case KEY_DOWN:
|
|
case KEY_PAGEUP:
|
|
case KEY_PAGEDOWN:
|
|
if (!nMod && ImplGetFormatter()->IsTextFormat(m_nFormatKey))
|
|
{
|
|
// the base class would translate this into calls to Up/Down/First/Last,
|
|
// but we don't want this if we are text-formatted
|
|
return 1;
|
|
}
|
|
}
|
|
}
|
|
|
|
if ((rNEvt.GetType() == EVENT_COMMAND) && !IsReadOnly())
|
|
{
|
|
const CommandEvent* pCommand = rNEvt.GetCommandEvent();
|
|
if (pCommand->GetCommand() == COMMAND_WHEEL)
|
|
{
|
|
const CommandWheelData* pData = rNEvt.GetCommandEvent()->GetWheelData();
|
|
if ((pData->GetMode() == COMMAND_WHEEL_SCROLL) && ImplGetFormatter()->IsTextFormat(m_nFormatKey))
|
|
{
|
|
// same as above : prevent the base class from doing Up/Down-calls
|
|
// (normally I should put this test into the Up/Down methods itself, shouldn't I ?)
|
|
// FS - 71553 - 19.01.00
|
|
return 1;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (rNEvt.GetType() == EVENT_LOSEFOCUS)
|
|
{
|
|
// Sonderbehandlung fuer leere Texte
|
|
if (GetText().Len() == 0)
|
|
{
|
|
if (!IsEmptyFieldEnabled())
|
|
{
|
|
if (TreatingAsNumber())
|
|
{
|
|
ImplSetValue(m_dCurrentValue, TRUE);
|
|
Modify();
|
|
}
|
|
else
|
|
{
|
|
String sNew = GetTextValue();
|
|
if (sNew.Len())
|
|
SetTextFormatted(sNew);
|
|
else
|
|
SetTextFormatted(m_sDefaultText);
|
|
}
|
|
m_bValueDirty = FALSE;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
Commit();
|
|
}
|
|
}
|
|
|
|
return SpinField::Notify( rNEvt );
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetMinValue(double dMin)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
DBG_ASSERT(m_bTreatAsNumber, "FormattedField::SetMinValue : only to be used in numeric mode !");
|
|
|
|
m_dMinValue = dMin;
|
|
m_bHasMin = TRUE;
|
|
// fuer die Ueberpruefung des aktuellen Wertes an der neuen Grenze -> ImplSetValue
|
|
ReFormat();
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetMaxValue(double dMax)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
DBG_ASSERT(m_bTreatAsNumber, "FormattedField::SetMaxValue : only to be used in numeric mode !");
|
|
|
|
m_dMaxValue = dMax;
|
|
m_bHasMax = TRUE;
|
|
// fuer die Ueberpruefung des aktuellen Wertes an der neuen Grenze -> ImplSetValue
|
|
ReFormat();
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetTextValue(const XubString& rText)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
SetText(rText);
|
|
ReFormat();
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::EnableEmptyField(BOOL bEnable)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
if (bEnable == m_bEnableEmptyField)
|
|
return;
|
|
|
|
m_bEnableEmptyField = bEnable;
|
|
if (!m_bEnableEmptyField && GetText().Len()==0)
|
|
ImplSetValue(m_dCurrentValue, TRUE);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::ImplSetValue(double dVal, BOOL bForce)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
|
|
if (m_bHasMin && (dVal<m_dMinValue))
|
|
dVal = m_dMinValue;
|
|
if (m_bHasMax && (dVal>m_dMaxValue))
|
|
dVal = m_dMaxValue;
|
|
if (!bForce && (dVal == GetValue()))
|
|
return;
|
|
|
|
DBG_ASSERT(ImplGetFormatter() != NULL, "FormattedField::ImplSetValue : can't set a value without a formatter !");
|
|
|
|
m_bValueDirty = FALSE;
|
|
m_dCurrentValue = dVal;
|
|
|
|
String sNewText;
|
|
if (ImplGetFormatter()->IsTextFormat(m_nFormatKey))
|
|
{
|
|
// zuerst die Zahl als String im Standard-Format
|
|
String sTemp;
|
|
ImplGetFormatter()->GetOutputString(dVal, 0, sTemp, &m_pLastOutputColor);
|
|
// dann den String entsprechend dem Text-Format
|
|
ImplGetFormatter()->GetOutputString(sTemp, m_nFormatKey, sNewText, &m_pLastOutputColor);
|
|
}
|
|
else
|
|
{
|
|
if( IsUsingInputStringForFormatting())
|
|
ImplGetFormatter()->GetInputLineString(dVal, m_nFormatKey, sNewText);
|
|
else
|
|
ImplGetFormatter()->GetOutputString(dVal, m_nFormatKey, sNewText, &m_pLastOutputColor);
|
|
}
|
|
|
|
ImplSetTextImpl(sNewText, NULL);
|
|
m_bValueDirty = FALSE;
|
|
DBG_ASSERT(CheckText(sNewText), "FormattedField::ImplSetValue : formatted string doesn't match the criteria !");
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
BOOL FormattedField::ImplGetValue(double& dNewVal)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
|
|
dNewVal = m_dCurrentValue;
|
|
if (!m_bValueDirty)
|
|
return TRUE;
|
|
|
|
dNewVal = m_dDefaultValue;
|
|
String sText(GetText());
|
|
if (!sText.Len())
|
|
return TRUE;
|
|
|
|
DBG_ASSERT(ImplGetFormatter() != NULL, "FormattedField::ImplGetValue : can't give you a current value without a formatter !");
|
|
|
|
sal_uInt32 nFormatKey = m_nFormatKey; // IsNumberFormat veraendert den FormatKey ...
|
|
|
|
if (ImplGetFormatter()->IsTextFormat(nFormatKey) && m_bTreatAsNumber)
|
|
// damit wir in einem als Text formatierten Feld trotzdem eine Eingabe wie '1,1' erkennen ...
|
|
nFormatKey = 0;
|
|
|
|
// Sonderbehandlung fuer %-Formatierung
|
|
if (ImplGetFormatter()->GetType(m_nFormatKey) == NUMBERFORMAT_PERCENT)
|
|
{
|
|
// the language of our format
|
|
LanguageType eLanguage = m_pFormatter->GetEntry(m_nFormatKey)->GetLanguage();
|
|
// the default number format for this language
|
|
ULONG nStandardNumericFormat = m_pFormatter->GetStandardFormat(NUMBERFORMAT_NUMBER, eLanguage);
|
|
|
|
sal_uInt32 nTempFormat = nStandardNumericFormat;
|
|
double dTemp;
|
|
if (m_pFormatter->IsNumberFormat(sText, nTempFormat, dTemp) &&
|
|
NUMBERFORMAT_NUMBER == m_pFormatter->GetType(nTempFormat))
|
|
// der String entspricht einer Number-Formatierung, hat also nur kein %
|
|
// -> append it
|
|
sText += '%';
|
|
// (with this, a input of '3' becomes '3%', which then by the formatter is translated
|
|
// into 0.03. Without this, the formatter would give us the double 3 for an input '3',
|
|
// which equals 300 percent.
|
|
}
|
|
if (!ImplGetFormatter()->IsNumberFormat(sText, nFormatKey, dNewVal))
|
|
return FALSE;
|
|
|
|
|
|
if (m_bHasMin && (dNewVal<m_dMinValue))
|
|
dNewVal = m_dMinValue;
|
|
if (m_bHasMax && (dNewVal>m_dMaxValue))
|
|
dNewVal = m_dMaxValue;
|
|
return TRUE;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::SetValue(double dVal)
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
ImplSetValue(dVal, m_bValueDirty);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
double FormattedField::GetValue()
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
|
|
if ( !ImplGetValue( m_dCurrentValue ) )
|
|
{
|
|
if ( m_bEnableNaN )
|
|
::rtl::math::setNan( &m_dCurrentValue );
|
|
else
|
|
m_dCurrentValue = m_dDefaultValue;
|
|
}
|
|
|
|
m_bValueDirty = FALSE;
|
|
return m_dCurrentValue;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::Up()
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
SetValue(GetValue() + m_dSpinSize);
|
|
// das setValue handelt Bereichsueberschreitungen (min/max) automatisch
|
|
SetModifyFlag();
|
|
Modify();
|
|
|
|
SpinField::Up();
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::Down()
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
SetValue(GetValue() - m_dSpinSize);
|
|
SetModifyFlag();
|
|
Modify();
|
|
|
|
SpinField::Down();
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::First()
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
if (m_bHasMin)
|
|
{
|
|
SetValue(m_dMinValue);
|
|
SetModifyFlag();
|
|
Modify();
|
|
}
|
|
|
|
SpinField::First();
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::Last()
|
|
{
|
|
DBG_CHKTHIS(FormattedField, NULL);
|
|
if (m_bHasMax)
|
|
{
|
|
SetValue(m_dMaxValue);
|
|
SetModifyFlag();
|
|
Modify();
|
|
}
|
|
|
|
SpinField::Last();
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void FormattedField::UseInputStringForFormatting( bool bUseInputStr /* = true */ )
|
|
{
|
|
m_bUseInputStringForFormatting = bUseInputStr;
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
bool FormattedField::IsUsingInputStringForFormatting() const
|
|
{
|
|
return m_bUseInputStringForFormatting;
|
|
}
|
|
|
|
|
|
//==============================================================================
|
|
//------------------------------------------------------------------------------
|
|
DoubleNumericField::~DoubleNumericField()
|
|
{
|
|
#ifdef REGEXP_SUPPORT
|
|
delete m_pConformanceTester;
|
|
#else
|
|
delete m_pNumberValidator;
|
|
#endif
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void DoubleNumericField::FormatChanged(FORMAT_CHANGE_TYPE nWhat)
|
|
{
|
|
ResetConformanceTester();
|
|
FormattedField::FormatChanged(nWhat);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
BOOL DoubleNumericField::CheckText(const XubString& sText) const
|
|
{
|
|
// We'd like to implement this using the NumberFormatter::IsNumberFormat, but unfortunately, this doesn't
|
|
// recognize fragments of numbers (like, for instance "1e", which happens during entering e.g. "1e10")
|
|
// Thus, the roundabout way via a regular expression
|
|
|
|
#ifdef REGEXP_SUPPORT
|
|
if (!sText.Len())
|
|
return TRUE;
|
|
|
|
String sForceComplete = '_';
|
|
sForceComplete += sText;
|
|
sForceComplete += '_';
|
|
|
|
USHORT nStart = 0, nEnd = sForceComplete.Len();
|
|
BOOL bFound = m_pConformanceTester->SearchFrwrd(sForceComplete, &nStart, &nEnd);
|
|
|
|
if (bFound && (nStart == 0) && (nEnd == sForceComplete.Len()))
|
|
return TRUE;
|
|
|
|
return FALSE;
|
|
#else
|
|
return m_pNumberValidator->isValidNumericFragment( sText );
|
|
#endif
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void DoubleNumericField::ResetConformanceTester()
|
|
{
|
|
// the thousands and the decimal separator are language dependent
|
|
const SvNumberformat* pFormatEntry = ImplGetFormatter()->GetEntry(m_nFormatKey);
|
|
|
|
sal_Unicode cSeparatorThousand = ',';
|
|
sal_Unicode cSeparatorDecimal = '.';
|
|
if (pFormatEntry)
|
|
{
|
|
Locale aLocale;
|
|
MsLangId::convertLanguageToLocale( pFormatEntry->GetLanguage(), aLocale );
|
|
LocaleDataWrapper aLocaleInfo(::comphelper::getProcessServiceFactory(), aLocale);
|
|
|
|
String sSeparator = aLocaleInfo.getNumThousandSep();
|
|
if (sSeparator.Len())
|
|
cSeparatorThousand = sSeparator.GetBuffer()[0];
|
|
|
|
sSeparator = aLocaleInfo.getNumDecimalSep();
|
|
if (sSeparator.Len())
|
|
cSeparatorDecimal = sSeparator.GetBuffer()[0];
|
|
}
|
|
|
|
#ifdef REGEXP_SUPPORT
|
|
String sDescription = String::CreateFromAscii(szNumericInput);
|
|
|
|
String sReplaceWith((sal_Unicode)'\\');
|
|
sReplaceWith += cSeparatorThousand;
|
|
sDescription.SearchAndReplaceAscii("\\,", sReplaceWith);
|
|
|
|
sReplaceWith = (sal_Unicode)'\\';
|
|
sReplaceWith += cSeparatorDecimal;
|
|
sDescription.SearchAndReplaceAscii("\\.", sReplaceWith);
|
|
|
|
delete m_pConformanceTester;
|
|
|
|
SearchOptions aParam;
|
|
aParam.algorithmType = SearchAlgorithms_REGEXP;
|
|
aParam.searchFlag = SearchFlags::ALL_IGNORE_CASE;
|
|
aParam.searchString = sDescription;
|
|
aParam.transliterateFlags = 0;
|
|
|
|
String sLanguage, sCountry;
|
|
ConvertLanguageToIsoNames( pFormatEntry ? pFormatEntry->GetLanguage() : LANGUAGE_ENGLISH_US, sLanguage, sCountry );
|
|
aParam.Locale.Language = sLanguage;
|
|
aParam.Locale.Country = sCountry;
|
|
|
|
m_pConformanceTester = new ::utl::TextSearch(aParam);
|
|
#else
|
|
delete m_pNumberValidator;
|
|
m_pNumberValidator = new validation::NumberValidator( cSeparatorThousand, cSeparatorDecimal );
|
|
#endif
|
|
}
|
|
|
|
|
|
//==============================================================================
|
|
|
|
//------------------------------------------------------------------------------
|
|
DoubleCurrencyField::DoubleCurrencyField(Window* pParent, WinBits nStyle)
|
|
:FormattedField(pParent, nStyle)
|
|
,m_bChangingFormat(FALSE)
|
|
{
|
|
m_bPrependCurrSym = FALSE;
|
|
|
|
// initialize with a system currency format
|
|
m_sCurrencySymbol = SvtSysLocale().GetLocaleData().getCurrSymbol();
|
|
UpdateCurrencyFormat();
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
DoubleCurrencyField::DoubleCurrencyField(Window* pParent, const ResId& rResId)
|
|
:FormattedField(pParent, rResId)
|
|
,m_bChangingFormat(FALSE)
|
|
{
|
|
m_bPrependCurrSym = FALSE;
|
|
|
|
// initialize with a system currency format
|
|
m_sCurrencySymbol = SvtSysLocale().GetLocaleData().getCurrSymbol();
|
|
UpdateCurrencyFormat();
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void DoubleCurrencyField::FormatChanged(FORMAT_CHANGE_TYPE nWhat)
|
|
{
|
|
if (m_bChangingFormat)
|
|
{
|
|
FormattedField::FormatChanged(nWhat);
|
|
return;
|
|
}
|
|
|
|
switch (nWhat)
|
|
{
|
|
case FCT_FORMATTER:
|
|
case FCT_PRECISION:
|
|
case FCT_THOUSANDSSEP:
|
|
// the aspects which changed don't take our currency settings into account (in fact, they most probably
|
|
// destroyed them)
|
|
UpdateCurrencyFormat();
|
|
break;
|
|
case FCT_KEYONLY:
|
|
DBG_ERROR("DoubleCurrencyField::FormatChanged : somebody modified my key !");
|
|
// We always build our own format from the settings we get via special methods (setCurrencySymbol etc.).
|
|
// Nobody but ourself should modifiy the format key directly !
|
|
break;
|
|
}
|
|
|
|
FormattedField::FormatChanged(nWhat);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void DoubleCurrencyField::setCurrencySymbol(const String& _sSymbol)
|
|
{
|
|
if (m_sCurrencySymbol == _sSymbol)
|
|
return;
|
|
|
|
m_sCurrencySymbol = _sSymbol;
|
|
UpdateCurrencyFormat();
|
|
FormatChanged(FCT_CURRENCY_SYMBOL);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void DoubleCurrencyField::setPrependCurrSym(BOOL _bPrepend)
|
|
{
|
|
if (m_bPrependCurrSym == _bPrepend)
|
|
return;
|
|
|
|
m_bPrependCurrSym = _bPrepend;
|
|
UpdateCurrencyFormat();
|
|
FormatChanged(FCT_CURRSYM_POSITION);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
void DoubleCurrencyField::UpdateCurrencyFormat()
|
|
{
|
|
// the old settings
|
|
XubString sOldFormat;
|
|
LanguageType eLanguage;
|
|
GetFormat(sOldFormat, eLanguage);
|
|
BOOL bThSep = GetThousandsSep();
|
|
USHORT nDigits = GetDecimalDigits();
|
|
|
|
// build a new format string with the base class' and my own settings
|
|
Locale aLocale;
|
|
MsLangId::convertLanguageToLocale( eLanguage, aLocale );
|
|
LocaleDataWrapper aLocaleInfo(::comphelper::getProcessServiceFactory(), aLocale);
|
|
|
|
XubString sNewFormat;
|
|
if (bThSep)
|
|
{
|
|
sNewFormat = '#';
|
|
sNewFormat += aLocaleInfo.getNumThousandSep();
|
|
sNewFormat.AppendAscii("##0");
|
|
}
|
|
else
|
|
sNewFormat = '0';
|
|
|
|
if (nDigits)
|
|
{
|
|
sNewFormat += aLocaleInfo.getNumDecimalSep();
|
|
|
|
XubString sTemp;
|
|
sTemp.Fill(nDigits, '0');
|
|
sNewFormat += sTemp;
|
|
}
|
|
|
|
if (getPrependCurrSym())
|
|
{
|
|
XubString sSymbol = getCurrencySymbol();
|
|
sSymbol.EraseLeadingChars(' ');
|
|
sSymbol.EraseTrailingChars(' ');
|
|
|
|
XubString sTemp = String::CreateFromAscii("[$");
|
|
sTemp += sSymbol;
|
|
sTemp.AppendAscii("] ");
|
|
sTemp += sNewFormat;
|
|
|
|
// for negative values : $ -0.00, not -$ 0.00 ...
|
|
// (the real solution would be a possibility to choose a "positive currency format" and a "negative currency format" ...
|
|
// But not now ... (and hey, you could take a formatted field for this ....))
|
|
// FS - 31.03.00 74642
|
|
sTemp.AppendAscii(";[$");
|
|
sTemp += sSymbol;
|
|
sTemp.AppendAscii("] -");
|
|
sTemp += sNewFormat;
|
|
|
|
sNewFormat = sTemp;
|
|
}
|
|
else
|
|
{
|
|
XubString sTemp = getCurrencySymbol();
|
|
sTemp.EraseLeadingChars(' ');
|
|
sTemp.EraseTrailingChars(' ');
|
|
|
|
sNewFormat += String::CreateFromAscii(" [$");
|
|
sNewFormat += sTemp;
|
|
sNewFormat += ']';
|
|
}
|
|
|
|
// set this new basic format
|
|
m_bChangingFormat = TRUE;
|
|
SetFormat(sNewFormat, eLanguage);
|
|
m_bChangingFormat = FALSE;
|
|
}
|
|
|