Registriert seit: 1. Jan 2010
Ort: Leer
594 Beiträge
Delphi XE3 Professional
|
AW: Rätselhaftes Konstrukt in Unit Dialogs
30. Jan 2012, 14:41
Delphi-Quellcode:
type
TMyClass = class
[ ListAttribute('SubPositions', TPositionInformation) ]
property SubPositions : TObjectList<TPositionInformation> read FSubPositions write FSubPositions;
[ ListAttribute('DatabaseVersions', TDatabaseVersion) ]
property DatabaseVersions : TObjectList<TDatabaseVersion> read FDatabaseVersions write FDatabaseVersions;
[ ListAttribute('ProductionUnits', TProductionUnit) ]
property ProductionUnits : TObjectList<TProductionUnit> read FProductionUnits write FProductionUnits;
[ ListAttribute('Segments', TPositionSegment) ]
property Segments : TObjectList<TPositionSegment> read fSegments write FSegments;
end;
Wobei man hier uch wieder von doppelten Informationen reden könnte.
TagName entpsricht ja dem Property-Namen, so daß man diesen Namen doch auch direkt verwenden könnte?
OK, an die Klasse in dem Generic ranzukommen ist nicht so einfach, aber Möglich wäre es bestimmt auch.
Das supported Delphi aktuell ja leider nicht
Lars
|
|
Zitat
|