Einzelnen Beitrag anzeigen

snow

Registriert seit: 28. Jun 2007
277 Beiträge
 
#1

Try.... except will nicht.

  Alt 2. Dez 2007, 14:13
Hallo

ich hab mal so was hier gebastelt

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var lokal : real;
begin
Try
  lokal := StrToFloat(Edit1.Text);
  Except
    lokal := 0;
    Edit2.Text := '0';
  End;
end;

end.
Ich will einen string in eine Gleitkommazahl wandlen und wieder zurück

ICh will dass wenn ich z.B 's' eingebe die Except-option ausgefürt wird.

Nur es klappt net

Ich bekomme immernoch meine fehlermeldung 's' ist kein gültiger Gleitkommawert.

Weis jemand was da net stimmen kann?

Gruß snow
  Mit Zitat antworten Zitat