Disable export button while exporting
This commit is contained in:
@@ -224,8 +224,9 @@ Public Class frmExportMain
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Async Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
|
||||
Private Async Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnExport.ItemClick
|
||||
Try
|
||||
btnExport.Enabled = False
|
||||
SplashScreenManager.ShowWaitForm()
|
||||
|
||||
Dim oExportResult = False
|
||||
@@ -259,6 +260,7 @@ Public Class frmExportMain
|
||||
|
||||
Finally
|
||||
SplashScreenManager.CloseWaitForm()
|
||||
btnExport.Enabled = True
|
||||
SearchDocuments()
|
||||
|
||||
End Try
|
||||
|
||||
Reference in New Issue
Block a user