Indicates that the read or write operation is being performed.

TWorkEvent = procedure (Sender: TObject; AWorkMode: TWorkMode; const AWorkCount: Integer) of object;

Number of bytes affected by the event.

The operation to be performed.

Object instance triggering the event.

This event often fires when a component is receiving or sending data and this event is often used to update progress indicators.

AWorkMode indicates if the component is receiving or sending data and can be one of two values:

• wmRead - The component is reading data from the peer.

• wmWrite - The component is sending data to the peer.

AWorkCount indicates the number of bytes sent or received.