Destroy

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

Purpose

CALLBACK: It is adviced to use 'oObject:Axit()'

Syntax

// See the documentation for the 'Axit' method.
oSomeClass:Axit( ) 

Description

Note: Do not execute the 'Destroy()' method directly, it is adviced to call the 'Axit()' method when destruction of the object is needed this method of destruction is optimized for speed and guaranties that the 'Destroy()' method is only called once.

Note: The designer of the class should be aware of the fact that the 'Destroy()' method can be called multiple times.

Source

METHOD Destroy( ) CLASS TS_Destructor
   TSTrace Enter
   IF SELF:_Destroyed<>2U
      SELF:_Destroyed:=2U
      SELF:OnDestroy( )
   ELSE
      SELF:_Destroyed:=2U
   END
   TSTrace Leave DESTROY
RETURN NIL