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

5
GUIs.Test.TestGUI/frmMsgBox.vb
View File

@@ -14,11 +14,12 @@ Public Class frmMsgBox
End Sub
Private Sub SimpleButton1_Click(sender As Object, e As EventArgs) Handles SimpleButton1.Click
Dim oMsgbox = New NNMsgBoxEx("Hallo Welt!", "Ein Titel")
Dim oMsgbox = New frmDialog("Diese Datei ist hier unerwünscht!", "Zooflow", frmDialog.DialogType.Error)
oMsgbox.ShowDialog()
End Sub
Private Sub SimpleButton2_Click(sender As Object, e As EventArgs) Handles SimpleButton2.Click
MsgBox("Hallo Welt", MsgBoxStyle.OkOnly, "EinTitel")
Dim oMsgbox = New frmDialog("Der Fluxkompensator ist leer. Bitte auffüllen!", "File Flow", frmDialog.DialogType.Warning)
oMsgbox.ShowDialog()
End Sub
End Class

3
GUIs.Test.TestGUI/frmObjectProperties.vb
View File

@@ -18,7 +18,4 @@ Public Class frmObjectProperties
Public ReadOnly Property LogConfig As LogConfig Implements IBaseForm.LogConfig
Public ReadOnly Property Logger As Logger Implements IBaseForm.Logger
Public ReadOnly Property ErrorHandler As BaseErrorHandler Implements IBaseForm.ErrorHandler
End Class