Benötige Leeres Feld

Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

  • Benötige Leeres Feld

    Hätte mal eine Frage und zwar:

    Hab mich mal mit Delphi (Borland Studio 2006) versucht und irgendwie bekomm ich es nicht hin, dass ein Feld wo ich (im moment) keinen Wert eintrage, mit z.B. einer Null zu belegen.

    Es kommt immer nur die Fehlermeldung:
    "Edit1 is not a valid floating point value"

    Quellcode

    1. procedure TForm1.Button1Click(Sender: TObject);
    2. var a, b, c, x: Real;
    4. begin
    5. {Einlesen der Variablen}
    6. a := StrToFloat(Edit1.Text);
    7. b := StrToFloat(Edit2.Text);
    9. {Berechnung}
    10. c := b-a;
    11. x := 5*(c);
    13. {Ausgabe der Ergebnisse}
    15. Edit3.Text := FloatToStr(c);
    16. Edit4.Text := FloatToStr(x);
    18. end;
    20. {Programm beenden}
    21. procedure TForm1.ButtonClosedClick(Sender: TObject);
    22. begin
    23. close;
    24. end;
    26. end.
    Alles anzeigen