Work on Editor

This commit is contained in:
Jonathan Jenne
2019-03-28 16:24:17 +01:00
parent 0eb1eeb287
commit 05f5e730e1
25 changed files with 503 additions and 198 deletions

View File

@@ -1,4 +1,6 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Imports DigitalData.GUIs.ClientSuite.Base
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class frmFormDesigner
Inherits BaseRibbonForm
@@ -21,10 +23,11 @@ Partial Class frmFormDesigner
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmFormDesigner))
Me.RibbonControl = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.FormDesignerRibbon = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.BarCheckEditLayout = New DevExpress.XtraBars.BarCheckItem()
Me.BarCheckEditControls = New DevExpress.XtraBars.BarCheckItem()
Me.RibbonPageCategory1 = New DevExpress.XtraBars.Ribbon.RibbonPageCategory()
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageFormDesigner = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonStatusBar = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.LayoutControlMain = New DevExpress.XtraLayout.LayoutControl()
@@ -37,16 +40,16 @@ Partial Class frmFormDesigner
Me.ToolboxItemCombobox = New DevExpress.XtraToolbox.ToolboxItem()
Me.ToolboxItemCheckbox = New DevExpress.XtraToolbox.ToolboxItem()
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
Me.XtraTabControlMain = New DevExpress.XtraTab.XtraTabControl()
Me.XtraTabPageControls = New DevExpress.XtraTab.XtraTabPage()
Me.XtraTabPageProperties = New DevExpress.XtraTab.XtraTabPage()
Me.PropertyGridControlMain = New DevExpress.XtraVerticalGrid.PropertyGridControl()
Me.SplitContainerMain = New DevExpress.XtraEditors.SplitContainerControl()
CType(Me.RibbonControl, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.FormDesignerRibbon, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlMain, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlGroupMain, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControl1.SuspendLayout()
CType(Me.XtraTabControlMain, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControlMain.SuspendLayout()
Me.XtraTabPageControls.SuspendLayout()
Me.XtraTabPageProperties.SuspendLayout()
CType(Me.PropertyGridControlMain, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -54,39 +57,56 @@ Partial Class frmFormDesigner
Me.SplitContainerMain.SuspendLayout()
Me.SuspendLayout()
'
'RibbonControl
'FormDesignerRibbon
'
Me.RibbonControl.ExpandCollapseItem.Id = 0
Me.RibbonControl.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl.ExpandCollapseItem, Me.BarCheckEditLayout})
Me.RibbonControl.Location = New System.Drawing.Point(0, 0)
Me.RibbonControl.MaxItemId = 4
Me.RibbonControl.Name = "RibbonControl"
Me.RibbonControl.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.RibbonPageCategory1})
Me.RibbonControl.Size = New System.Drawing.Size(870, 146)
Me.RibbonControl.StatusBar = Me.RibbonStatusBar
Me.FormDesignerRibbon.ExpandCollapseItem.Id = 0
Me.FormDesignerRibbon.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.FormDesignerRibbon.ExpandCollapseItem, Me.BarCheckEditLayout, Me.BarCheckEditControls})
Me.FormDesignerRibbon.Location = New System.Drawing.Point(0, 0)
Me.FormDesignerRibbon.MaxItemId = 6
Me.FormDesignerRibbon.MdiMergeStyle = DevExpress.XtraBars.Ribbon.RibbonMdiMergeStyle.Always
Me.FormDesignerRibbon.Name = "FormDesignerRibbon"
Me.FormDesignerRibbon.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.RibbonPageCategory1})
Me.FormDesignerRibbon.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
Me.FormDesignerRibbon.Size = New System.Drawing.Size(870, 146)
Me.FormDesignerRibbon.StatusBar = Me.RibbonStatusBar
'
'BarCheckEditLayout
'
Me.BarCheckEditLayout.Caption = "Layout bearbeiten"
Me.BarCheckEditLayout.CheckStyle = DevExpress.XtraBars.BarCheckStyles.Radio
Me.BarCheckEditLayout.GroupIndex = 1
Me.BarCheckEditLayout.Id = 3
Me.BarCheckEditLayout.ImageOptions.Image = CType(resources.GetObject("BarCheckEditLayout.ImageOptions.Image"), System.Drawing.Image)
Me.BarCheckEditLayout.ImageOptions.LargeImage = CType(resources.GetObject("BarCheckEditLayout.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarCheckEditLayout.Name = "BarCheckEditLayout"
'
'BarCheckEditControls
'
Me.BarCheckEditControls.BindableChecked = True
Me.BarCheckEditControls.Caption = "Elemente bearbeiten"
Me.BarCheckEditControls.Checked = True
Me.BarCheckEditControls.CheckStyle = DevExpress.XtraBars.BarCheckStyles.Radio
Me.BarCheckEditControls.GroupIndex = 1
Me.BarCheckEditControls.Id = 5
Me.BarCheckEditControls.ImageOptions.Image = CType(resources.GetObject("BarCheckEditControls.ImageOptions.Image"), System.Drawing.Image)
Me.BarCheckEditControls.ImageOptions.LargeImage = CType(resources.GetObject("BarCheckEditControls.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarCheckEditControls.Name = "BarCheckEditControls"
'
'RibbonPageCategory1
'
Me.RibbonPageCategory1.Name = "RibbonPageCategory1"
Me.RibbonPageCategory1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage2})
Me.RibbonPageCategory1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPageFormDesigner})
Me.RibbonPageCategory1.Text = "Form Designer"
'
'RibbonPage2
'RibbonPageFormDesigner
'
Me.RibbonPage2.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup2})
Me.RibbonPage2.Name = "RibbonPage2"
Me.RibbonPage2.Text = "Allgemein"
Me.RibbonPageFormDesigner.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup2})
Me.RibbonPageFormDesigner.Name = "RibbonPageFormDesigner"
Me.RibbonPageFormDesigner.Text = "Allgemein"
'
'RibbonPageGroup2
'
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarCheckEditControls)
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarCheckEditLayout)
Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
Me.RibbonPageGroup2.Text = "RibbonPageGroup2"
@@ -95,11 +115,12 @@ Partial Class frmFormDesigner
'
Me.RibbonStatusBar.Location = New System.Drawing.Point(0, 508)
Me.RibbonStatusBar.Name = "RibbonStatusBar"
Me.RibbonStatusBar.Ribbon = Me.RibbonControl
Me.RibbonStatusBar.Ribbon = Me.FormDesignerRibbon
Me.RibbonStatusBar.Size = New System.Drawing.Size(870, 21)
'
'LayoutControlMain
'
Me.LayoutControlMain.AllowCustomization = False
Me.LayoutControlMain.AllowDrop = True
Me.LayoutControlMain.BackColor = System.Drawing.Color.Transparent
Me.LayoutControlMain.Dock = System.Windows.Forms.DockStyle.Fill
@@ -110,7 +131,7 @@ Partial Class frmFormDesigner
Me.LayoutControlMain.OptionsCustomizationForm.ShowLoadButton = False
Me.LayoutControlMain.OptionsCustomizationForm.ShowSaveButton = False
Me.LayoutControlMain.Root = Me.LayoutControlGroupMain
Me.LayoutControlMain.Size = New System.Drawing.Size(624, 362)
Me.LayoutControlMain.Size = New System.Drawing.Size(655, 362)
Me.LayoutControlMain.TabIndex = 2
Me.LayoutControlMain.Text = "LayoutControl1"
'
@@ -119,7 +140,7 @@ Partial Class frmFormDesigner
Me.LayoutControlGroupMain.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.LayoutControlGroupMain.GroupBordersVisible = False
Me.LayoutControlGroupMain.Name = "Root"
Me.LayoutControlGroupMain.Size = New System.Drawing.Size(624, 362)
Me.LayoutControlGroupMain.Size = New System.Drawing.Size(655, 362)
Me.LayoutControlGroupMain.TextVisible = False
'
'ToolboxControlMain
@@ -134,7 +155,7 @@ Partial Class frmFormDesigner
Me.ToolboxControlMain.OptionsView.ShowToolboxCaption = True
Me.ToolboxControlMain.SelectedGroup = Me.ToolboxGroupMain
Me.ToolboxControlMain.SelectedGroupIndex = 0
Me.ToolboxControlMain.Size = New System.Drawing.Size(232, 337)
Me.ToolboxControlMain.Size = New System.Drawing.Size(201, 337)
Me.ToolboxControlMain.TabIndex = 4
Me.ToolboxControlMain.Text = "Form Controls"
'
@@ -194,37 +215,39 @@ Partial Class frmFormDesigner
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
'
'XtraTabControl1
'XtraTabControlMain
'
Me.XtraTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.XtraTabControl1.HeaderLocation = DevExpress.XtraTab.TabHeaderLocation.Bottom
Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0)
Me.XtraTabControl1.Name = "XtraTabControl1"
Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPageControls
Me.XtraTabControl1.Size = New System.Drawing.Size(234, 362)
Me.XtraTabControl1.TabIndex = 7
Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPageControls, Me.XtraTabPageProperties})
Me.XtraTabControlMain.Dock = System.Windows.Forms.DockStyle.Fill
Me.XtraTabControlMain.HeaderLocation = DevExpress.XtraTab.TabHeaderLocation.Bottom
Me.XtraTabControlMain.Location = New System.Drawing.Point(0, 0)
Me.XtraTabControlMain.Name = "XtraTabControlMain"
Me.XtraTabControlMain.SelectedTabPage = Me.XtraTabPageControls
Me.XtraTabControlMain.Size = New System.Drawing.Size(203, 362)
Me.XtraTabControlMain.TabIndex = 7
Me.XtraTabControlMain.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPageControls, Me.XtraTabPageProperties})
'
'XtraTabPageControls
'
Me.XtraTabPageControls.Controls.Add(Me.ToolboxControlMain)
Me.XtraTabPageControls.Name = "XtraTabPageControls"
Me.XtraTabPageControls.Size = New System.Drawing.Size(232, 337)
Me.XtraTabPageControls.Size = New System.Drawing.Size(201, 337)
Me.XtraTabPageControls.Text = "Controls"
'
'XtraTabPageProperties
'
Me.XtraTabPageProperties.Controls.Add(Me.PropertyGridControlMain)
Me.XtraTabPageProperties.Name = "XtraTabPageProperties"
Me.XtraTabPageProperties.Size = New System.Drawing.Size(232, 337)
Me.XtraTabPageProperties.PageEnabled = False
Me.XtraTabPageProperties.Size = New System.Drawing.Size(201, 337)
Me.XtraTabPageProperties.Text = "Eigenschaften"
'
'PropertyGridControlMain
'
Me.PropertyGridControlMain.Cursor = System.Windows.Forms.Cursors.Hand
Me.PropertyGridControlMain.Dock = System.Windows.Forms.DockStyle.Fill
Me.PropertyGridControlMain.Location = New System.Drawing.Point(0, 0)
Me.PropertyGridControlMain.Name = "PropertyGridControlMain"
Me.PropertyGridControlMain.Size = New System.Drawing.Size(232, 337)
Me.PropertyGridControlMain.Size = New System.Drawing.Size(201, 337)
Me.PropertyGridControlMain.TabIndex = 0
'
'SplitContainerMain
@@ -234,11 +257,12 @@ Partial Class frmFormDesigner
Me.SplitContainerMain.Location = New System.Drawing.Point(0, 146)
Me.SplitContainerMain.Name = "SplitContainerMain"
Me.SplitContainerMain.Panel1.Controls.Add(Me.LayoutControlMain)
Me.SplitContainerMain.Panel1.Text = "Panel1"
Me.SplitContainerMain.Panel2.Controls.Add(Me.XtraTabControl1)
Me.SplitContainerMain.Panel2.Text = "Panel2"
Me.SplitContainerMain.Panel1.Text = "PanelMain"
Me.SplitContainerMain.Panel2.Controls.Add(Me.XtraTabControlMain)
Me.SplitContainerMain.Panel2.MinSize = 200
Me.SplitContainerMain.Panel2.Text = "PanelSidebar"
Me.SplitContainerMain.Size = New System.Drawing.Size(870, 362)
Me.SplitContainerMain.SplitterPosition = 624
Me.SplitContainerMain.SplitterPosition = 655
Me.SplitContainerMain.TabIndex = 3
Me.SplitContainerMain.Text = "SplitContainerControl1"
'
@@ -249,16 +273,18 @@ Partial Class frmFormDesigner
Me.ClientSize = New System.Drawing.Size(870, 529)
Me.Controls.Add(Me.SplitContainerMain)
Me.Controls.Add(Me.RibbonStatusBar)
Me.Controls.Add(Me.RibbonControl)
Me.Controls.Add(Me.FormDesignerRibbon)
Me.DefaultRibbonPage = Me.RibbonPageFormDesigner
Me.Name = "frmFormDesigner"
Me.Ribbon = Me.RibbonControl
Me.Ribbon = Me.FormDesignerRibbon
Me.ShowIcon = False
Me.StatusBar = Me.RibbonStatusBar
Me.Text = "Form Designer"
CType(Me.RibbonControl, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.FormDesignerRibbon, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlMain, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlGroupMain, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabControl1.ResumeLayout(False)
CType(Me.XtraTabControlMain, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabControlMain.ResumeLayout(False)
Me.XtraTabPageControls.ResumeLayout(False)
Me.XtraTabPageProperties.ResumeLayout(False)
CType(Me.PropertyGridControlMain, System.ComponentModel.ISupportInitialize).EndInit()
@@ -269,7 +295,7 @@ Partial Class frmFormDesigner
End Sub
Friend WithEvents RibbonControl As DevExpress.XtraBars.Ribbon.RibbonControl
Friend WithEvents FormDesignerRibbon As DevExpress.XtraBars.Ribbon.RibbonControl
Friend WithEvents RibbonStatusBar As DevExpress.XtraBars.Ribbon.RibbonStatusBar
Friend WithEvents LayoutControlMain As DevExpress.XtraLayout.LayoutControl
Friend WithEvents LayoutControlGroupMain As DevExpress.XtraLayout.LayoutControlGroup
@@ -279,7 +305,7 @@ Partial Class frmFormDesigner
Friend WithEvents ToolboxItemTextbox As DevExpress.XtraToolbox.ToolboxItem
Friend WithEvents ToolboxItemMemoedit As DevExpress.XtraToolbox.ToolboxItem
Friend WithEvents ToolboxItemDatepicker As DevExpress.XtraToolbox.ToolboxItem
Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl
Friend WithEvents XtraTabControlMain As DevExpress.XtraTab.XtraTabControl
Friend WithEvents XtraTabPageControls As DevExpress.XtraTab.XtraTabPage
Friend WithEvents XtraTabPageProperties As DevExpress.XtraTab.XtraTabPage
Friend WithEvents PropertyGridControlMain As DevExpress.XtraVerticalGrid.PropertyGridControl
@@ -288,6 +314,7 @@ Partial Class frmFormDesigner
Friend WithEvents ToolboxItemCheckbox As DevExpress.XtraToolbox.ToolboxItem
Friend WithEvents BarCheckEditLayout As DevExpress.XtraBars.BarCheckItem
Friend WithEvents RibbonPageCategory1 As DevExpress.XtraBars.Ribbon.RibbonPageCategory
Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents RibbonPageFormDesigner As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents BarCheckEditControls As DevExpress.XtraBars.BarCheckItem
End Class