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

MS admin

Browse Source
This commit is contained in:
SchreiberM
2022-03-09 09:49:54 +01:00
parent 41b0cd535c
commit 8d4f327d96
13 changed files with 1840 additions and 127 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
GUIs.ZooFlow/Administration/ClassDetailForm.vb
View File

@@ -12,7 +12,7 @@ Public Class ClassDetailForm
Public ReadOnly Property DetailSettingsList As New Dictionary(Of String, DetailSettings) From {
{PAGE_IDB_ATTRIBUTES, New DetailSettings With {
.GridTitle = "Attribute", ' This will be shown above the Data Grid
.NewRecordTitle = "Neues Attribut", ' This will be shown on the "New" Button
.NewRecordTitle = "New Attribute", ' This will be shown on the "New" Button
.[Module] = MODULE_IDB,
.Entity = PAGE_IDB_ATTRIBUTES ' This Key will be matched with the Entity Id from the Database
}},
@@ -36,13 +36,13 @@ Public Class ClassDetailForm
}},
{PAGE_GI_PROFILES, New DetailSettings With {
.GridTitle = "Global Indexer Profile",
.NewRecordTitle = "New GLOBIX profile",
.NewRecordTitle = "New Globix profile",
.[Module] = MODULE_GI,
.Entity = PAGE_GI_PROFILES
}},
{PAGE_CW_PROFILES, New DetailSettings With {
.GridTitle = "Clipboard Watcher Profile",
.NewRecordTitle = "New CW profile",
.NewRecordTitle = "New Clipwatcher profile",
.[Module] = MODULE_CW,
.Entity = PAGE_CW_PROFILES
}},
@@ -73,14 +73,14 @@ Public Class ClassDetailForm
.Entity = PAGE_IDB_DOCTYPE_BE
}},
{PAGE_USERS_USERLIST, New DetailSettings With {
.GridTitle = "Benutzer Übersicht",
.NewRecordTitle = "Neuer Benutzer",
.GridTitle = "User Overview",
.NewRecordTitle = "New User",
.[Module] = MODULE_USERS,
.Entity = PAGE_USERS_USERLIST
}},
{PAGE_USERS_GROUPLIST, New DetailSettings With {
.GridTitle = "Gruppen Übersicht",
.NewRecordTitle = "Neue Gruppe",
.GridTitle = "Group Overview",
.NewRecordTitle = "New Group",
.[Module] = MODULE_USERS,
.Entity = PAGE_USERS_GROUPLIST
}},
@@ -179,7 +179,7 @@ Public Class ClassDetailForm
oForm.ShowDialog()
Return True
Case PAGE_IDB_DOCTYPE_BE
Dim oForm As New frmAdmin_Doctype(0)
Dim oForm As New frmAdmin_DoctypeBE()
oForm.ShowDialog()
Return True