VersionRelease
This commit is contained in:
@@ -35,7 +35,7 @@ Public Class frmResultSQL
|
||||
_frmProfileMatch = ProfileMatchForm
|
||||
End Sub
|
||||
|
||||
Private Async Sub frmResultDoc_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
Private Async Sub frmResultSQL_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
If Not ConfigManager.Config.ResultDataWindowSize.IsEmpty Then
|
||||
Size = ConfigManager.Config.ResultDataWindowSize
|
||||
End If
|
||||
@@ -49,7 +49,9 @@ Public Class frmResultSQL
|
||||
GridViewDataSearch1.ShowLoadingPanel()
|
||||
|
||||
Dim oSearches = Await LoadSearchesAsync()
|
||||
|
||||
If oSearches.Count = 0 Then
|
||||
Me.Close()
|
||||
End If
|
||||
For Each oSearch In oSearches
|
||||
RefreshTabData(oSearch.ProfileId, oSearch.DataTable, oSearch.TabIndex, oSearch.TabCaption)
|
||||
Next
|
||||
@@ -57,7 +59,7 @@ Public Class frmResultSQL
|
||||
GridViewDataSearch1.HideLoadingPanel()
|
||||
End Sub
|
||||
|
||||
Private Sub frmResultDoc_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
|
||||
Private Sub frmResultSQL_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
|
||||
Try
|
||||
ConfigManager.Config.ResultDataWindowSize = Size
|
||||
ConfigManager.Config.ResultDataWindowLocation = Location
|
||||
|
||||
Reference in New Issue
Block a user