SelfDestructOnUnRegisterOwner

(Available in 00 TS Tools(Base) - TS_Tools_Root2)

Purpose

Test if the object 'SelfDestruct's whith its owner

Syntax

IF oSomeObject:SelfDestructOnUnRegisterOwner

Description

If TRUE and the object has a owner, then the object will selfdestruct at the moment that the owner unregisters itself. This behavior can be modified if 'SelfDestructDisabledIfOwneds' is set TRUE. When this flag is set TRUE then no selfdestruct will take place until the last owned has been unregistered.

This behavior is only supported if the owner is derived from 'TS_Root0'

Source

ACCESS SelfDestructOnUnRegisterOwner AS LOGIC PASCAL CLASS TS_Root2
   TSTrace Enter
   TSTrace Leave
RETURN _AND( SELF:_ObjectStat2, TS_OBJSTAT2_TEST_SELFDESTRUCT  ; ...
...)==TS_OBJSTAT2_CAN_SELFDESTRUCT