StrToFloat
Adam Boduch
StrToFloat
Moduł: SysUtils
Poniższy program pobiera liczbę zmiennoprzenkową z konsoli poczym konwertuje ją na typ Extended. Następnie mnoży wartość razy 2 i wyświetla wynik na ekranie:
program Foo;
{$APPTYPE CONSOLE}
uses
SysUtils, DateUtils;
var
Bar : Extended;
Input : String;
begin
Write('Wpisz liczbę zmiennoprzecinkową: ');
Readln(Input);
Bar := StrToFloat(Input);
Writeln(Format('%.2f', [Bar * 2]));
Readln;
end.
Zobacz też:
"[...]3.2 is not a valid floating point value" mi wyskakuje... 3.2 to liczba jaką chciałem przekonwertować.