[Lazarus] How to check if a string is a valid floating-point number.

[Kjow]

Hi all,

I need to know if a string is a valid floating-point number, so I
tried this function:

function IsStrFloatNum(s: string): Boolean;
begin
  try
    // try to convert the string into a floatnumber
    StrToFloat(s);
    // if there is no error the result is true
    Result := True;
  except
    // if there is any error the result is false
    Result := False;
  end;
end;

(From: http://www.swissdelphicenter.ch/torry/showcode.php?id=304 )

Well, I get this error:

Debugger Exception Notification
project.exe raised exception class 'EConvertError' with message:
"Cross" is an invalid float

I used this function some month ago in this project and it worked
without problems, but now (some month after) I re-tried to re-build
and re-use this function and I get this error.

Did I inadvertently change something?


Thank you!
Kjow