Transfer Event

Fired during file download/upload.

Syntax

type TTransferEvent = procedure Transfer(Sender: TObject; Direction: Integer; const LocalFile: String; const RemoteFile: String; BytesTransferred: Int64; PercentDone: Integer; Text: String;var Cancel: Boolean) of object;
property OnTransfer: TTransferEvent read FOnTransfer write FOnTransfer;

Remarks

One or more Transfer events are fired during file transfer. The BytesTransferred parameter shows the number of bytes transferred since the beginning of the transfer.

Text contains the portion of the file data being delivered.

The Direction parameter shows whether the client (0) or the server (1) is sending the data.

LocalFile identifies the local file. RemoteFile is the remote file.

The PercentDone parameter shows the progress of the transfer in the corresponding direction. If PercentDone can not be calculated the value will be -1.

To cancel the current transfer set Cancel to true.