| [Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] | 
Check reference count.
Source position: objpash.inc line 292
| 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.
| 
 | Handle reference count properly. |