RegisterAxit
(Available in 01 TS COM - TS_COM_DelegateIDispatchAuto)
Source
METHOD
RegisterAxit
(
)
CLASS
TS_DelegateIDispatchAuto
TSTrace
Enter
IF
!
SELF
:
_AxitRegistered
SELF
:
_AxitRegistered
:=
TRUE
RegisterAxit
(
SELF
)
END
TStrace
Leave
RETURN
NIL