<DispIdAttribute(1)>
Sub OnEvent( _
   ByVal bsName As String, _
   ByVal bsEventName As String, _
   ByVal bsEventParam As String, _
   ByVal pEventObject As Object _
) 

[DispId(1)]
void OnEvent( 
   string bsName,
   string bsEventName,
   string bsEventParam,
   object pEventObject
)

procedure OnEvent( 
    bsName: String;
    bsEventName: String;
    bsEventParam: String;
    pEventObject: TObject
); 

[DispId(1)]
void OnEvent( 
   BSTR* bsName,
   BSTR* bsEventName,
   BSTR* bsEventParam,
   IUnknown* pEventObject
) 

Parameters

bsName

source object name

bsEventName

event name

bsEventParam

event parameters

pEventObject

source event object

Reference

IMEvents Interface
IMEvents Members