TObjectList <T> .Contains verursacht Zugriffsverletzung in Delphi 2009

Question

In Delphi 2009 hatte ich bisher keine größeren Probleme mit Generics (unter Verwendung von Generics.Collections-Listen, ohne spezielle Generics-Features).

Jetzt habe ich festgestellt, dass dieser Code ein AV in der Zeile verursacht, die auf MyList.Contains zugreift.

Der Fehler verschwindet, wenn ich TMyList = class(TList<TMyEntry>);

Sollte ich vermeiden, TObjectList<T> oder ist etwas anderes in meinem Code diesen Fehler verursacht?

type 
    TMyEntry = class(TStringlist); 
    TMyList = class(TObjectList<TMyEntry>); 

procedure TListTests.TestAV; 
var 
    Entry: TMyEntry; 
    MyList: TMyList; 
begin 
    MyList := TMyList.Create; 
    try 
    Entry := TMyEntry.Create; 

    MyList.Add(Entry); 

    Assert(MyList.Contains(Entry)); // <--- AV 

    finally 
    MyList.Free; 
    end; 
end; 

Answer 1

Dies ist die Lösung, basierend auf dem linked answer:

Änderung

MyList := TMyList.Create; 

zu

MyList := TMyList.Create(TComparer<TMyEntry>.Default);