denkfehler; array-> dynarray

[jfheins]

Jetzt mal was aus dem Tutorial kopiert:

Delphi-Quellcode:

TmxCustomItem = class(TCollectionItem)
private
fStringItem: String;
public
procedure Assign(Source: TPersistent); overide;
published
property StringItem: String read fStringItem write fStringItem;
end;

(*
Dies ist eine normale Itemklasse, doch jetzt kommt der Unterschied zu einer herkömmlichen
Collection. Direkt nach der Item-Deklaration schreiben wir folgendes:
*)

{$define TYPED_DP_COLLECTION_TEMPLATE}
_COLLECTION_ITEM_ = TmxCustomItem;
{$INCLUDE dpCollection_tmpl.pas}
TTypedCollection = _COLLECTION_;

So einfach kann das gehen