OnUnRegisterIOwned
(Available in 01 TS COM - TS_COM_IUnknown)
Purpose
CALLBACK: Called when a owned unregisters itself
Arguments
Description
Can be overridden to detect when a owned object is unregisterd
Important! This is a event send by the library. Normally, it should not be called in/by your application code.
Returns
Return = TRUE if succeeded
Example
METHOD UnRegisterIOwned( uoIOwned ) AS LOGIC PASCAL CLASS CLASS SomeIClass
DO CASE
CASE SELF:_MyIX==uoIOwned
SELF:_MyIX:=NULL_OBJECT
CASE SELF:_MyIY==uoIOwned
SELF:_MyIY:=NULL_OBJECT
END
SUPER:UnRegisterIOwned( uoIOwned )
RETURN NIL
Source
METHOD OnUnRegisterIOwned( uoIOwned ) CLASS TS_IUnknown
TSTrace Enter
TSTrace Leave
RETURN NIL