Screenmask when preparing a report.

[GerhardV]

I have a report module based on the UniGUI demos. Some of the larger reports take a while to generate and I want to show the screenmask with "Preparing report...". The parent of the UniURLFrameReport is a TuniFrame.

 

I have tried different variations but cannot get the screenmask to show properly. The mask only appears once the PDF report is downloading.

procedure TframeReport.Initialize;
var
  dm : TdmReportData;
begin
  UniURLFrameReport.ShowMask('Preparing report...');
  dm := TdmReportData.Create(nil);
  try
    UniURLFrameReport.URL := dm.GenerateReportPDF(ImqsReport, '');
  finally
    dm.Free;
    UniURLFrameReport.HideMask;
  end;
end;

Any advice?

[Farshad Mohajeri]

Hi

 

Please see demo:

 

SyncClientUpdate - 4 - ShowMask

[GerhardV]

Hi Farshad:

 

Thank you but it does not seem to work with TUniFrame, I also tried with "UniURLFrameReport" but same result. I also noticed that TUniFrame does not have a published property ScreenMask.

procedure TframeReport.Initialize;
var
  dm : TdmReportData;
begin
  ShowMask('Preparing report...');
  UniSession.Synchronize;

  dm := TdmReportData.Create(nil);
  try
    UniURLFrameReport.URL := dm.GenerateReportPDF(ImqsReport, '');
  finally
    dm.Free;
    HideMask;
  end;
end;

[Farshad Mohajeri]

Make sure MainModule has the EnableSynchronous option set

[GerhardV]

Thanks that did it! Thank you.

 

What is that option for?

[Sherzod]

Hi,

 

http://forums.unigui.com/index.php?/topic/7086-version-09996/

 

Best regards.

[GerhardV]

Thank you.