Unit 'System'	Package
[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index]	[#rtl]

TInterfacedObject.BeforeDestruction

Check reference count.

Declaration

Source position: objpash.inc line 365

public procedure TInterfacedObject.BeforeDestruction; override;

AfterConstruction overrides the basic method in TObject and adds a reference count check: if the reference count is not zero, an error occurs.

A runtime-error 204 will be generated if the reference count is nonzero when the object is destroyed.