FragmentComplete Event
Fires after each fragment of a resumable upload is completed.
Syntax
type TFragmentCompleteEvent = procedure ( Sender: TObject; FragmentNumber: Integer; FragmentCount: Integer; var Interrupt: Boolean ) of Object;
property OnFragmentComplete: TFragmentCompleteEvent read FOnFragmentComplete write FOnFragmentComplete;
Remarks
When UseResumableUpload is True and UploadFile is called, this event will fire after each fragment is uploaded, providing an indication of overall upload progress.
FragmentNumber is the number of the current fragment that has completed. This value starts at 1.
FragmentCount is the total number of fragments that will be uploaded.
Interrupt can be set to True to interrupt the upload. The upload may be resumed later.