Delphi-Quellcode:
type
TSeiteListe=Class(TObjectList)
private
function GetItem(Index: Integer): TSeite;
procedure SetItem(Index:integer;Value:TSeite);
public
....
end;
Die Methoden fehlen natürlich noch in der deklaration der klasse. Dann funktioniert es.