Jump to content

I need show the screenmask while fileupload


PALF

Recommended Posts

Hello:

I try to show screenmask while fileupload.

In OnUniFileUploadCompleted different tasks are performed, which can take several seconds and I would like to show a screenmask.

I have tried with:

 

unifileupload3.ScreenMask.Message: = 'uploading';
unifileupload3.ScreenMask.Enabled: = true;
UniFileUpload3.Execute;

but screemask is not shown. Only the progress is shown, if the file is large, and the upload form is still displayed until the UniFileUploadCompleted code is finished.

I need that once the file has been uploaded the upload form is closed and the screenmask is displayed, but I don't get that result

Regards,

 

Alfonso

 

Link to comment
Share on other sites

try this

 

procedure TMainForm.UniButton1Click(Sender: TObject);
begin
  showmask('wait');
  unisession.syncronize;
  UniFileUpload.Execute;
end;

procedure TMainForm.UniFileUpload1Completed(Sender: TObject;  AStream: TFileStream);
begin
 hidemask;
 unisession.syncronize;
end;
 

Link to comment
Share on other sites

  • 2 years later...
3 hours ago, eduardosuruagy said:

How can I use it if it doesn't have the "ShowUploadingMessage" option?

You are confusing UniFileUpload with UniFileUploadButton, which has that property:

 

 

fileuploadbutton.jpg

Link to comment
Share on other sites

13 minutes ago, eduardosuruagy said:

I'm not using this component, I'm using the UniFileUpload component and it doesn't have that option!

We know that this property does not exist for this component. So we are talking about using another component that has this property.

  • Sad 1
Link to comment
Share on other sites

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
×
×
  • Create New...