@Uwe Raabe: Danke Uwe!!! Das ist die
high sophisticated Lösung eines wirklichen
Master Developers!
Da ich bisher weder mit
Rtti noch mit der Klasse
TCustomAttribute zu tun hatte, muss ich mich zuerst in die Materie einlesen. Im Buch von
Marco Cantu: Object Pascal Handbook (2015) habe ich eine recht verständliche Einführung gefunden.
Leider läßt sich Dein Delphi 10.4 Sydney – Code mit meinem XE5 nicht kompilieren. An folgenden drei Stellen rebelliert mein Compiler:
Delphi-Quellcode:
1): Implementation: class function TRttiHelper.FindAttribute<T>(Source: TRttiObject): T;
--> TRttiHelper.FindAttribute<T> ist rot unterstrichen
2): Initialization: TRttiContext.KeepContext;
--> KeepContext ist rot unterstrichen
3): Finalization: TRttiContext.DropContext;
--> DropContext ist rot unterstrichen
Vielleicht kennt jemand eine Abhilfe für Delphi XE5?
Danke & Gruß, Andreas