Edit-Feld auf Inhalt überprüfen

[Sharky]

Hai Chouzu,

Zitat von Chaozu:

Wenn ich jetzt aber Buchstaben reinschreibe, dann kommt die Meldung: " '' ist kein gültiger Gleitkommawert"

und dann versuchst Du mit diesem Code:

Zitat von Chaozu:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
.
.

  if edit1.text <> '' then
    begin  // Code, wenn etwas hinein geschrieben wurde
    Mark := StrToFloat(edit1.text);
.
.
.

den Inhalt des Editfeldes in eine (Float)Zahl zu wandeln.

Also... mal überlegen... Im Edit steht ein Buchstabe und Du möchtest daraus eine Zahl machen. Das kann nicht gehen.

In den obigen Antworten wird einfach eine "Fehlerbehandlung" eingebaut die den Laufzeitfehler "unterdrückt".

Besser wäre es aber die Eingabe von Buchstaben gleich zu unterbinden.