['{F7509748-217A-42EB-B6FB-A45C25310F8A}']
Was ist das? Hat das was mit Serialisierung zu tun? Also mein Code ist bisher so:
Delphi-Quellcode:
type
IMap=interface
function Get(Key: Variant): TObject;
procedure Put(Key: Variant; Data: TObject);
procedure Insert(Key: Variant; Data: TObject);
procedure Delete(Key: Variant);
property Data[Key: Variant]: TObject read Get write Put; default;
end;
TTreeMap = class(TObject, IMap)
protected
FRoot: TTreeMapNode;
public
function Get(Key: Variant): TObject;
procedure Put(Key: Variant; Data: TObject);
procedure Insert(Key: Variant; Data: TObject);
procedure Delete(Key: Variant);
property Data[Key: Variant]: TObject read Get write Put; default;
end;
EDIT: OK, hab jetzt rausgefunden, wie ichs machen kann. Einfach nicht von TObject ableiten sondern von TInterfacedObject. Danke.