Unit: edbcomps

TEDBRemoteProgressEvent = procedure (Sender: TObject; NumBytes:
      Integer; PercentDone: Integer) of object

This type is used for the TEDBSession OnRemoteSendProgress and OnRemoteReceiveProgress events.