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

ZooFlow: Admin

Browse Source
This commit is contained in:
Jonathan Jenne
2021-03-08 16:29:51 +01:00
parent 6b814b9089
commit 36336cd00b
9 changed files with 461 additions and 272 deletions
Download Patch File Download Diff File Expand all files Collapse all files

142
GUIs.ZooFlow/Administration/frmAdmin_Start.Designer.vb generated
View File

@@ -29,7 +29,6 @@ Partial Class frmAdmin_Start
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAdmin_Start))
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem5 = New DevExpress.XtraBars.BarButtonItem()
@@ -41,6 +40,7 @@ Partial Class frmAdmin_Start
Me.BarButtonItem7 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem8 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem9 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem10 = New DevExpress.XtraBars.BarButtonItem()
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPage_IDB = New DevExpress.XtraBars.Ribbon.RibbonPage()
@@ -71,22 +71,23 @@ Partial Class frmAdmin_Start
Me.XtraTabPage_IDB = New DevExpress.XtraTab.XtraTabPage()
Me.XtraTabControlIDB = New DevExpress.XtraTab.XtraTabControl()
Me.XtraTabPageIDB_Attributes_New = New DevExpress.XtraTab.XtraTabPage()
Me.TreeListIDBAttributes = New DevExpress.XtraTreeList.TreeList()
Me.TreeList_IDBAttributes = New DevExpress.XtraTreeList.TreeList()
Me.IDBImages = New DevExpress.Utils.SvgImageCollection(Me.components)
Me.XtraTabPageIDB_Entities = New DevExpress.XtraTab.XtraTabPage()
Me.TreeListIDBEntities = New DevExpress.XtraTreeList.TreeList()
Me.TreeList_IDBEntities = New DevExpress.XtraTreeList.TreeList()
Me.XtraTabPage_GlobalIndexer = New DevExpress.XtraTab.XtraTabPage()
Me.TreeListGLOBIXProfiles = New DevExpress.XtraTreeList.TreeList()
Me.TreeList_GLOBIXProfiles = New DevExpress.XtraTreeList.TreeList()
Me.GLOBIXImages = New DevExpress.Utils.SvgImageCollection(Me.components)
Me.XtraTabPage_ClipboardWatcher = New DevExpress.XtraTab.XtraTabPage()
Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
Me.XtraTabPageCWProfiles = New DevExpress.XtraTab.XtraTabPage()
Me.TreeListCWProfiles = New DevExpress.XtraTreeList.TreeList()
Me.TreeList_CWProfiles = New DevExpress.XtraTreeList.TreeList()
Me.CWImages = New DevExpress.Utils.SvgImageCollection(Me.components)
Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
Me.XtraTabControl = New DevExpress.XtraTab.XtraTabControl()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.labelTitle = New System.Windows.Forms.Label()
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TreeListMenu, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.MainTreeImages, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -100,18 +101,18 @@ Partial Class frmAdmin_Start
CType(Me.XtraTabControlIDB, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControlIDB.SuspendLayout()
Me.XtraTabPageIDB_Attributes_New.SuspendLayout()
CType(Me.TreeListIDBAttributes, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TreeList_IDBAttributes, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.IDBImages, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabPageIDB_Entities.SuspendLayout()
CType(Me.TreeListIDBEntities, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TreeList_IDBEntities, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabPage_GlobalIndexer.SuspendLayout()
CType(Me.TreeListGLOBIXProfiles, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TreeList_GLOBIXProfiles, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GLOBIXImages, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabPage_ClipboardWatcher.SuspendLayout()
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControl1.SuspendLayout()
Me.XtraTabPageCWProfiles.SuspendLayout()
CType(Me.TreeListCWProfiles, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TreeList_CWProfiles, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.CWImages, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XtraTabControl, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControl.SuspendLayout()
@@ -121,9 +122,9 @@ Partial Class frmAdmin_Start
'RibbonControl1
'
Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.labelStatus, Me.labelError, Me.BarButtonItemAddAttribute, Me.BarButtonItemRefreshAttribute, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItem8, Me.BarButtonItem9})
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.labelStatus, Me.labelError, Me.BarButtonItemAddAttribute, Me.BarButtonItemRefreshAttribute, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItem8, Me.BarButtonItem9, Me.BarButtonItem10})
Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
Me.RibbonControl1.MaxItemId = 15
Me.RibbonControl1.MaxItemId = 16
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1, Me.RibbonPage_IDB, Me.RibbonPage_ClipboardWatcher, Me.RibbonPage_GlobalIndexer})
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
@@ -139,13 +140,6 @@ Partial Class frmAdmin_Start
Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarButtonItem1.Name = "BarButtonItem1"
'
'BarButtonItem2
'
Me.BarButtonItem2.Caption = "Speichern"
Me.BarButtonItem2.Id = 2
Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarButtonItem2.Name = "BarButtonItem2"
'
'BarButtonItem3
'
Me.BarButtonItem3.Caption = "Aktualisieren"
@@ -190,7 +184,7 @@ Partial Class frmAdmin_Start
'
'BarButtonItemAddAttribute
'
Me.BarButtonItemAddAttribute.Caption = "Hinzufügen"
Me.BarButtonItemAddAttribute.Caption = "Neues Attribut"
Me.BarButtonItemAddAttribute.Id = 9
Me.BarButtonItemAddAttribute.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.actions_addcircled1
Me.BarButtonItemAddAttribute.Name = "BarButtonItemAddAttribute"
@@ -232,6 +226,14 @@ Partial Class frmAdmin_Start
Me.BarButtonItem9.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.updatedataextract
Me.BarButtonItem9.Name = "BarButtonItem9"
'
'BarButtonItem10
'
Me.BarButtonItem10.Caption = "Bearbeiten"
Me.BarButtonItem10.Id = 15
Me.BarButtonItem10.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.actions_edit1
Me.BarButtonItem10.Name = "BarButtonItem10"
Me.BarButtonItem10.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large
'
'RibbonPage1
'
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup2})
@@ -270,10 +272,10 @@ Partial Class frmAdmin_Start
'RibbonGroup_ClipboardWatcher_Profile
'
Me.RibbonGroup_ClipboardWatcher_Profile.ItemLinks.Add(Me.BarButtonItem1)
Me.RibbonGroup_ClipboardWatcher_Profile.ItemLinks.Add(Me.BarButtonItem2)
Me.RibbonGroup_ClipboardWatcher_Profile.ItemLinks.Add(Me.BarButtonItem10)
Me.RibbonGroup_ClipboardWatcher_Profile.ItemLinks.Add(Me.BarButtonItem5)
Me.RibbonGroup_ClipboardWatcher_Profile.ItemLinks.Add(Me.BarButtonItem3)
Me.RibbonGroup_ClipboardWatcher_Profile.ItemLinks.Add(Me.BarButtonItem4)
Me.RibbonGroup_ClipboardWatcher_Profile.ItemLinks.Add(Me.BarButtonItem5)
Me.RibbonGroup_ClipboardWatcher_Profile.Name = "RibbonGroup_ClipboardWatcher_Profile"
Me.RibbonGroup_ClipboardWatcher_Profile.Text = "Profil-Verwaltung"
'
@@ -448,20 +450,20 @@ Partial Class frmAdmin_Start
'
'XtraTabPageIDB_Attributes_New
'
Me.XtraTabPageIDB_Attributes_New.Controls.Add(Me.TreeListIDBAttributes)
Me.XtraTabPageIDB_Attributes_New.Controls.Add(Me.TreeList_IDBAttributes)
Me.XtraTabPageIDB_Attributes_New.Name = "XtraTabPageIDB_Attributes_New"
Me.XtraTabPageIDB_Attributes_New.Size = New System.Drawing.Size(1124, 478)
Me.XtraTabPageIDB_Attributes_New.Text = "Attribute"
'
'TreeListIDBAttributes
'
Me.TreeListIDBAttributes.Dock = System.Windows.Forms.DockStyle.Fill
Me.TreeListIDBAttributes.Location = New System.Drawing.Point(0, 0)
Me.TreeListIDBAttributes.MenuManager = Me.RibbonControl1
Me.TreeListIDBAttributes.Name = "TreeListIDBAttributes"
Me.TreeListIDBAttributes.Size = New System.Drawing.Size(1124, 478)
Me.TreeListIDBAttributes.StateImageList = Me.IDBImages
Me.TreeListIDBAttributes.TabIndex = 0
Me.TreeList_IDBAttributes.Dock = System.Windows.Forms.DockStyle.Fill
Me.TreeList_IDBAttributes.Location = New System.Drawing.Point(0, 0)
Me.TreeList_IDBAttributes.MenuManager = Me.RibbonControl1
Me.TreeList_IDBAttributes.Name = "TreeListIDBAttributes"
Me.TreeList_IDBAttributes.Size = New System.Drawing.Size(1124, 478)
Me.TreeList_IDBAttributes.StateImageList = Me.IDBImages
Me.TreeList_IDBAttributes.TabIndex = 0
'
'IDBImages
'
@@ -470,24 +472,24 @@ Partial Class frmAdmin_Start
'
'XtraTabPageIDB_Entities
'
Me.XtraTabPageIDB_Entities.Controls.Add(Me.TreeListIDBEntities)
Me.XtraTabPageIDB_Entities.Controls.Add(Me.TreeList_IDBEntities)
Me.XtraTabPageIDB_Entities.Name = "XtraTabPageIDB_Entities"
Me.XtraTabPageIDB_Entities.Size = New System.Drawing.Size(1124, 478)
Me.XtraTabPageIDB_Entities.Text = "Entitäten"
'
'TreeListIDBEntities
'
Me.TreeListIDBEntities.Dock = System.Windows.Forms.DockStyle.Fill
Me.TreeListIDBEntities.Location = New System.Drawing.Point(0, 0)
Me.TreeListIDBEntities.MenuManager = Me.RibbonControl1
Me.TreeListIDBEntities.Name = "TreeListIDBEntities"
Me.TreeListIDBEntities.Size = New System.Drawing.Size(1124, 478)
Me.TreeListIDBEntities.StateImageList = Me.IDBImages
Me.TreeListIDBEntities.TabIndex = 0
Me.TreeList_IDBEntities.Dock = System.Windows.Forms.DockStyle.Fill
Me.TreeList_IDBEntities.Location = New System.Drawing.Point(0, 0)
Me.TreeList_IDBEntities.MenuManager = Me.RibbonControl1
Me.TreeList_IDBEntities.Name = "TreeListIDBEntities"
Me.TreeList_IDBEntities.Size = New System.Drawing.Size(1124, 478)
Me.TreeList_IDBEntities.StateImageList = Me.IDBImages
Me.TreeList_IDBEntities.TabIndex = 0
'
'XtraTabPage_GlobalIndexer
'
Me.XtraTabPage_GlobalIndexer.Controls.Add(Me.TreeListGLOBIXProfiles)
Me.XtraTabPage_GlobalIndexer.Controls.Add(Me.TreeList_GLOBIXProfiles)
Me.XtraTabPage_GlobalIndexer.Name = "XtraTabPage_GlobalIndexer"
Me.XtraTabPage_GlobalIndexer.PageVisible = False
Me.XtraTabPage_GlobalIndexer.Size = New System.Drawing.Size(1126, 501)
@@ -495,14 +497,14 @@ Partial Class frmAdmin_Start
'
'TreeListGLOBIXProfiles
'
Me.TreeListGLOBIXProfiles.Dock = System.Windows.Forms.DockStyle.Fill
Me.TreeListGLOBIXProfiles.Location = New System.Drawing.Point(0, 0)
Me.TreeListGLOBIXProfiles.MenuManager = Me.RibbonControl1
Me.TreeListGLOBIXProfiles.Name = "TreeListGLOBIXProfiles"
Me.TreeListGLOBIXProfiles.PreviewFieldName = "Title"
Me.TreeListGLOBIXProfiles.Size = New System.Drawing.Size(1126, 501)
Me.TreeListGLOBIXProfiles.StateImageList = Me.GLOBIXImages
Me.TreeListGLOBIXProfiles.TabIndex = 0
Me.TreeList_GLOBIXProfiles.Dock = System.Windows.Forms.DockStyle.Fill
Me.TreeList_GLOBIXProfiles.Location = New System.Drawing.Point(0, 0)
Me.TreeList_GLOBIXProfiles.MenuManager = Me.RibbonControl1
Me.TreeList_GLOBIXProfiles.Name = "TreeListGLOBIXProfiles"
Me.TreeList_GLOBIXProfiles.PreviewFieldName = "Title"
Me.TreeList_GLOBIXProfiles.Size = New System.Drawing.Size(1126, 501)
Me.TreeList_GLOBIXProfiles.StateImageList = Me.GLOBIXImages
Me.TreeList_GLOBIXProfiles.TabIndex = 0
'
'GLOBIXImages
'
@@ -530,23 +532,23 @@ Partial Class frmAdmin_Start
'
'XtraTabPageCWProfiles
'
Me.XtraTabPageCWProfiles.Controls.Add(Me.TreeListCWProfiles)
Me.XtraTabPageCWProfiles.Controls.Add(Me.TreeList_CWProfiles)
Me.XtraTabPageCWProfiles.Name = "XtraTabPageCWProfiles"
Me.XtraTabPageCWProfiles.Size = New System.Drawing.Size(1124, 478)
Me.XtraTabPageCWProfiles.Text = "Profile"
'
'TreeListCWProfiles
'
Me.TreeListCWProfiles.Dock = System.Windows.Forms.DockStyle.Fill
Me.TreeListCWProfiles.KeyFieldName = ""
Me.TreeListCWProfiles.Location = New System.Drawing.Point(0, 0)
Me.TreeListCWProfiles.MenuManager = Me.RibbonControl1
Me.TreeListCWProfiles.Name = "TreeListCWProfiles"
Me.TreeListCWProfiles.OptionsView.ShowIndentAsRowStyle = True
Me.TreeListCWProfiles.ParentFieldName = ""
Me.TreeListCWProfiles.Size = New System.Drawing.Size(1124, 478)
Me.TreeListCWProfiles.StateImageList = Me.CWImages
Me.TreeListCWProfiles.TabIndex = 2
Me.TreeList_CWProfiles.Dock = System.Windows.Forms.DockStyle.Fill
Me.TreeList_CWProfiles.KeyFieldName = ""
Me.TreeList_CWProfiles.Location = New System.Drawing.Point(0, 0)
Me.TreeList_CWProfiles.MenuManager = Me.RibbonControl1
Me.TreeList_CWProfiles.Name = "TreeListCWProfiles"
Me.TreeList_CWProfiles.OptionsView.ShowIndentAsRowStyle = True
Me.TreeList_CWProfiles.ParentFieldName = ""
Me.TreeList_CWProfiles.Size = New System.Drawing.Size(1124, 478)
Me.TreeList_CWProfiles.StateImageList = Me.CWImages
Me.TreeList_CWProfiles.TabIndex = 2
'
'CWImages
'
@@ -593,6 +595,13 @@ Partial Class frmAdmin_Start
Me.labelTitle.Text = "labelTitle"
Me.labelTitle.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
'
'BarButtonItem2
'
Me.BarButtonItem2.Caption = "Speichern"
Me.BarButtonItem2.Id = 2
Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarButtonItem2.Name = "BarButtonItem2"
'
'frmAdmin_Start
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -621,18 +630,18 @@ Partial Class frmAdmin_Start
CType(Me.XtraTabControlIDB, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabControlIDB.ResumeLayout(False)
Me.XtraTabPageIDB_Attributes_New.ResumeLayout(False)
CType(Me.TreeListIDBAttributes, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TreeList_IDBAttributes, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.IDBImages, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabPageIDB_Entities.ResumeLayout(False)
CType(Me.TreeListIDBEntities, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TreeList_IDBEntities, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabPage_GlobalIndexer.ResumeLayout(False)
CType(Me.TreeListGLOBIXProfiles, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TreeList_GLOBIXProfiles, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GLOBIXImages, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabPage_ClipboardWatcher.ResumeLayout(False)
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabControl1.ResumeLayout(False)
Me.XtraTabPageCWProfiles.ResumeLayout(False)
CType(Me.TreeListCWProfiles, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TreeList_CWProfiles, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.CWImages, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XtraTabControl, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabControl.ResumeLayout(False)
@@ -656,7 +665,6 @@ Partial Class frmAdmin_Start
Friend WithEvents RibbonGroup_ClipboardWatcher_Window As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonGroup_ClipboardWatcher_Control As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem4 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem5 As DevExpress.XtraBars.BarButtonItem
@@ -696,13 +704,15 @@ Partial Class frmAdmin_Start
Friend WithEvents XtraTabPageCWProfiles As DevExpress.XtraTab.XtraTabPage
Friend WithEvents XtraTabPage2 As DevExpress.XtraTab.XtraTabPage
Friend WithEvents CWImages As DevExpress.Utils.SvgImageCollection
Friend WithEvents TreeListGLOBIXProfiles As DevExpress.XtraTreeList.TreeList
Friend WithEvents TreeList_GLOBIXProfiles As DevExpress.XtraTreeList.TreeList
Friend WithEvents GLOBIXImages As DevExpress.Utils.SvgImageCollection
Friend WithEvents TreeListCWProfiles As DevExpress.XtraTreeList.TreeList
Friend WithEvents TreeList_CWProfiles As DevExpress.XtraTreeList.TreeList
Friend WithEvents Panel1 As Panel
Friend WithEvents labelTitle As Label
Friend WithEvents TreeListIDBAttributes As DevExpress.XtraTreeList.TreeList
Friend WithEvents TreeList_IDBAttributes As DevExpress.XtraTreeList.TreeList
Friend WithEvents XtraTabPageIDB_Entities As DevExpress.XtraTab.XtraTabPage
Friend WithEvents TreeListIDBEntities As DevExpress.XtraTreeList.TreeList
Friend WithEvents TreeList_IDBEntities As DevExpress.XtraTreeList.TreeList
Friend WithEvents IDBImages As DevExpress.Utils.SvgImageCollection
Friend WithEvents BarButtonItem10 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
End Class