Unendlich einfügen [HILFE]

[Noris]

Hallo,
ich habe mal eine Frage...

ICh würde gerne and dieser Stelle:

Delphi-Quellcode:

begin
  Verbrauch := ZaehlerNeu - ZaehlerAlt;
  case (Verbrauch) of
       1..3  : PreisJeWoche := 210;
      3..50  : PreisJeWoche := 0.06;    
  end; (* case verbrauch *)

statt der 50 ein Unendlich machen, wie müsste ich das schreiben

Bitte schreibt auch noch dazu was ich evtl. noch in uses schreiben muss etc.


Mit vielen Grüßen

Noris