FastMM detects call of a virtual method (Rtti)

[s.h.a.r.k]

Hallo zusammen,

und zwar habe ich ein Problem im Zusammenhang mit diesem Thread (Thema: [RTTI] Setter und Getter einer Property) und FastMM. Vorab schon mal: ich will ganz gerne die neuen Rtti-Features nutzen und nicht irgendwelche Properties in den published-Teil werfen, samt der Direktive {$M+}. Dies würde zwar funktionieren, aber ist nicht mein Ziel.

Hier mal aus dem anderen Thread, aus diesem Beitrag, ein wenig Code, um den es sich dreht:

Delphi-Quellcode:

var
  rProperty : TRttiProperty;
begin
  { ... }
  rPropInfo := TRttiInstanceProperty(rProperty).PropInfo;
  {... }
end;

Ich versuche allgemein an die PropertyInfos (Typ: PPropInfo) zu gelangen und scheitere irgendwie daran. PPropInfo(rProperty.Handle) liefert mir ein irgendwie anderes Ergebnis als zu erwarten wäre. Der obige Code liefert mir allerdings das korrekt Ergebnis, aber nun kommt FastMM ins Spiel. TRttiInstanceProperty hat ja Eigenschaft PropInfo mit der dahinter liegenden abstrakten Getter-Methode GetPropInfo().

Der obige Cast und die Ausführung des obigen Codes funktioniert allerdings ohne Problem! Nach dem Aktivieren des FullDebugModes in FastMM erscheint allerdings eine Fehlermeldung, dass FastMM einen Aufruf einer virtuellen (nicht abstrakt!) Methode festgestellt hat. Hier die Meldung:

Code:

FastMM has detected an attempt to call a virtual method on a freed object. An access violation will now be raised in order to abort the current operation.

Freed object class: TRttiInstancePropertyEx

Virtual method: Offset +8

Virtual method address: 56A840

The allocation number was: 8046

The object was allocated by thread 0x1650, and the stack trace (return addresses) at the time was:

Woher kommt denn die Klasse TRttiInstancePropertyEx auf einmal? Wenn ich diese sonst wo nutzen will (Unit Rtti eingebunden, versteht sich), dann findet der Compiler diese nicht. Und warum klappt der Aufruf an dieser Stelle denn nicht, d.h. warum meldet FastMM hier einen Fehler?