Exception im Konstruktor lösen Destructor aus auch bei Interfaces

[Uwe Raabe]

Zitat von Blup:

Alternativ kann man den Referenzzähler (FRefCount) auch gleich auf 0 setzen.

Das kann aber auch schief gehen. Wenn nämlich im Destroy die Instanz als Interface-Referenz verwendet wird, die wiederum eine Referenzzählung auslöst, wird mit dem _AddRef/_Release womöglich noch ein Free aufgerufen. Das gilt übrigens immer bei Abkömmlingen von TInterfacedObject und nicht nur in diesem Fall. Warum dieser Fall im constructor berücksichtigt wird, im destructor aber nicht, bleibt ein Rätsel. Ein diesbezüglicher QC-Eintrag von mir bereits für Delphi 2007 ist immer noch Open. In der VCL kommt das Problem offenbar nicht vor.