Einzelnen Beitrag anzeigen

Andre_Schmidt

Registriert seit: 9. Aug 2006
9 Beiträge
 
#1

Leeres Feld ohne "ShowMessage...."

  Alt 9. Aug 2006, 12:47
Hallo Leute

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"

Ich hoffe es kann mir jemand helfen!


Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var a, b, c, x: Real;

begin
{Einlesen der Variablen}
a := StrToFloat(Edit1.Text);
b := StrToFloat(Edit2.Text);

{Berechnung}
c := b-a;
x := 5*(c);

{Ausgabe der Ergebnisse}

Edit3.Text := FloatToStr(c);
Edit4.Text := FloatToStr(x);

end;

{Programm beenden}
procedure TForm1.ButtonClosedClick(Sender: TObject);
begin
close;
end;

end.

Mfg Andre
  Mit Zitat antworten Zitat