TObjectlist - Container fuer?

[bernau]

Die TObjectlist kann alle Objekte Speichern, die von TObject abgeleitet sind. Eingefügt werden diese einfach mit "Add"

myObjectlist.add(TBananenObject.create); Dabei kannst du in eine Liste auch unterschiedliche objekte speichern.

Delphi-Quellcode:

myObjectlist.add(TBananenObject.create);
myObjectlist.add(TApfelObject.create);
myObjectlist.add(TBirnenObject.create);

Wenn du darauf zugreifen willst, musst du ein Typecast durchführen

myboolean:=TBananenObject(myObjectlist[a]).hatKerne; Aber vorsichtig! So kannst du es nur machen, wenn du dir sicher bist, daß nur Bananenobjekte in der Liste sind. Ansonsten solltest du vorher püfen, was für ein objekt es ist.

Delphi-Quellcode:

if myObjectlist[a] is TBanabenObject then
  myboolean:=TBanabenObject(myObjectlist[a]).hatKerne;

Übrigens: Der Vorteil von TObjectList ist, daß es sich um die Freigabe der enthaltenen objekte kümmert, wenn du OwnsObjects auf true setzt. (Kann aber auch Nachteile haben)

Gruss Gerd