1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
3 * This file is part of the LibreOffice project.
5 * This Source Code Form is subject to the terms of the Mozilla Public
6 * License, v. 2.0. If a copy of the MPL was not distributed with this
7 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
9 * This file incorporates work covered by the following license notice:
11 * Licensed to the Apache Software Foundation (ASF) under one or more
12 * contributor license agreements. See the NOTICE file distributed
13 * with this work for additional information regarding copyright
14 * ownership. The ASF licenses this file to you under the Apache
15 * License, Version 2.0 (the "License"); you may not use this file
16 * except in compliance with the License. You may obtain a copy of
17 * the License at http://www.apache.org/licenses/LICENSE-2.0 .
21 #ifdef SC_DLLIMPLEMENTATION
22 #undef SC_DLLIMPLEMENTATION
24 #include "editfield.hxx"
25 #include <comphelper/string.hxx>
26 #include <rtl/math.hxx>
27 #include <unotools/localedatawrapper.hxx>
28 #include <vcl/builder.hxx>
31 // ============================================================================
35 sal_Unicode
lclGetDecSep()
37 return ScGlobal::GetpLocaleData()->getNumDecimalSep()[0];
40 sal_Unicode
lclGetGroupSep()
42 return ScGlobal::GetpLocaleData()->getNumThousandSep()[0];
47 // ============================================================================
49 ScDoubleField::ScDoubleField( Window
* pParent
, const ResId
& rResId
) :
50 Edit( pParent
, rResId
)
54 ScDoubleField::ScDoubleField( Window
* pParent
, WinBits nStyle
) :
55 Edit( pParent
, nStyle
)
59 extern "C" SAL_DLLPUBLIC_EXPORT Window
* SAL_CALL
makeScDoubleField(Window
*pParent
, VclBuilder::stringmap
&rMap
)
61 VclBuilder::ensureDefaultWidthChars(rMap
);
62 return new ScDoubleField(pParent
, WB_LEFT
|WB_VCENTER
|WB_BORDER
|WB_3DLOOK
);
65 bool ScDoubleField::GetValue( double& rfValue
) const
67 OUString
aStr(comphelper::string::strip(GetText(), ' '));
68 bool bOk
= !aStr
.isEmpty();
71 rtl_math_ConversionStatus eStatus
;
73 rfValue
= rtl::math::stringToDouble( aStr
, lclGetDecSep(), lclGetGroupSep(), &eStatus
, &nEnd
);
74 bOk
= (eStatus
== rtl_math_ConversionStatus_Ok
) && (nEnd
== aStr
.getLength() );
79 void ScDoubleField::SetValue( double fValue
, sal_Int32 nDecPlaces
, bool bEraseTrailingDecZeros
)
81 SetText( ::rtl::math::doubleToUString( fValue
, rtl_math_StringFormat_G
,
82 nDecPlaces
, lclGetDecSep(), bEraseTrailingDecZeros
) );
85 // ============================================================================
87 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */