Einzelnen Beitrag anzeigen

Benutzerbild von bernau
bernau

Registriert seit: 1. Dez 2004
Ort: Köln
1.294 Beiträge
 
Delphi 12 Athens
 
#11

AW: Konstantenausdruck verletzt untere Grenzen

  Alt 4. Jul 2012, 16:35
case i of i_min..i_max: xyz end; // :stupid:
Warum stupid?

Bei Sets kann man ja verschiedne Bereiche testen:

z.B.

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
   tmpInt : Integer;
begin
   tmpInt := -1;
   if tmpInt in [-1..2,4..6] then
     ShowMessage('1');
end;
Das bringt Fehler.


Folgendes nicht:

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
   tmpInt : Integer;
begin
   tmpInt := -1;
   if case i of -1..2,4..6: ShowMessage('1'); end;
end;
Gerd
Kölner Delphi Usergroup: http://wiki.delphitreff.de
  Mit Zitat antworten Zitat