VirtualDAC
Used to access separate attributes.
TObjectType
property Attributes[Index: integer]: TAttribute;
Use the Attributes property to access individual attributes. The value of the Index parameter corresponds to the AttributeNo property of TAttribute.