A3D nGine 2003 and Delphi5

[Philipp]

or something other... without setting the decimalseparator everytime...

[pascal]
// newstrtofloat
//
function NewStrToFloat(Str : string) : single;
var
I : integer;
Separators : set of char;

begin
Separators := ['.', ','];
for I := 0 to Length(Str) do begin
if Str[I] in Separators then
Str[I] := DecimalSeparator;
end;
Result := StrToFloat(Str);
end;
[/pascal]

it checks which version of the decimalseparator is used in the string...

hth

regards,
philipp.