Async Data Loading, use ConfigManager

This commit is contained in:
Jonathan Jenne
2019-07-15 15:09:48 +02:00
parent be1f74ceb0
commit 2e296a5267
14 changed files with 309 additions and 267 deletions

View File

@@ -1,17 +1,15 @@
Imports DevExpress.XtraEditors
Imports DevExpress.XtraGrid.Views.Tile
Imports DevExpress.XtraGrid.Views.Tile.ViewInfo
Public Class frmProfileMatch
Private Sub frmProfileMatch_Load(sender As Object, e As EventArgs) Handles Me.Load
If My.Settings.frmProfileMatchPosition.IsEmpty = False Then
If My.Settings.frmProfileMatchPosition.X > 0 And My.Settings.frmProfileMatchPosition.Y > 0 Then
Location = My.Settings.frmProfileMatchPosition
End If
End If
If My.Settings.frmProfileMatchSize.IsEmpty = False Then
Size = My.Settings.frmProfileMatchSize
If ConfigManager.Config.MatchWindowX > 0 And ConfigManager.Config.MatchWindowY > 0 Then
Dim oLocation As New Point(ConfigManager.Config.MatchWindowX, ConfigManager.Config.MatchWindowY)
Location = oLocation
End If
Dim oSize As New Size(ConfigManager.Config.MatchWindowWidth, ConfigManager.Config.MatchWindowHeight)
Size = oSize
If USER_LANGUAGE = "de-DE" Then
Me.Label1.Text = $"Clipboard Watcher hat mehr als einen Match für Ihre Suche [{CURR_MATCH_RESULT}] gefunden:"
Else
@@ -78,10 +76,11 @@ Public Class frmProfileMatch
Private Sub frmProfileMatch_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
Try
' Position und Größe speichern
My.Settings.frmProfileMatchSize = Me.Size
My.Settings.frmProfileMatchPosition = Me.Location
My.Settings.Save()
ConfigManager.Config.MatchWindowHeight = Size.Height
ConfigManager.Config.MatchWindowWidth = Size.Width
ConfigManager.Config.MatchWindowX = Location.X
ConfigManager.Config.MatchWindowY = Location.Y
ConfigManager.Save()
Catch ex As Exception
Logger.Error(ex)
Logger.Info("Error in Save FormLayout: " & ex.Message)