GefEventContext.TriggerObject (read-only property)

Gets the GefObject that triggered the event.
Syntax: Set GefObject = object.TriggerObject
Description: The trigger object of the event is not always the owner of the script being run. For example, an event configured in an object can run a script in any of its parents and an event that runs a procedure can invoke a script in any named object in the screen.


Sub GefEventContext_TriggerObject()
    Dim oCimEvntContext As GefEventContext
    Dim oCimObj As GefObject
    Set oCimEvntContext = CimGetEventContext
    Set oCimObj = oCimEvntContext.TriggerObject
    MsgBox "The trigger object is " & oCimObj.Name
End Sub