Probleme beim Speichern eines Arrays

[Spessi]

Hallo, habe das ganze jetzt mit einer TObjectList gelöst

Delphi-Quellcode:

type TNPCList = class(TObjectList)
  protected
    function getItem(Index: Integer): TNPC; virtual;
    procedure setItem(Index: Integer; Objekt: TNPC); virtual;
  public
    function Add(Objekt: TNPC): Integer; virtual;
    function Remove(Objekt: TNPC): Integer; virtual;
    function IndexOf(Objekt: TNPC): Integer; virtual;
    procedure Insert(Index: Integer; Objekt: TNPC); virtual;
    function First: TNPC; virtual;
    function Last: TNPC; virtual;
    property Items[index: Integer]: TNPC read getItem write setItem; default;
    procedure SaveToFile(Stream: TMemoryStream);
    procedure LoadFromFile(Stream: TMemoryStream);
end;

Gibt's dagegen irgendwelche Einwände? (wg. Geschwindigkeit, etc.)



Gruß Spessi