AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Zooflow: Fix messageboxes without title

Browse Source
This commit is contained in:
Jonathan Jenne
2022-05-23 15:07:07 +02:00
parent ce7261acca
commit 39c69704f4
56 changed files with 683 additions and 432 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
GUIs.Common/ObjectPropertyDialog/ctrlObjectPropertyDialog.vb
View File

@@ -15,13 +15,13 @@ Public Class ctrlObjectPropertyDialog
Private Property LogConfig As LogConfig Implements IBaseForm.LogConfig
Private Property Logger As Logger Implements IBaseForm.Logger
Private Property ErrorHandler As BaseErrorHandler Implements IBaseForm.ErrorHandler
Private Property ControlManager As AttributeControls
Private Property GridBuilder As GridBuilder
Private Property Client As Client
Private Property Environment As Environment
Private Property ObjectId As Long
Private Property HostForm As Form
Private Property FormHelper As FormHelper
Private ReadOnly Changes As New Dictionary(Of String, Object)
@@ -42,7 +42,6 @@ Public Class ctrlObjectPropertyDialog
LogConfig = pLogConfig
Logger = pLogConfig.GetLogger()
HostForm = pHostForm
ErrorHandler = New BaseErrorHandler(pLogConfig, pHostForm)
ControlManager = New AttributeControls(pLogConfig, pEnv, pClient)
GridBuilder = New GridBuilder(ViewObjectHistory, ViewValueHistory)
@@ -67,10 +66,10 @@ Public Class ctrlObjectPropertyDialog
})
Next
ErrorHandler.ShowInfoMessage($"{Changes.Count} Änderungen gespeichert!")
FormHelper.ShowInfoMessage($"{Changes.Count} Änderungen gespeichert!")
Changes.Clear()
Catch ex As Exception
ErrorHandler.ShowErrorMessage(ex, "SaveChanges")
FormHelper.ShowErrorMessage(ex, "SaveChanges")
End Try
End Function