Vielen Dank
Mit den Änderungen lässt sich das Testprojekt jetzt compilieren. Aber zwei Dinge treten noch auf
- Die Abfrage (FParentObject is TBaseObjectList<TBase>)
bringt kein TRUE zurück, obwohl ich lNamen.ParentObject := lNamenList;
zugewiesen habe
- Spätestens wenn ich das Programm beende, kommt ein EAccessViolation auf. Kann aber auch schon passieren, wenn ich aus dem Programm in die IDE wechsle.
Ich bin nicht sicher, ob ich den Zusatz richtig verstanden habe
Konsequenterweise sollte man die Liste auch so deklarieren: TBaseObjectList<T: TBase>
Ich habe es auf verschiedene Arten probiert, das Verhalten blieb aber immer gleich
Delphi-Quellcode:
TBaseObjectList<T: class> = class(TObjectList<T>)
TBaseObjectList<T: TBase> = class(TObjectList<T>)
TBaseObjectList<TBase: class> = class(TObjectList<TBase>)