StrToFloatDef

StrToIntDef の浮動小数点数版。

function StrToFloatDef(const S: string; Default: Extended): Extended;
var
  Value: Extended;
begin
  if TextToFloat(PChar(S), Value, fvExtended) then Result := Value
  else Result := Default;
end;

Return index page