Brauche Hilfe bei Delphi 6 doppeltes case-Label

[Dejan Vu]

Blöd, wenn B mal >9 wird.

[Sir Rufo]

So etwas kann man mit einem Array lösen

Delphi-Quellcode:

var
  PreisLookup: array[0..9,0..9] of double;

Result := PreisLookup[a,b];

oder (im Advanced Mode) mit einem Dictionary. Dort trägt man dann nur die erlaubten Kompinationen mit dem entsprechenden Preis ein.