| Class TAutoObjectWithEvents (unit uComEvents) |
TAutoObject
| Constructors |
| Functions |
destructor Destroy;
procedure Initialize;
procedure EventConnect( const Sink: IUnknown; Connecting: Boolean );
procedure EventSinkChanged( const Events: IUnknown );
function GetInterfaceSafetyOptions( const iid: TGUID;
out dwSupportedOptions: DWord;
out dwEnabledOptions: DWord ): HResult;
function ObjQueryInterface( const iid: TGUID; out Obj ): HResult;
function SetInterfaceSafetyOptions( const iid: TGUID;
dwOptionSetMask: DWord;
dwEnabledOptions: DWord ): HResult;| Properties |
property EventFactory : TAutoObjectWithEventsFactory| Events |
| Variables |
FConnectionPoints : TConnectionPoints;
FEventFactory : TAutoObjectWithEventsFactory;
FEventSink : IUnknown;
FUseDispatchSilencer : Boolean;| Constructors |
| Functions |
destructor Destroy;setup for events if we have events to hook to
procedure Initialize;if
procedure EventConnect( const Sink: IUnknown; Connecting: Boolean );TAutoObjectWithEvents
procedure EventSinkChanged( const Events: IUnknown );
function GetInterfaceSafetyOptions( const iid: TGUID;
out dwSupportedOptions: DWord;
out dwEnabledOptions: DWord ): HResult;get rid of our connection point container (watch for _Release problems
function ObjQueryInterface( const iid: TGUID; out Obj ): HResult;answer a request for sinking
function SetInterfaceSafetyOptions( const iid: TGUID;
dwOptionSetMask: DWord;
dwEnabledOptions: DWord ): HResult;| Properties |
property EventFactory : TAutoObjectWithEventsFactory| Events |
| Variables |
FConnectionPoints : TConnectionPoints;
FEventFactory : TAutoObjectWithEventsFactory;should be private
FEventSink : IUnknown;
FUseDispatchSilencer : Boolean;