Progress Event

Reports the progress of the data transfer operation.

Syntax

type TProgressEvent = procedure (
  Sender: TObject;
  Total: Int64;
  Current: Int64;
  var Cancel: Boolean
) of Object;

property OnProgress: TProgressEvent read FOnProgress write FOnProgress;

Remarks

The component fires this event repeatedly to report the progress of the data transfer operation.