1 /************************************************************************* 2 * 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4 * 5 * Copyright 2000, 2010 Oracle and/or its affiliates. 6 * 7 * OpenOffice.org - a multi-platform office productivity suite 8 * 9 * This file is part of OpenOffice.org. 10 * 11 * OpenOffice.org is free software: you can redistribute it and/or modify 12 * it under the terms of the GNU Lesser General Public License version 3 13 * only, as published by the Free Software Foundation. 14 * 15 * OpenOffice.org is distributed in the hope that it will be useful, 16 * but WITHOUT ANY WARRANTY; without even the implied warranty of 17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18 * GNU Lesser General Public License version 3 for more details 19 * (a copy is included in the LICENSE file that accompanied this code). 20 * 21 * You should have received a copy of the GNU Lesser General Public License 22 * version 3 along with OpenOffice.org. If not, see 23 * <http://www.openoffice.org/license.html> 24 * for a copy of the LGPLv3 License. 25 * 26 ************************************************************************/ 27 28 // MARKER(update_precomp.py): autogen include statement, do not remove 29 #include "precompiled_sc.hxx" 30 31 #ifdef SC_DLLIMPLEMENTATION 32 #undef SC_DLLIMPLEMENTATION 33 #endif 34 #include "editfield.hxx" 35 #include <rtl/math.hxx> 36 #include <unotools/localedatawrapper.hxx> 37 #include "global.hxx" 38 39 // ============================================================================ 40 41 namespace { 42 43 sal_Unicode lclGetDecSep() 44 { 45 return ScGlobal::GetpLocaleData()->getNumDecimalSep().GetChar( 0 ); 46 } 47 48 sal_Unicode lclGetGroupSep() 49 { 50 return ScGlobal::GetpLocaleData()->getNumThousandSep().GetChar( 0 ); 51 } 52 53 } // namespace 54 55 // ============================================================================ 56 57 ScDoubleField::ScDoubleField( Window* pParent, const ResId& rResId ) : 58 Edit( pParent, rResId ) 59 { 60 } 61 62 bool ScDoubleField::GetValue( double& rfValue ) const 63 { 64 String aStr( GetText() ); 65 aStr.EraseLeadingAndTrailingChars( ' ' ); 66 bool bOk = aStr.Len() > 0; 67 if( bOk ) 68 { 69 rtl_math_ConversionStatus eStatus; 70 sal_Int32 nEnd; 71 rfValue = rtl::math::stringToDouble( aStr, lclGetDecSep(), lclGetGroupSep(), &eStatus, &nEnd ); 72 bOk = (eStatus == rtl_math_ConversionStatus_Ok) && (nEnd == static_cast< sal_Int32 >( aStr.Len() )); 73 } 74 return bOk; 75 } 76 77 void ScDoubleField::SetValue( double fValue, sal_Int32 nDecPlaces, bool bEraseTrailingDecZeros ) 78 { 79 SetText( ::rtl::math::doubleToUString( fValue, rtl_math_StringFormat_G, 80 nDecPlaces, lclGetDecSep(), bEraseTrailingDecZeros ) ); 81 } 82 83 // ============================================================================ 84 85