Einzelnen Beitrag anzeigen

Popov
(Gast)

n/a Beiträge
 
#7

Re: procedures zusammenfassen/vereinfachen (Totale Anfängerf

  Alt 12. Nov 2007, 07:55
Hallo Tobicaster, deinen Code hätte ich so nicht geschrieben. Der Divisor hat nichts in ELSE zu suchen. Im Endeffekt ändert sich da wohl nichts, da du wohl aufpassen wirst, aber trotzdem. Jedem Operator eine Zuweisung und überhaupt kein ELSE.

Zitat von Tobicaster:
Delphi-Quellcode:
 case op of
    '+': ...
    '-': ...
    '*': ...
    '/': ...
  end;
Außerdem, persönlich bin ich kein Freund von try/except Missbrauch bei Programmierung. try/except ist nur für den unvorhersehbaren Fall. Eine Division durch Null sollte man selbst abfangen. Das könnte in etwa so aussehen:

Delphi-Quellcode:
    if Eingabe2 = 0 then
      Display.Caption := 'ERROR (Division durch Null)'
    else
      Display.Caption := FloatToStr(Eingabe1 / Eingabe2);
Warum willst du die Fehlermeldung dem Programm überlassen?
  Mit Zitat antworten Zitat