I have an app that will compile an xlsx file.
The process of creating and saving the file takes about 20 seconds.
Currently I am trying to implement a Progress Dialog so the end user can see something is happening.
I hoped it would be something as simple as adding
before the aPOI code.
Unfortunately the ProgressDialog only starts after the xlsx file has finished saving, and so only shows for a second.
What would be the best way to implement the Dialog so it starts when the user clicks save and finishes once the file is saved?
I have attached a small sample of the aPOI code.
The process of creating and saving the file takes about 20 seconds.
Currently I am trying to implement a Progress Dialog so the end user can see something is happening.
I hoped it would be something as simple as adding
B4X:
ProgressDialogShow2("Please Wait", False)
Unfortunately the ProgressDialog only starts after the xlsx file has finished saving, and so only shows for a second.
What would be the best way to implement the Dialog so it starts when the user clicks save and finishes once the file is saved?
I have attached a small sample of the aPOI code.
B4X:
Dim row As XSSFRow = sheet.getRow(41)
Dim Cell As XSSFCell = row.getCell(2)
Cell.StringCellValue = ACEditText1.Text
Dim row As XSSFRow = sheet.getRow(42)
Dim Cell As XSSFCell = row.getCell(5)
Cell.StringCellValue = DateText.Text
Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_WRITE_EXTERNAL_STORAGE)
wait for Activity_PermissionResult (Permission As String, Result As Boolean)
If Result Then
Dim outstream As OutputStream = File.OpenOutput(File.DirRootExternal, "Vehicle Checks Completed.xlsx", False)
xls.write(outstream)
outstream.close