add Inbox Form

2019-03-05 16:25:33 +01:00
parent 311516fc9f
commit 4447844b9f
10 changed files with 447 additions and 59 deletions
--- a/EDMI_ClientSuite/frmMain.vb
+++ b/EDMI_ClientSuite/frmMain.vb
@@ -199,4 +199,11 @@ Public Class frmMain
        }
        frm.Show()
    End Sub
+
+    Private Sub BarButtonInbox_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonInbox.ItemClick
+        Dim oForm As New frmInbox With {
+            .MdiParent = DocumentManager.MdiParent
+        }
+        oForm.Show()
+    End Sub
 End Class