New Observer (gb)

Dim hObserver As Observer
hObserver = New Observer ( Object As Object [ , After As Boolean ] )

Creates a new observer for the specified object.

If After is set to TRUE, then the observer will catch events after they have been processed. In that case, it will not be able to cancel them.

Do not forget to put AS "EventName" after the instanciation, to catch the events intercepted by the observer.