Hi William,
i had the same problem and Bart gave me the answer.
If you don't resolve the question, in TMSFNCCloudStorageServices you have Storage property that have the OnRequestProgress event.
OnRequestProgress is declared as
TTMSFNCCloudBaseProgressEvent = procedure(Sender: TObject; const ARequestResult: TTMSFNCCloudBaseRequestResult; AProgress: Single; AUpload: Boolean) of object;
So what you need to do, in your form, is declare a procedure like
procedure UpLoadProgress(Sender: TObject; const ARequestResult: TTMSFNCCloudBaseRequestResult; AProgress: Single; AUpload: Boolean);
and assign it to
TMSFNCCloudStorageServices.Storage.OnRequestProgress:=UpLoadProgress
where you can update the progress bar via AProgress that return the file transfert in %
Just in case you did not find this solution jet ......
Regards
Daniele