Eingeschränkte Generics (Bug?)

[Neutral General]

Hallo,

Habe ein kleines Problem mit den Generics. Weiß nicht ob folgendes ein Bug ist, oder ob ich was falsch mache:

Delphi-Quellcode:

type
  // Ein Interface
  IIDObject = interface
    function GetID: Integer;
  end;

  // Testklasse, die dieses Interface Implementieren
  TTest = class(TInterfacedObject, IIDObject)
    function GetID: Integer;
  end;

  // Eine Objectlist, abgeleitet von TList<IIDObject>
  // und einem Generischen Parameter.
  // Die Items-Property soll jetzt überdeckt werden.
  TIDObjectList<T: IIDObject> = class(TList<IIDObject>)
  private
    function GetItem(Index: Integer): T;
    procedure SetItem(Index: Integer; const Value: T);
  public
    property Items[Index: Integer]: T read GetItem write SetItem;
  end;

implementation

{ TIDObjectList<T> }

function TIDObjectList<T>.GetItem(Index: Integer): T;
begin
  Result := inherited Items[Index];
end;

procedure TIDObjectList<T>.SetItem(Index: Integer; const Value: T);
begin
  Items[Index] := Value;
end;

Der Code funktioniert soweit.

Wenn ich nun folgenden Code habe:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var tmp: TIDObjectList<TObject>;
begin
  tmp := TIDObjectList<TObject>.Create;
  tmp.Free;
end;

bekomme ich den Fehler:

Zitat:

[DCC Fehler] Unit1.pas(47): E2514 Typparameter 'T' muss Interface 'IIDObject' unterstützen

was ja vollkommen korrekt ist!

ALLERDINGS:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var tmp: TIDObjectList<TTest>;
begin
  tmp := TIDObjectList<TTest>.Create;
  tmp.Free;
end;

erhalte ich hier auch einen Fehler:

Zitat:

[DCC Fehler] Unit1.pas(82): E2010 Inkompatible Typen: 'TTest' und 'IIDObject'

Und als Fehler-Zeile wird die letzte der Unit (noch hinter dem "end.") markiert.

An wem liegts? An Delphi oder an mir?

PS: Ich benutze Delphi2009

Gruß
Neutral General