Konstantenausdruck verletzt untere Grenzen

[Alex_ITA01]

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