Thema: Delphi taschenrechner

Einzelnen Beitrag anzeigen

Benutzerbild von netscanner
netscanner

Registriert seit: 2. Dez 2005
Ort: Dieburg
280 Beiträge
 
Delphi 6 Enterprise
 
#6

Re: taschenrechner

  Alt 27. Jun 2006, 14:44
s.o. das ist der lösungsansatz dazu....

wie ich sehe list du in ne real variable...
Der Fehler kommt bei der codezeile x := strtofloat(edit1.text); Das einfach durch:
Delphi-Quellcode:
try
x := strtofloat(edit1.text);
except
showmessage('Bitte nur zahlen eingeben');
end;
ersetzten...

Ein Buchstabe ist keine Zeichen aus dem Real Zahl bereich...daher bringt er dir ne fehlermeldung.
Der Befehl oben überprüft erst, ob es geht...wenns net geht bringt er eine meldung und führt den x := strtofloat(edit1.text); gar nicht erst aus....
Martin
  Mit Zitat antworten Zitat