Einzelnen Beitrag anzeigen

Alex_ITA01

Registriert seit: 22. Sep 2003
1.115 Beiträge
 
Delphi 12 Athens
 
#1

Konstantenausdruck verletzt untere Grenzen

  Alt 4. Jul 2012, 13:53
Hallo zusammen,
kann mir einer erklären, warum folgender Code nicht geht:

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
  tmpInt : Integer;
begin
  tmpInt := -1;
  if tmpInt in [-1..2] then
    ShowMessage('1');
end;
Dieser aber geht:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
  tmpInt : Integer;
begin
  tmpInt := -1;
  if tmpInt in [0..2] then
    ShowMessage('1');
end;
Ein Integer kann ja schließlich negativ sein...
Vielleicht habe ich aber auch ein Denkfehler?!

Beim oberen Code kommt die besagte Fehlermeldung, weil ich in eckigen Klammern eine -1 übergebe.

Gruß
Alex
Let's fetz sprach der Frosch und sprang in den Mixer
  Mit Zitat antworten Zitat