Fix wrong conversion

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2833 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2013-11-08 11:41:55 +00:00
parent 3db28fa6a8
commit 4f5803ff74
1 changed files with 1 additions and 1 deletions
--- a/components/jujiboutils/src/jlabeledfloatedit.pas
+++ b/components/jujiboutils/src/jlabeledfloatedit.pas
@ -197,7 +197,7 @@ begin
  if ReadOnly then
    exit;
  if IsValidFloat(Text) then
-    theValue := StrToCurr(Text)
+    theValue := StrToFloat(Text)
  else
  begin
    ShowMessage(Format(SInvalidNumber, [Text]));