StrToReal <--- gibt es so etwas

[flomei]

Hallo!
Noch spät am Abend eine kurze Frage:
Ich hab hier einen Wert in einem Edit und daraus muss ich einen Real-Wert machen um später damit zu rechnen. Wie kann ich diesen Wert umrechnen (also von String nach Real)?

Danke im Vorraus!

MfG Florian :hi:

[sakura]

Ja. StrToFloat ;-)

...:cat:...

[himitsu]

Delphi-Quellcode:

function StrToFloat(const S: string): Extended;
function StrToFloatDef(const S: string; const Default: Extended): Extended; overload;

[edit]
och menno :(

[Leuselator]

gibt es:

SysUtils.StrToFloat(const S : String) : Extended;

Ansonsten, wenn Du es etwas sicherer machen willst:

Delphi-Quellcode:

function StrToFloatF(Zahl_Als_Text:String):Double;
var TmpStr : String;
    i :integer;
    Positiv : Boolean;
begin
  Positiv := TRUE;
  TmpStr := '';
  for i:= 1 to length(Zahl_Als_Text) do begin
    if Zahl_Als_Text[i] in ['0'..'9',','] 
      then TmpStr  := TmpStr+Zahl_Als_Text[i];
    if Zahl_Als_Text[i] = '-'         
      then Positiv := FALSE;
  end;
  if Positiv 
    then Result := StrToFloat(TmpStr) 
    else Result := StrToFloat(TmpStr)*-1;
end;

Edit: Wenn man schonmal glänzen will... :lol:

[flomei]

DANKE!!! :)

MfG Florian :dp: