Add Common Queries, Load User & Module Info from DB

This commit is contained in:
Jonathan Jenne
2019-09-10 16:27:31 +02:00
parent 5c7375d124
commit 13da64c6ad
22 changed files with 598 additions and 102 deletions

View File

@@ -24,35 +24,68 @@
''' the contents of this method with the code editor.
''' </summary>
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMain))
Me.components = New System.ComponentModel.Container()
Dim SplashScreenManager As DevExpress.XtraSplashScreen.SplashScreenManager = New DevExpress.XtraSplashScreen.SplashScreenManager(Me, GetType(Global.ZooFlow.frmSplash), True, True)
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMain))
Me.ribbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.ApplicationMenu = New DevExpress.XtraBars.Ribbon.ApplicationMenu(Me.components)
Me.ButtonSettings = New DevExpress.XtraBars.BarButtonItem()
Me.ButtonExit = New DevExpress.XtraBars.BarButtonItem()
Me.ribbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.ribbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.NotifyIconMain = New System.Windows.Forms.NotifyIcon()
Me.ContextMenuStripMain = New System.Windows.Forms.ContextMenuStrip()
Me.NotifyIconMain = New System.Windows.Forms.NotifyIcon(Me.components)
Me.ContextMenuStripMain = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.AnzeigenVersteckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.AdministrationToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
Me.BeendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToastNotificationsManager = New DevExpress.XtraBars.ToastNotifications.ToastNotificationsManager()
Me.ToastNotificationsManager = New DevExpress.XtraBars.ToastNotifications.ToastNotificationsManager(Me.components)
Me.SkinDropDownButtonItem1 = New DevExpress.XtraBars.SkinDropDownButtonItem()
CType(Me.ribbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ApplicationMenu, System.ComponentModel.ISupportInitialize).BeginInit()
Me.ContextMenuStripMain.SuspendLayout()
CType(Me.ToastNotificationsManager, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'SplashScreenManager
'
SplashScreenManager.ClosingDelay = 500
'
'ribbonControl1
'
Me.ribbonControl1.ApplicationButtonDropDownControl = Me.ApplicationMenu
Me.ribbonControl1.ExpandCollapseItem.Id = 0
Me.ribbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.ribbonControl1.ExpandCollapseItem})
Me.ribbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.ribbonControl1.ExpandCollapseItem, Me.ButtonSettings, Me.ButtonExit, Me.SkinDropDownButtonItem1})
Me.ribbonControl1.Location = New System.Drawing.Point(0, 0)
Me.ribbonControl1.MaxItemId = 1
Me.ribbonControl1.MaxItemId = 4
Me.ribbonControl1.Name = "ribbonControl1"
Me.ribbonControl1.PageHeaderItemLinks.Add(Me.SkinDropDownButtonItem1)
Me.ribbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.ribbonPage1})
Me.ribbonControl1.Size = New System.Drawing.Size(906, 143)
'
'ApplicationMenu
'
Me.ApplicationMenu.ItemLinks.Add(Me.ButtonSettings)
Me.ApplicationMenu.ItemLinks.Add(Me.ButtonExit)
Me.ApplicationMenu.Name = "ApplicationMenu"
Me.ApplicationMenu.Ribbon = Me.ribbonControl1
'
'ButtonSettings
'
Me.ButtonSettings.Caption = "Einstellungen"
Me.ButtonSettings.Id = 1
Me.ButtonSettings.ImageOptions.Image = CType(resources.GetObject("BarButtonItem1.ImageOptions.Image"), System.Drawing.Image)
Me.ButtonSettings.Name = "ButtonSettings"
'
'ButtonExit
'
Me.ButtonExit.Caption = "Beenden"
Me.ButtonExit.Id = 2
Me.ButtonExit.ImageOptions.Image = CType(resources.GetObject("BarButtonItem2.ImageOptions.Image"), System.Drawing.Image)
Me.ButtonExit.Name = "ButtonExit"
'
'ribbonPage1
'
Me.ribbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.ribbonPageGroup1})
@@ -119,9 +152,10 @@
"ncididunt ut labore et dolore magna aliqua.", "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor i" &
"ncididunt ut labore et dolore magna aliqua.", DevExpress.XtraBars.ToastNotifications.ToastNotificationTemplate.Text01)})
'
'SplashScreenManager
'SkinDropDownButtonItem1
'
SplashScreenManager.ClosingDelay = 500
Me.SkinDropDownButtonItem1.Id = 3
Me.SkinDropDownButtonItem1.Name = "SkinDropDownButtonItem1"
'
'frmMain
'
@@ -133,6 +167,7 @@
Me.Ribbon = Me.ribbonControl1
Me.Text = "Zoo Flow"
CType(Me.ribbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ApplicationMenu, System.ComponentModel.ISupportInitialize).EndInit()
Me.ContextMenuStripMain.ResumeLayout(False)
CType(Me.ToastNotificationsManager, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
@@ -154,4 +189,8 @@
Friend WithEvents BeendenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents AnzeigenVersteckenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents ToastNotificationsManager As DevExpress.XtraBars.ToastNotifications.ToastNotificationsManager
Friend WithEvents ApplicationMenu As DevExpress.XtraBars.Ribbon.ApplicationMenu
Friend WithEvents ButtonSettings As DevExpress.XtraBars.BarButtonItem
Friend WithEvents ButtonExit As DevExpress.XtraBars.BarButtonItem
Friend WithEvents SkinDropDownButtonItem1 As DevExpress.XtraBars.SkinDropDownButtonItem
End Class