Hallo Delphi Profis,
ich möchte in ein TCollectionItem einige neue Properties einfügen, weiss aber nicht wie ich das anstellen soll.
Ich habe mir eine von "TCustomVirtualStringTree" (Virtual String Tree von Mike Lischke) abgeleitete Komponente gebastelt. TCustomVirtualStringTree basiert auf der Klasse "TBaseVirtualTree", die TVTHeader (TPersistent) beinhaltet in der die Collection "TVirtualTreeColumns" drinnen ist.
Etwa so:
Delphi-Quellcode:
TVirtualTreeColumns = class(TCollection);
TVTHeader = class(TPersistent)
private
FColumns: TVirtualTreeColumns;
end;
TBaseVirtualTree = class(TCustomControl)
private
FHeader: TVTHeader;
end;
TCustomVirtualStringTree = class(TBaseVirtualTree);
TMyTree = class(TCustomVirtualStringTree);
Nun würde ich gerne die Items in TVirtualTreeColumns um ein paar Properies erweitern ohne den gesammten Source code vom Virtual String Tree ändern/übernehmen zu müssen.
Also: liebe
OOP Profis gibts da irgend eine Möglichkeit?
Viele Grüsse, Cornelius