New Form Designer \o/

2019-03-22 13:45:46 +01:00
parent 21ee4416ef
commit 743b936cdd
9 changed files with 325 additions and 75 deletions
--- a/EDMI_ClientSuite/FormEntityDesigner/frmFormDesigner.Designer.vb
+++ b/EDMI_ClientSuite/FormEntityDesigner/frmFormDesigner.Designer.vb
@@ -25,15 +25,28 @@ Partial Class frmFormDesigner
        Me.RibbonStatusBar = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
        Me.LayoutControlMain = New DevExpress.XtraLayout.LayoutControl()
        Me.LayoutControlGroupMain = New DevExpress.XtraLayout.LayoutControlGroup()
-        Me.ToolboxControl1 = New DevExpress.XtraToolbox.ToolboxControl()
-        Me.ToolboxGroup1 = New DevExpress.XtraToolbox.ToolboxGroup()
+        Me.ToolboxControlMain = New DevExpress.XtraToolbox.ToolboxControl()
+        Me.ToolboxGroupMain = New DevExpress.XtraToolbox.ToolboxGroup()
        Me.ToolboxItemTextbox = New DevExpress.XtraToolbox.ToolboxItem()
-        Me.ToolboxItemMemo = New DevExpress.XtraToolbox.ToolboxItem()
+        Me.ToolboxItemMemoedit = New DevExpress.XtraToolbox.ToolboxItem()
+        Me.ToolboxItemDatepicker = New DevExpress.XtraToolbox.ToolboxItem()
+        Me.ToolboxItemCombobox = New DevExpress.XtraToolbox.ToolboxItem()
        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.ToolboxItem1 = New DevExpress.XtraToolbox.ToolboxItem()
+        Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
+        Me.XtraTabPageControls = New DevExpress.XtraTab.XtraTabPage()
+        Me.XtraTabPageProperties = New DevExpress.XtraTab.XtraTabPage()
+        Me.PropertyGridControl1 = New DevExpress.XtraVerticalGrid.PropertyGridControl()
+        Me.SplitContainerMain = New DevExpress.XtraEditors.SplitContainerControl()
        CType(Me.RibbonControl, 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()
+        Me.XtraTabPageControls.SuspendLayout()
+        Me.XtraTabPageProperties.SuspendLayout()
+        CType(Me.PropertyGridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SplitContainerMain, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerMain.SuspendLayout()
        Me.SuspendLayout()
        '
        'RibbonControl
@@ -61,12 +74,17 @@ Partial Class frmFormDesigner
        '
        'LayoutControlMain
        '
-        Me.LayoutControlMain.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
+        Me.LayoutControlMain.AllowDrop = True
+        Me.LayoutControlMain.BackColor = System.Drawing.Color.Transparent
        Me.LayoutControlMain.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.LayoutControlMain.Location = New System.Drawing.Point(0, 146)
+        Me.LayoutControlMain.Location = New System.Drawing.Point(0, 0)
        Me.LayoutControlMain.Name = "LayoutControlMain"
+        Me.LayoutControlMain.OptionsCustomizationForm.DesignTimeCustomizationFormPositionAndSize = New System.Drawing.Rectangle(706, 255, 650, 400)
+        Me.LayoutControlMain.OptionsCustomizationForm.ShowLayoutTreeView = False
+        Me.LayoutControlMain.OptionsCustomizationForm.ShowLoadButton = False
+        Me.LayoutControlMain.OptionsCustomizationForm.ShowSaveButton = False
        Me.LayoutControlMain.Root = Me.LayoutControlGroupMain
-        Me.LayoutControlMain.Size = New System.Drawing.Size(658, 362)
+        Me.LayoutControlMain.Size = New System.Drawing.Size(624, 362)
        Me.LayoutControlMain.TabIndex = 2
        Me.LayoutControlMain.Text = "LayoutControl1"
        '
@@ -74,71 +92,142 @@ Partial Class frmFormDesigner
        '
        Me.LayoutControlGroupMain.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
        Me.LayoutControlGroupMain.GroupBordersVisible = False
-        Me.LayoutControlGroupMain.Name = "LayoutControlGroupMain"
-        Me.LayoutControlGroupMain.Size = New System.Drawing.Size(658, 362)
+        Me.LayoutControlGroupMain.Name = "Root"
+        Me.LayoutControlGroupMain.Size = New System.Drawing.Size(624, 362)
        Me.LayoutControlGroupMain.TextVisible = False
        '
-        'ToolboxControl1
+        'ToolboxControlMain
        '
-        Me.ToolboxControl1.Caption = "Form Controls"
-        Me.ToolboxControl1.Dock = System.Windows.Forms.DockStyle.Right
-        Me.ToolboxControl1.Groups.Add(Me.ToolboxGroup1)
-        Me.ToolboxControl1.Location = New System.Drawing.Point(658, 146)
-        Me.ToolboxControl1.Name = "ToolboxControl1"
-        Me.ToolboxControl1.OptionsView.ShowMenuButton = False
-        Me.ToolboxControl1.OptionsView.ShowToolboxCaption = True
-        Me.ToolboxControl1.Size = New System.Drawing.Size(212, 362)
-        Me.ToolboxControl1.TabIndex = 4
-        Me.ToolboxControl1.Text = "Form Controls"
+        Me.ToolboxControlMain.Caption = "Form Controls"
+        Me.ToolboxControlMain.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.ToolboxControlMain.Groups.Add(Me.ToolboxGroupMain)
+        Me.ToolboxControlMain.Location = New System.Drawing.Point(0, 0)
+        Me.ToolboxControlMain.Name = "ToolboxControlMain"
+        Me.ToolboxControlMain.OptionsMinimizing.AllowMinimizing = False
+        Me.ToolboxControlMain.OptionsView.ShowMenuButton = False
+        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.TabIndex = 4
+        Me.ToolboxControlMain.Text = "Form Controls"
        '
-        'ToolboxGroup1
+        'ToolboxGroupMain
        '
-        Me.ToolboxGroup1.BeginGroupCaption = ""
-        Me.ToolboxGroup1.Caption = "ToolboxGroup1"
-        Me.ToolboxGroup1.Items.Add(Me.ToolboxItemTextbox)
-        Me.ToolboxGroup1.Items.Add(Me.ToolboxItemMemo)
-        Me.ToolboxGroup1.Items.Add(Me.ToolboxItem1)
-        Me.ToolboxGroup1.Name = "ToolboxGroup1"
+        Me.ToolboxGroupMain.BeginGroupCaption = ""
+        Me.ToolboxGroupMain.Caption = "Basis Controls"
+        Me.ToolboxGroupMain.Items.Add(Me.ToolboxItemTextbox)
+        Me.ToolboxGroupMain.Items.Add(Me.ToolboxItemMemoedit)
+        Me.ToolboxGroupMain.Items.Add(Me.ToolboxItemDatepicker)
+        Me.ToolboxGroupMain.Items.Add(Me.ToolboxItemCombobox)
+        Me.ToolboxGroupMain.Name = "ToolboxGroupMain"
        '
        'ToolboxItemTextbox
        '
        Me.ToolboxItemTextbox.BeginGroupCaption = Nothing
        Me.ToolboxItemTextbox.Caption = "Textbox"
+        Me.ToolboxItemTextbox.ImageOptions.Image = Global.DigitalData.GUIs.ClientSuite.My.Resources.Resources.TextBox
        Me.ToolboxItemTextbox.Name = "ToolboxItemTextbox"
+        Me.ToolboxItemTextbox.Tag = "Textbox"
        '
-        'ToolboxItemMemo
+        'ToolboxItemMemoedit
        '
-        Me.ToolboxItemMemo.BeginGroupCaption = Nothing
-        Me.ToolboxItemMemo.Caption = "Multiline Textbox"
-        Me.ToolboxItemMemo.Name = "ToolboxItemMemo"
+        Me.ToolboxItemMemoedit.BeginGroupCaption = Nothing
+        Me.ToolboxItemMemoedit.Caption = "Multiline Textbox"
+        Me.ToolboxItemMemoedit.ImageOptions.Image = Global.DigitalData.GUIs.ClientSuite.My.Resources.Resources.TextBox
+        Me.ToolboxItemMemoedit.Name = "ToolboxItemMemoedit"
+        Me.ToolboxItemMemoedit.Tag = "Memoedit"
+        '
+        'ToolboxItemDatepicker
+        '
+        Me.ToolboxItemDatepicker.BeginGroupCaption = Nothing
+        Me.ToolboxItemDatepicker.Caption = "Datepicker"
+        Me.ToolboxItemDatepicker.ImageOptions.Image = Global.DigitalData.GUIs.ClientSuite.My.Resources.Resources.DatePicker
+        Me.ToolboxItemDatepicker.Name = "ToolboxItemDatepicker"
+        Me.ToolboxItemDatepicker.Tag = "Datepicker"
+        '
+        'ToolboxItemCombobox
+        '
+        Me.ToolboxItemCombobox.BeginGroupCaption = Nothing
+        Me.ToolboxItemCombobox.Caption = "Combobox"
+        Me.ToolboxItemCombobox.ImageOptions.Image = Global.DigitalData.GUIs.ClientSuite.My.Resources.Resources.ComboBox
+        Me.ToolboxItemCombobox.Name = "ToolboxItemCombobox"
+        Me.ToolboxItemCombobox.Tag = "Combobox"
        '
        'RibbonPageGroup1
        '
        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
        Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
        '
-        'ToolboxItem1
+        'XtraTabControl1
        '
-        Me.ToolboxItem1.BeginGroupCaption = Nothing
-        Me.ToolboxItem1.Caption = "ToolboxItem1"
-        Me.ToolboxItem1.Name = "ToolboxItem1"
+        Me.XtraTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        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})
+        '
+        'XtraTabPageControls
+        '
+        Me.XtraTabPageControls.Controls.Add(Me.ToolboxControlMain)
+        Me.XtraTabPageControls.Name = "XtraTabPageControls"
+        Me.XtraTabPageControls.Size = New System.Drawing.Size(232, 337)
+        Me.XtraTabPageControls.Text = "Controls"
+        '
+        'XtraTabPageProperties
+        '
+        Me.XtraTabPageProperties.Controls.Add(Me.PropertyGridControl1)
+        Me.XtraTabPageProperties.Name = "XtraTabPageProperties"
+        Me.XtraTabPageProperties.Size = New System.Drawing.Size(232, 337)
+        Me.XtraTabPageProperties.Text = "Eigenschaften"
+        '
+        'PropertyGridControl1
+        '
+        Me.PropertyGridControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.PropertyGridControl1.Location = New System.Drawing.Point(0, 0)
+        Me.PropertyGridControl1.Name = "PropertyGridControl1"
+        Me.PropertyGridControl1.Size = New System.Drawing.Size(232, 337)
+        Me.PropertyGridControl1.TabIndex = 0
+        '
+        'SplitContainerMain
+        '
+        Me.SplitContainerMain.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2
+        Me.SplitContainerMain.Dock = System.Windows.Forms.DockStyle.Fill
+        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.Size = New System.Drawing.Size(870, 362)
+        Me.SplitContainerMain.SplitterPosition = 624
+        Me.SplitContainerMain.TabIndex = 3
+        Me.SplitContainerMain.Text = "SplitContainerControl1"
        '
        'frmFormDesigner
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(870, 529)
-        Me.Controls.Add(Me.LayoutControlMain)
-        Me.Controls.Add(Me.ToolboxControl1)
+        Me.Controls.Add(Me.SplitContainerMain)
        Me.Controls.Add(Me.RibbonStatusBar)
        Me.Controls.Add(Me.RibbonControl)
        Me.Name = "frmFormDesigner"
        Me.Ribbon = Me.RibbonControl
        Me.StatusBar = Me.RibbonStatusBar
-        Me.Text = "frmFormDesigner"
+        Me.Text = "Form Designer"
        CType(Me.RibbonControl, 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)
+        Me.XtraTabPageControls.ResumeLayout(False)
+        Me.XtraTabPageProperties.ResumeLayout(False)
+        CType(Me.PropertyGridControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SplitContainerMain, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerMain.ResumeLayout(False)
        Me.ResumeLayout(False)
        Me.PerformLayout()

@@ -149,10 +238,16 @@ Partial Class frmFormDesigner
    Friend WithEvents RibbonStatusBar As DevExpress.XtraBars.Ribbon.RibbonStatusBar
    Friend WithEvents LayoutControlMain As DevExpress.XtraLayout.LayoutControl
    Friend WithEvents LayoutControlGroupMain As DevExpress.XtraLayout.LayoutControlGroup
-    Friend WithEvents ToolboxControl1 As DevExpress.XtraToolbox.ToolboxControl
+    Friend WithEvents ToolboxControlMain As DevExpress.XtraToolbox.ToolboxControl
    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
-    Friend WithEvents ToolboxGroup1 As DevExpress.XtraToolbox.ToolboxGroup
+    Friend WithEvents ToolboxGroupMain As DevExpress.XtraToolbox.ToolboxGroup
    Friend WithEvents ToolboxItemTextbox As DevExpress.XtraToolbox.ToolboxItem
-    Friend WithEvents ToolboxItemMemo As DevExpress.XtraToolbox.ToolboxItem
-    Friend WithEvents ToolboxItem1 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 XtraTabPageControls As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPageProperties As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents PropertyGridControl1 As DevExpress.XtraVerticalGrid.PropertyGridControl
+    Friend WithEvents SplitContainerMain As DevExpress.XtraEditors.SplitContainerControl
+    Friend WithEvents ToolboxItemCombobox As DevExpress.XtraToolbox.ToolboxItem
 End Class