StartTransfer Event

Fired when a file transfer begins.

Syntax

type TStartTransferEvent = procedure StartTransfer(Sender: TObject; Direction: Integer; const FileId: String; const User: String; const Domain: String; const Resource: String;var  Filename: String; const Datetime: String; Size: Int64;var  Accept: Boolean) of object;

property OnStartTransfer: TStartTransferEvent read FOnStartTransfer write FOnStartTransfer;

Remarks

When a file is received, the XMPP component will parse the sender's Jabber ID into the User, Domain, and Resource fields. The FileId and Filename parameters identify the current transfer. Within this event you may override the Filename by setting the Filename parameter. At this time you may also set LocalDirectory if it is not already set.

When a sending a file, the XMPP component will parse the receiver's Jabber ID into the User, Domain, and Resource fields.

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