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

Version 1.0.2.0

Browse Source
This commit is contained in:
Jonathan Jenne 2020-07-02 11:36:39 +02:00
parent 36bbac5e5d
commit 30c3c907fd
3 changed files with 41 additions and 35 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
DDUserManager/DDUserManager/My Project/AssemblyInfo.vb
View File

@ -12,8 +12,8 @@ Imports System.Runtime.InteropServices
<Assembly: AssemblyDescription("")> <Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("Digital Data")> <Assembly: AssemblyCompany("Digital Data")>
<Assembly: AssemblyProduct("UserManager")> <Assembly: AssemblyProduct("UserManager")>
<Assembly: AssemblyCopyright("Copyright © 2019")> <Assembly: AssemblyCopyright("Copyright © 2020")>
<Assembly: AssemblyTrademark("")> <Assembly: AssemblyTrademark("1020")>
<Assembly: ComVisible(False)> <Assembly: ComVisible(False)>
@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.0.1.0")> <Assembly: AssemblyVersion("1.0.2.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")> <Assembly: AssemblyFileVersion("1.0.0.0")>

64
DDUserManager/DDUserManager/frmMain.Designer.vb generated
View File

@ -911,7 +911,7 @@ Partial Class frmMain
Me.SplitContainer2.Panel2.Controls.Add(Me.listClients) Me.SplitContainer2.Panel2.Controls.Add(Me.listClients)
Me.SplitContainer2.Panel2.RightToLeft = System.Windows.Forms.RightToLeft.No Me.SplitContainer2.Panel2.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.SplitContainer2.Size = New System.Drawing.Size(797, 374) Me.SplitContainer2.Size = New System.Drawing.Size(797, 374)
Me.SplitContainer2.SplitterDistance = 180 Me.SplitContainer2.SplitterDistance = 179
Me.SplitContainer2.TabIndex = 63 Me.SplitContainer2.TabIndex = 63
' '
'Label8 'Label8
@ -1506,7 +1506,7 @@ Partial Class frmMain
Me.tabClientAssign.ImageOptions.SvgImage = CType(resources.GetObject("tabClientAssign.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.tabClientAssign.ImageOptions.SvgImage = CType(resources.GetObject("tabClientAssign.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.tabClientAssign.ImageOptions.SvgImageSize = New System.Drawing.Size(20, 20) Me.tabClientAssign.ImageOptions.SvgImageSize = New System.Drawing.Size(20, 20)
Me.tabClientAssign.Name = "tabClientAssign" Me.tabClientAssign.Name = "tabClientAssign"
Me.tabClientAssign.Size = New System.Drawing.Size(1191, 352) Me.tabClientAssign.Size = New System.Drawing.Size(1195, 348)
Me.tabClientAssign.Text = "Mandanten Zuordnung" Me.tabClientAssign.Text = "Mandanten Zuordnung"
' '
'SplitContainer4 'SplitContainer4
@ -1527,8 +1527,8 @@ Partial Class frmMain
Me.SplitContainer4.Panel2.Controls.Add(Me.Panel4) Me.SplitContainer4.Panel2.Controls.Add(Me.Panel4)
Me.SplitContainer4.Panel2.Controls.Add(Me.Panel5) Me.SplitContainer4.Panel2.Controls.Add(Me.Panel5)
Me.SplitContainer4.Panel2.RightToLeft = System.Windows.Forms.RightToLeft.No Me.SplitContainer4.Panel2.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.SplitContainer4.Size = New System.Drawing.Size(1191, 352) Me.SplitContainer4.Size = New System.Drawing.Size(1195, 348)
Me.SplitContainer4.SplitterDistance = 435 Me.SplitContainer4.SplitterDistance = 436
Me.SplitContainer4.TabIndex = 0 Me.SplitContainer4.TabIndex = 0
' '
'Panel6 'Panel6
@ -1540,7 +1540,7 @@ Partial Class frmMain
Me.Panel6.Controls.Add(Me.Label7) Me.Panel6.Controls.Add(Me.Label7)
Me.Panel6.Location = New System.Drawing.Point(0, 0) Me.Panel6.Location = New System.Drawing.Point(0, 0)
Me.Panel6.Name = "Panel6" Me.Panel6.Name = "Panel6"
Me.Panel6.Size = New System.Drawing.Size(321, 352) Me.Panel6.Size = New System.Drawing.Size(322, 348)
Me.Panel6.TabIndex = 12 Me.Panel6.TabIndex = 12
' '
'gridClients_AvailableUsers 'gridClients_AvailableUsers
@ -1550,7 +1550,7 @@ Partial Class frmMain
Me.gridClients_AvailableUsers.Location = New System.Drawing.Point(0, 30) Me.gridClients_AvailableUsers.Location = New System.Drawing.Point(0, 30)
Me.gridClients_AvailableUsers.MainView = Me.viewClients_AvailableUsers Me.gridClients_AvailableUsers.MainView = Me.viewClients_AvailableUsers
Me.gridClients_AvailableUsers.Name = "gridClients_AvailableUsers" Me.gridClients_AvailableUsers.Name = "gridClients_AvailableUsers"
Me.gridClients_AvailableUsers.Size = New System.Drawing.Size(321, 322) Me.gridClients_AvailableUsers.Size = New System.Drawing.Size(322, 318)
Me.gridClients_AvailableUsers.TabIndex = 0 Me.gridClients_AvailableUsers.TabIndex = 0
Me.gridClients_AvailableUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewClients_AvailableUsers}) Me.gridClients_AvailableUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewClients_AvailableUsers})
' '
@ -1606,7 +1606,7 @@ Partial Class frmMain
Me.Label7.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label7.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label7.Location = New System.Drawing.Point(0, 0) Me.Label7.Location = New System.Drawing.Point(0, 0)
Me.Label7.Name = "Label7" Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(321, 30) Me.Label7.Size = New System.Drawing.Size(322, 30)
Me.Label7.TabIndex = 2 Me.Label7.TabIndex = 2
Me.Label7.Text = "Nicht zugeordnete Benutzer:" Me.Label7.Text = "Nicht zugeordnete Benutzer:"
Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleCenter Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@ -1616,7 +1616,7 @@ Partial Class frmMain
Me.btnClients_AddUsers.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnClients_AddUsers.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.btnClients_AddUsers.Image = Global.DDUserManager.My.Resources.Resources.arrow_right Me.btnClients_AddUsers.Image = Global.DDUserManager.My.Resources.Resources.arrow_right
Me.btnClients_AddUsers.ImageAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnClients_AddUsers.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnClients_AddUsers.Location = New System.Drawing.Point(329, 108) Me.btnClients_AddUsers.Location = New System.Drawing.Point(330, 108)
Me.btnClients_AddUsers.Name = "btnClients_AddUsers" Me.btnClients_AddUsers.Name = "btnClients_AddUsers"
Me.btnClients_AddUsers.Size = New System.Drawing.Size(103, 50) Me.btnClients_AddUsers.Size = New System.Drawing.Size(103, 50)
Me.btnClients_AddUsers.TabIndex = 11 Me.btnClients_AddUsers.TabIndex = 11
@ -1628,7 +1628,7 @@ Partial Class frmMain
Me.btnClients_RemoveUsers.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnClients_RemoveUsers.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.btnClients_RemoveUsers.Image = Global.DDUserManager.My.Resources.Resources.arrow_left_red Me.btnClients_RemoveUsers.Image = Global.DDUserManager.My.Resources.Resources.arrow_left_red
Me.btnClients_RemoveUsers.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnClients_RemoveUsers.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnClients_RemoveUsers.Location = New System.Drawing.Point(330, 164) Me.btnClients_RemoveUsers.Location = New System.Drawing.Point(331, 164)
Me.btnClients_RemoveUsers.Name = "btnClients_RemoveUsers" Me.btnClients_RemoveUsers.Name = "btnClients_RemoveUsers"
Me.btnClients_RemoveUsers.Size = New System.Drawing.Size(103, 50) Me.btnClients_RemoveUsers.Size = New System.Drawing.Size(103, 50)
Me.btnClients_RemoveUsers.TabIndex = 10 Me.btnClients_RemoveUsers.TabIndex = 10
@ -1642,7 +1642,7 @@ Partial Class frmMain
Me.Panel4.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel4.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel4.Location = New System.Drawing.Point(326, 0) Me.Panel4.Location = New System.Drawing.Point(326, 0)
Me.Panel4.Name = "Panel4" Me.Panel4.Name = "Panel4"
Me.Panel4.Size = New System.Drawing.Size(426, 352) Me.Panel4.Size = New System.Drawing.Size(429, 348)
Me.Panel4.TabIndex = 0 Me.Panel4.TabIndex = 0
' '
'gridClients_AssignedUsers 'gridClients_AssignedUsers
@ -1652,7 +1652,7 @@ Partial Class frmMain
Me.gridClients_AssignedUsers.Location = New System.Drawing.Point(0, 30) Me.gridClients_AssignedUsers.Location = New System.Drawing.Point(0, 30)
Me.gridClients_AssignedUsers.MainView = Me.viewClients_AssignedUsers Me.gridClients_AssignedUsers.MainView = Me.viewClients_AssignedUsers
Me.gridClients_AssignedUsers.Name = "gridClients_AssignedUsers" Me.gridClients_AssignedUsers.Name = "gridClients_AssignedUsers"
Me.gridClients_AssignedUsers.Size = New System.Drawing.Size(426, 322) Me.gridClients_AssignedUsers.Size = New System.Drawing.Size(429, 318)
Me.gridClients_AssignedUsers.TabIndex = 0 Me.gridClients_AssignedUsers.TabIndex = 0
Me.gridClients_AssignedUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewClients_AssignedUsers}) Me.gridClients_AssignedUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewClients_AssignedUsers})
' '
@ -1709,7 +1709,7 @@ Partial Class frmMain
Me.labelClients_AssignedUsers.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.labelClients_AssignedUsers.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.labelClients_AssignedUsers.Location = New System.Drawing.Point(0, 0) Me.labelClients_AssignedUsers.Location = New System.Drawing.Point(0, 0)
Me.labelClients_AssignedUsers.Name = "labelClients_AssignedUsers" Me.labelClients_AssignedUsers.Name = "labelClients_AssignedUsers"
Me.labelClients_AssignedUsers.Size = New System.Drawing.Size(426, 30) Me.labelClients_AssignedUsers.Size = New System.Drawing.Size(429, 30)
Me.labelClients_AssignedUsers.TabIndex = 2 Me.labelClients_AssignedUsers.TabIndex = 2
Me.labelClients_AssignedUsers.Text = "Zugeordnete Benutzer zu Mandant {0}:" Me.labelClients_AssignedUsers.Text = "Zugeordnete Benutzer zu Mandant {0}:"
Me.labelClients_AssignedUsers.TextAlign = System.Drawing.ContentAlignment.MiddleCenter Me.labelClients_AssignedUsers.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@ -1721,7 +1721,7 @@ Partial Class frmMain
Me.Panel5.Dock = System.Windows.Forms.DockStyle.Left Me.Panel5.Dock = System.Windows.Forms.DockStyle.Left
Me.Panel5.Location = New System.Drawing.Point(0, 0) Me.Panel5.Location = New System.Drawing.Point(0, 0)
Me.Panel5.Name = "Panel5" Me.Panel5.Name = "Panel5"
Me.Panel5.Size = New System.Drawing.Size(326, 352) Me.Panel5.Size = New System.Drawing.Size(326, 348)
Me.Panel5.TabIndex = 1 Me.Panel5.TabIndex = 1
' '
'gridClients_AllClients 'gridClients_AllClients
@ -1731,7 +1731,7 @@ Partial Class frmMain
Me.gridClients_AllClients.Location = New System.Drawing.Point(0, 30) Me.gridClients_AllClients.Location = New System.Drawing.Point(0, 30)
Me.gridClients_AllClients.MainView = Me.viewClients_AllClients Me.gridClients_AllClients.MainView = Me.viewClients_AllClients
Me.gridClients_AllClients.Name = "gridClients_AllClients" Me.gridClients_AllClients.Name = "gridClients_AllClients"
Me.gridClients_AllClients.Size = New System.Drawing.Size(326, 322) Me.gridClients_AllClients.Size = New System.Drawing.Size(326, 318)
Me.gridClients_AllClients.TabIndex = 0 Me.gridClients_AllClients.TabIndex = 0
Me.gridClients_AllClients.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewClients_AllClients}) Me.gridClients_AllClients.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewClients_AllClients})
' '
@ -1789,7 +1789,7 @@ Partial Class frmMain
Me.tabModuleAssign.ImageOptions.SvgImage = CType(resources.GetObject("tabModuleAssign.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.tabModuleAssign.ImageOptions.SvgImage = CType(resources.GetObject("tabModuleAssign.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.tabModuleAssign.ImageOptions.SvgImageSize = New System.Drawing.Size(20, 20) Me.tabModuleAssign.ImageOptions.SvgImageSize = New System.Drawing.Size(20, 20)
Me.tabModuleAssign.Name = "tabModuleAssign" Me.tabModuleAssign.Name = "tabModuleAssign"
Me.tabModuleAssign.Size = New System.Drawing.Size(1191, 352) Me.tabModuleAssign.Size = New System.Drawing.Size(1195, 348)
Me.tabModuleAssign.Text = "Modul Zuordnung" Me.tabModuleAssign.Text = "Modul Zuordnung"
' '
'SplitContainer6 'SplitContainer6
@ -1810,8 +1810,8 @@ Partial Class frmMain
Me.SplitContainer6.Panel2.Controls.Add(Me.Panel8) Me.SplitContainer6.Panel2.Controls.Add(Me.Panel8)
Me.SplitContainer6.Panel2.Controls.Add(Me.Panel7) Me.SplitContainer6.Panel2.Controls.Add(Me.Panel7)
Me.SplitContainer6.Panel2.RightToLeft = System.Windows.Forms.RightToLeft.No Me.SplitContainer6.Panel2.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.SplitContainer6.Size = New System.Drawing.Size(1191, 352) Me.SplitContainer6.Size = New System.Drawing.Size(1195, 348)
Me.SplitContainer6.SplitterDistance = 435 Me.SplitContainer6.SplitterDistance = 436
Me.SplitContainer6.TabIndex = 0 Me.SplitContainer6.TabIndex = 0
' '
'btnModules_AddUsers 'btnModules_AddUsers
@ -1819,7 +1819,7 @@ Partial Class frmMain
Me.btnModules_AddUsers.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnModules_AddUsers.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.btnModules_AddUsers.Image = Global.DDUserManager.My.Resources.Resources.arrow_right Me.btnModules_AddUsers.Image = Global.DDUserManager.My.Resources.Resources.arrow_right
Me.btnModules_AddUsers.ImageAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnModules_AddUsers.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnModules_AddUsers.Location = New System.Drawing.Point(329, 108) Me.btnModules_AddUsers.Location = New System.Drawing.Point(330, 108)
Me.btnModules_AddUsers.Name = "btnModules_AddUsers" Me.btnModules_AddUsers.Name = "btnModules_AddUsers"
Me.btnModules_AddUsers.Size = New System.Drawing.Size(103, 50) Me.btnModules_AddUsers.Size = New System.Drawing.Size(103, 50)
Me.btnModules_AddUsers.TabIndex = 13 Me.btnModules_AddUsers.TabIndex = 13
@ -1831,7 +1831,7 @@ Partial Class frmMain
Me.btnModules_RemoveUsers.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnModules_RemoveUsers.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.btnModules_RemoveUsers.Image = Global.DDUserManager.My.Resources.Resources.arrow_left_red Me.btnModules_RemoveUsers.Image = Global.DDUserManager.My.Resources.Resources.arrow_left_red
Me.btnModules_RemoveUsers.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnModules_RemoveUsers.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnModules_RemoveUsers.Location = New System.Drawing.Point(330, 164) Me.btnModules_RemoveUsers.Location = New System.Drawing.Point(331, 164)
Me.btnModules_RemoveUsers.Name = "btnModules_RemoveUsers" Me.btnModules_RemoveUsers.Name = "btnModules_RemoveUsers"
Me.btnModules_RemoveUsers.Size = New System.Drawing.Size(103, 50) Me.btnModules_RemoveUsers.Size = New System.Drawing.Size(103, 50)
Me.btnModules_RemoveUsers.TabIndex = 12 Me.btnModules_RemoveUsers.TabIndex = 12
@ -1847,7 +1847,7 @@ Partial Class frmMain
Me.Panel9.Controls.Add(Me.Label10) Me.Panel9.Controls.Add(Me.Label10)
Me.Panel9.Location = New System.Drawing.Point(0, 0) Me.Panel9.Location = New System.Drawing.Point(0, 0)
Me.Panel9.Name = "Panel9" Me.Panel9.Name = "Panel9"
Me.Panel9.Size = New System.Drawing.Size(321, 352) Me.Panel9.Size = New System.Drawing.Size(322, 348)
Me.Panel9.TabIndex = 9 Me.Panel9.TabIndex = 9
' '
'gridModules_AvailableUsers 'gridModules_AvailableUsers
@ -1857,7 +1857,7 @@ Partial Class frmMain
Me.gridModules_AvailableUsers.Location = New System.Drawing.Point(0, 30) Me.gridModules_AvailableUsers.Location = New System.Drawing.Point(0, 30)
Me.gridModules_AvailableUsers.MainView = Me.viewModules_AvailableUsers Me.gridModules_AvailableUsers.MainView = Me.viewModules_AvailableUsers
Me.gridModules_AvailableUsers.Name = "gridModules_AvailableUsers" Me.gridModules_AvailableUsers.Name = "gridModules_AvailableUsers"
Me.gridModules_AvailableUsers.Size = New System.Drawing.Size(321, 322) Me.gridModules_AvailableUsers.Size = New System.Drawing.Size(322, 318)
Me.gridModules_AvailableUsers.TabIndex = 6 Me.gridModules_AvailableUsers.TabIndex = 6
Me.gridModules_AvailableUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewModules_AvailableUsers, Me.GridView8}) Me.gridModules_AvailableUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewModules_AvailableUsers, Me.GridView8})
' '
@ -1919,7 +1919,7 @@ Partial Class frmMain
Me.Label10.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label10.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label10.Location = New System.Drawing.Point(0, 0) Me.Label10.Location = New System.Drawing.Point(0, 0)
Me.Label10.Name = "Label10" Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(321, 30) Me.Label10.Size = New System.Drawing.Size(322, 30)
Me.Label10.TabIndex = 8 Me.Label10.TabIndex = 8
Me.Label10.Text = "Nicht zugeordnete Benutzer:" Me.Label10.Text = "Nicht zugeordnete Benutzer:"
Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleCenter Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@ -1931,7 +1931,7 @@ Partial Class frmMain
Me.Panel8.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel8.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel8.Location = New System.Drawing.Point(326, 0) Me.Panel8.Location = New System.Drawing.Point(326, 0)
Me.Panel8.Name = "Panel8" Me.Panel8.Name = "Panel8"
Me.Panel8.Size = New System.Drawing.Size(426, 352) Me.Panel8.Size = New System.Drawing.Size(429, 348)
Me.Panel8.TabIndex = 10 Me.Panel8.TabIndex = 10
' '
'gridModules_AssignedUsers 'gridModules_AssignedUsers
@ -1941,7 +1941,7 @@ Partial Class frmMain
Me.gridModules_AssignedUsers.Location = New System.Drawing.Point(0, 30) Me.gridModules_AssignedUsers.Location = New System.Drawing.Point(0, 30)
Me.gridModules_AssignedUsers.MainView = Me.viewModules_AssignedUsers Me.gridModules_AssignedUsers.MainView = Me.viewModules_AssignedUsers
Me.gridModules_AssignedUsers.Name = "gridModules_AssignedUsers" Me.gridModules_AssignedUsers.Name = "gridModules_AssignedUsers"
Me.gridModules_AssignedUsers.Size = New System.Drawing.Size(426, 322) Me.gridModules_AssignedUsers.Size = New System.Drawing.Size(429, 318)
Me.gridModules_AssignedUsers.TabIndex = 6 Me.gridModules_AssignedUsers.TabIndex = 6
Me.gridModules_AssignedUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewModules_AssignedUsers, Me.GridView10}) Me.gridModules_AssignedUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewModules_AssignedUsers, Me.GridView10})
' '
@ -2003,7 +2003,7 @@ Partial Class frmMain
Me.labelModules_AssignedUsers.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.labelModules_AssignedUsers.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.labelModules_AssignedUsers.Location = New System.Drawing.Point(0, 0) Me.labelModules_AssignedUsers.Location = New System.Drawing.Point(0, 0)
Me.labelModules_AssignedUsers.Name = "labelModules_AssignedUsers" Me.labelModules_AssignedUsers.Name = "labelModules_AssignedUsers"
Me.labelModules_AssignedUsers.Size = New System.Drawing.Size(426, 30) Me.labelModules_AssignedUsers.Size = New System.Drawing.Size(429, 30)
Me.labelModules_AssignedUsers.TabIndex = 8 Me.labelModules_AssignedUsers.TabIndex = 8
Me.labelModules_AssignedUsers.Text = "Zugeordnete Benutzer zu Modul {0}:" Me.labelModules_AssignedUsers.Text = "Zugeordnete Benutzer zu Modul {0}:"
Me.labelModules_AssignedUsers.TextAlign = System.Drawing.ContentAlignment.MiddleCenter Me.labelModules_AssignedUsers.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@ -2015,7 +2015,7 @@ Partial Class frmMain
Me.Panel7.Dock = System.Windows.Forms.DockStyle.Left Me.Panel7.Dock = System.Windows.Forms.DockStyle.Left
Me.Panel7.Location = New System.Drawing.Point(0, 0) Me.Panel7.Location = New System.Drawing.Point(0, 0)
Me.Panel7.Name = "Panel7" Me.Panel7.Name = "Panel7"
Me.Panel7.Size = New System.Drawing.Size(326, 352) Me.Panel7.Size = New System.Drawing.Size(326, 348)
Me.Panel7.TabIndex = 9 Me.Panel7.TabIndex = 9
' '
'gridModules_AllModules 'gridModules_AllModules
@ -2025,7 +2025,7 @@ Partial Class frmMain
Me.gridModules_AllModules.Location = New System.Drawing.Point(0, 30) Me.gridModules_AllModules.Location = New System.Drawing.Point(0, 30)
Me.gridModules_AllModules.MainView = Me.viewModules_AllModules Me.gridModules_AllModules.MainView = Me.viewModules_AllModules
Me.gridModules_AllModules.Name = "gridModules_AllModules" Me.gridModules_AllModules.Name = "gridModules_AllModules"
Me.gridModules_AllModules.Size = New System.Drawing.Size(326, 322) Me.gridModules_AllModules.Size = New System.Drawing.Size(326, 318)
Me.gridModules_AllModules.TabIndex = 7 Me.gridModules_AllModules.TabIndex = 7
Me.gridModules_AllModules.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewModules_AllModules}) Me.gridModules_AllModules.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewModules_AllModules})
' '
@ -2207,7 +2207,7 @@ Partial Class frmMain
Me.tabPageGroups.ImageOptions.SvgImage = CType(resources.GetObject("tabPageGroups.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.tabPageGroups.ImageOptions.SvgImage = CType(resources.GetObject("tabPageGroups.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.tabPageGroups.ImageOptions.SvgImageSize = New System.Drawing.Size(20, 20) Me.tabPageGroups.ImageOptions.SvgImageSize = New System.Drawing.Size(20, 20)
Me.tabPageGroups.Name = "tabPageGroups" Me.tabPageGroups.Name = "tabPageGroups"
Me.tabPageGroups.Size = New System.Drawing.Size(1197, 787) Me.tabPageGroups.Size = New System.Drawing.Size(1197, 783)
Me.tabPageGroups.Text = "Gruppen" Me.tabPageGroups.Text = "Gruppen"
' '
'SplitContainer3 'SplitContainer3
@ -3028,7 +3028,7 @@ Partial Class frmMain
Me.tabPageClients.ImageOptions.SvgImage = CType(resources.GetObject("tabPageClients.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.tabPageClients.ImageOptions.SvgImage = CType(resources.GetObject("tabPageClients.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.tabPageClients.ImageOptions.SvgImageSize = New System.Drawing.Size(20, 20) Me.tabPageClients.ImageOptions.SvgImageSize = New System.Drawing.Size(20, 20)
Me.tabPageClients.Name = "tabPageClients" Me.tabPageClients.Name = "tabPageClients"
Me.tabPageClients.Size = New System.Drawing.Size(1197, 787) Me.tabPageClients.Size = New System.Drawing.Size(1197, 783)
Me.tabPageClients.Text = "Mandanten" Me.tabPageClients.Text = "Mandanten"
' '
'Panel17 'Panel17
@ -3054,7 +3054,7 @@ Partial Class frmMain
Me.Panel17.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel17.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel17.Location = New System.Drawing.Point(400, 25) Me.Panel17.Location = New System.Drawing.Point(400, 25)
Me.Panel17.Name = "Panel17" Me.Panel17.Name = "Panel17"
Me.Panel17.Size = New System.Drawing.Size(797, 762) Me.Panel17.Size = New System.Drawing.Size(797, 758)
Me.Panel17.TabIndex = 20 Me.Panel17.TabIndex = 20
' '
'Label18 'Label18
@ -3153,7 +3153,7 @@ Partial Class frmMain
Me.gridClients.Location = New System.Drawing.Point(0, 25) Me.gridClients.Location = New System.Drawing.Point(0, 25)
Me.gridClients.MainView = Me.GridView4 Me.gridClients.MainView = Me.GridView4
Me.gridClients.Name = "gridClients" Me.gridClients.Name = "gridClients"
Me.gridClients.Size = New System.Drawing.Size(400, 762) Me.gridClients.Size = New System.Drawing.Size(400, 758)
Me.gridClients.TabIndex = 19 Me.gridClients.TabIndex = 19
Me.gridClients.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView4}) Me.gridClients.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView4})
' '
@ -3536,7 +3536,7 @@ Partial Class frmMain
Me.tabPageSettings.ImageOptions.SvgImage = CType(resources.GetObject("tabPageSettings.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.tabPageSettings.ImageOptions.SvgImage = CType(resources.GetObject("tabPageSettings.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.tabPageSettings.ImageOptions.SvgImageSize = New System.Drawing.Size(20, 20) Me.tabPageSettings.ImageOptions.SvgImageSize = New System.Drawing.Size(20, 20)
Me.tabPageSettings.Name = "tabPageSettings" Me.tabPageSettings.Name = "tabPageSettings"
Me.tabPageSettings.Size = New System.Drawing.Size(1197, 787) Me.tabPageSettings.Size = New System.Drawing.Size(1197, 783)
Me.tabPageSettings.Text = "Einstellungen" Me.tabPageSettings.Text = "Einstellungen"
' '
'Button2 'Button2

6
DDUserManager/DDUserManager/frmMain.vb
View File

@ -26,7 +26,12 @@ Public Class frmMain
MyLogConfig = New LogConfig(LogConfig.PathType.AppData, Nothing, Nothing, Application.CompanyName, Application.ProductName) MyLogConfig = New LogConfig(LogConfig.PathType.AppData, Nothing, Nothing, Application.CompanyName, Application.ProductName)
MyLogger = MyLogConfig.GetLogger() MyLogger = MyLogConfig.GetLogger()
MyConfig = New ConfigManager(Of UserConfig)(MyLogConfig, Application.CommonAppDataPath, Application.CommonAppDataPath) MyConfig = New ConfigManager(Of UserConfig)(MyLogConfig, Application.CommonAppDataPath, Application.CommonAppDataPath)
Catch ex As Exception
MsgBox($"Unexpected error while setting up logging! Exiting.{vbNewLine}{vbNewLine}Message:{ex.Message}{vbNewLine}Stacktrace:{vbNewLine}{ex.StackTrace}", MsgBoxStyle.Critical, Text)
Application.Exit()
End Try
Try
LoadConfig(MyConfig) LoadConfig(MyConfig)
CurrentVersion = Assembly.GetEntryAssembly().GetName().Version.ToString() CurrentVersion = Assembly.GetEntryAssembly().GetName().Version.ToString()
@ -126,6 +131,7 @@ Public Class frmMain
Catch ex As Exception Catch ex As Exception
MsgBox("Unexpected Error while loading. Please check the log.", MsgBoxStyle.Critical, "User Manager") MsgBox("Unexpected Error while loading. Please check the log.", MsgBoxStyle.Critical, "User Manager")
MyLogger.Error(ex, "Unexpected Error while loading.") MyLogger.Error(ex, "Unexpected Error while loading.")
Application.ExitThread()
End Try End Try
End Sub End Sub