Egalware/EgtWPFLib5
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-piccola modifica a EgtMessageBox

Browse Source
This commit is contained in:
Demetrio Cassarino
2026-02-13 16:50:34 +01:00
parent ec2a5ec566
commit b32d045273
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
EgtMessageBox/EgtMessageBoxV.xaml.vb
+2 -2
View File
@@ -4,7 +4,7 @@
Private WithEvents m_EgtMessageBoxVM As EgtMessageBoxVM
Private Shadows DialogResult As MessageBoxResult
Private Shadows DialogResult As Boolean
#End Region ' FIELDS & PROPERTIES
@@ -97,7 +97,7 @@
#Region "EVENTS"
Private Sub CloseWindow(DialogResult As MessageBoxResult) Handles m_EgtMessageBoxVM.OnCloseWindow
Private Sub CloseWindow(DialogResult As Boolean) Handles m_EgtMessageBoxVM.OnCloseWindow
Me.DialogResult = DialogResult
Me.Close()
End Sub
EgtMessageBox/EgtMessageBoxVM.vb
+2 -2
View File
@@ -5,7 +5,7 @@ Public Class EgtMessageBoxVM
#Region "FIELDS & PROPERTIES"
Public Event OnCloseWindow(DialogResult As MessageBoxResult)
Public Event OnCloseWindow(DialogResult As Boolean)
Private m_sTitle As String = ""
Public ReadOnly Property sTitle As String
@@ -118,7 +118,7 @@ Public Class EgtMessageBoxVM
#Region "METHODS"
Friend Sub CloseWindow(DialogResult As MessageBoxResult)
Friend Sub CloseWindow(DialogResult As Boolean)
RaiseEvent OnCloseWindow(DialogResult)
End Sub