Taschenrechner ein Editfeld

[DeddyH]

Du wirst doch wissen, was eine Variable und was ein Integer ist.

Delphi-Quellcode:

var
  Operation: integer;
...
case Operation of
  1: Addieren(Zahl1, Zahl2);
  2: Subtrahieren(Zahl1, Zahl2);
  3: Multiplizieren(Zahl1, Zahl2);
  4: Dividieren(Zahl1, Zahl2);
  else
    //ungültige Operation, entsprechend reagieren
end;

Etwas lesbarer wird das mit einem eigenen Aufzählungstypen:

Delphi-Quellcode:

type
  TOperation = (opPlus, opMinus, opMal, opDurch);

var
  Operation: TOperation;
...
case Operation of
  opPlus: Addieren(Zahl1, Zahl2);
//usw. usf.