Unit 'IdIntercept'	Package
[Overview][Types][Classes][Index]	[#pl_indy]

TIdConnectionIntercept

Declaration

Source position: IdIntercept.pas line 79

`type TIdConnectionIntercept = class(TIdBaseComponent)`
`protected`
`FConnection: TComponent;`
`FIntercept: TIdConnectionIntercept;`
`FIsClient: Boolean;`
`FData: TObject;`
`FOnConnect: TIdInterceptNotifyEvent;`
`FOnDisconnect: TIdInterceptNotifyEvent;`
`FOnReceive: TIdInterceptStreamEvent;`
`FOnSend: TIdInterceptStreamEvent;`
`procedure InitComponent; override;`
`procedure Notification(); override;`
`procedure SetIntercept();`
`public`
`procedure Connect(); virtual;`
`procedure Disconnect; virtual;`
`procedure Receive(); virtual;`
`procedure Send(); virtual;`
`property Connection: TComponent; [r]`
`property IsClient: Boolean; [r]`
`property Data: TObject; [rw]`
`published`
`property Intercept: TIdConnectionIntercept; [rw]`
`property OnConnect: TIdInterceptNotifyEvent; [rw]`
`property OnDisconnect: TIdInterceptNotifyEvent; [rw]`
`property OnReceive: TIdInterceptStreamEvent; [rw]`
`property OnSend: TIdInterceptStreamEvent; [rw]`
`end;`