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