Moin,
ich beschäftige mich das erste Mal mit
RTTI.
Aktuell versuche ich darüber auf Font-Eigenschaften von Komponenten zuzugreifen und bekomme ein Problem.
Mit
if (IsPublishedProp(aControl, 'Font')) then
Stelle ich fest, ob überhaupt das Control (Type TControl) die Eigenschaft besitzt.
Das ist der Fall, da es sich um ein TEdit handelt.
Daher merke ich mir den Font mit:
aFont := TFont(IsPublishedProp(TWinControl(aControl), 'Font'))
Für das Programm benötige ich eigentlich nur die Eigenschaft Height vom aFont.
Sobald ich aber darauf zugreife, bekomme ich eine Schutzverletzung:
Exception der Klasse $C00000005. Zugriffsverletzung an Adresse 0x00512df9. Lesen von Adresse 0x00000011.
Im Moment habe ich keine Idee, was da schief läuft. Zumal ich mit den Zugriffen über
RTTI noch nicht besonders viel Erfahrung habe.
Ich vermute, dass ich irgendetwas prinzipielles falsch mache.
Kann mir jemand weiterhelfen?