Commit Changes
This commit is contained in:
17
GUIs.ZooFlow/Administration/SourceBundle.vb
Normal file
17
GUIs.ZooFlow/Administration/SourceBundle.vb
Normal file
@@ -0,0 +1,17 @@
|
||||
Public Class SourceBundle
|
||||
Public Overview As SourceSql
|
||||
Public Update As SourceSql
|
||||
Public Insert As SourceSql
|
||||
Public Load As SourceSql
|
||||
End Class
|
||||
|
||||
|
||||
Public Class SourceSql
|
||||
Public Guid As Integer
|
||||
Public ParentId As Integer
|
||||
Public Title As String
|
||||
Public SQL As String
|
||||
Public PrimaryKey As String
|
||||
Public Scope As String
|
||||
End Class
|
||||
|
||||
@@ -25,10 +25,6 @@ Partial Public MustInherit Class BaseForm
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
Public Class BaseFormImpl
|
||||
Inherits BaseForm
|
||||
End Class
|
||||
|
||||
Partial Public Class frmAdmin_Base
|
||||
Inherits BaseFormImpl
|
||||
Inherits BaseForm
|
||||
End Class
|
||||
@@ -1,9 +1,9 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class frmAdmin_CWProfile
|
||||
Inherits DevExpress.XtraBars.Ribbon.RibbonForm
|
||||
Inherits frmAdmin_Base
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
@@ -20,81 +20,111 @@ Partial Class frmAdmin_CWProfile
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAdmin_CWProfile))
|
||||
Dim GUIDLabel As System.Windows.Forms.Label
|
||||
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
|
||||
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
|
||||
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
||||
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
||||
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
|
||||
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
|
||||
Me.DBCW_Stammdaten = New DigitalData.GUIs.ZooFlow.DBCW_Stammdaten()
|
||||
Me.TBCW_PROFILESBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.TBCW_PROFILESTableAdapter = New DigitalData.GUIs.ZooFlow.DBCW_StammdatenTableAdapters.TBCW_PROFILESTableAdapter()
|
||||
Me.TableAdapterManager = New DigitalData.GUIs.ZooFlow.DBCW_StammdatenTableAdapters.TableAdapterManager()
|
||||
Me.TBCW_PROFILESBindingNavigator = New System.Windows.Forms.BindingNavigator(Me.components)
|
||||
Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorSeparator = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.BindingNavigatorPositionItem = New System.Windows.Forms.ToolStripTextBox()
|
||||
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.BindingNavigatorSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.BindingNavigatorMoveNextItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorMoveLastItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.TBCW_PROFILESBindingNavigatorSaveItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.FillToolStrip = New System.Windows.Forms.ToolStrip()
|
||||
Me.GUIDToolStripLabel = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.GUIDToolStripTextBox = New System.Windows.Forms.ToolStripTextBox()
|
||||
Me.FillToolStripButton = New System.Windows.Forms.ToolStripButton()
|
||||
Me.GUIDTextBox = New System.Windows.Forms.TextBox()
|
||||
GUIDLabel = New System.Windows.Forms.Label()
|
||||
Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
|
||||
Me.Root = New DevExpress.XtraLayout.LayoutControlGroup()
|
||||
Me.TextEdit1 = New DevExpress.XtraEditors.TextEdit()
|
||||
Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.TextEdit2 = New DevExpress.XtraEditors.TextEdit()
|
||||
Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.TextEdit3 = New DevExpress.XtraEditors.TextEdit()
|
||||
Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.txtAddedWho = New DevExpress.XtraEditors.TextEdit()
|
||||
Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.txtAddedWhen = New DevExpress.XtraEditors.TextEdit()
|
||||
Me.LayoutControlItem5 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.txtChangedWho = New DevExpress.XtraEditors.TextEdit()
|
||||
Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.txtChangedWhen = New DevExpress.XtraEditors.TextEdit()
|
||||
Me.LayoutControlItem7 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.labelStatus = New DevExpress.XtraBars.BarStaticItem()
|
||||
Me.labelError = New DevExpress.XtraBars.BarStaticItem()
|
||||
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.DBCW_Stammdaten, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBCW_PROFILESBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBCW_PROFILESBindingNavigator, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.TBCW_PROFILESBindingNavigator.SuspendLayout()
|
||||
Me.FillToolStrip.SuspendLayout()
|
||||
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.LayoutControl1.SuspendLayout()
|
||||
CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TextEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TextEdit3.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.txtAddedWho.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.txtAddedWhen.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.txtChangedWho.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.txtChangedWhen.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'RibbonControl1
|
||||
'
|
||||
Me.RibbonControl1.CommandLayout = DevExpress.XtraBars.Ribbon.CommandLayout.Simplified
|
||||
Me.RibbonControl1.ExpandCollapseItem.Id = 0
|
||||
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem})
|
||||
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.labelStatus, Me.labelError})
|
||||
Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.RibbonControl1.MaxItemId = 1
|
||||
Me.RibbonControl1.MaxItemId = 5
|
||||
Me.RibbonControl1.Name = "RibbonControl1"
|
||||
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
|
||||
Me.RibbonControl1.Size = New System.Drawing.Size(800, 159)
|
||||
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
|
||||
Me.RibbonControl1.ShowToolbarCustomizeItem = False
|
||||
Me.RibbonControl1.Size = New System.Drawing.Size(800, 63)
|
||||
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
|
||||
Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
|
||||
'
|
||||
'BarButtonItem1
|
||||
'
|
||||
Me.BarButtonItem1.Caption = "Speichern und Schließen"
|
||||
Me.BarButtonItem1.Id = 1
|
||||
Me.BarButtonItem1.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.actions_check2
|
||||
Me.BarButtonItem1.Name = "BarButtonItem1"
|
||||
'
|
||||
'BarButtonItem2
|
||||
'
|
||||
Me.BarButtonItem2.Caption = "Speichern"
|
||||
Me.BarButtonItem2.Id = 2
|
||||
Me.BarButtonItem2.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.save2
|
||||
Me.BarButtonItem2.Name = "BarButtonItem2"
|
||||
'
|
||||
'RibbonPage1
|
||||
'
|
||||
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
|
||||
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
|
||||
Me.RibbonPage1.Name = "RibbonPage1"
|
||||
Me.RibbonPage1.Text = "RibbonPage1"
|
||||
'
|
||||
'RibbonPageGroup1
|
||||
'
|
||||
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
|
||||
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
|
||||
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
|
||||
Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
|
||||
'
|
||||
'RibbonPageGroup2
|
||||
'
|
||||
Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
|
||||
Me.RibbonPageGroup2.Text = "RibbonPageGroup2"
|
||||
'
|
||||
'RibbonStatusBar1
|
||||
'
|
||||
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 428)
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.labelStatus)
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.labelError)
|
||||
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 426)
|
||||
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
|
||||
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
|
||||
Me.RibbonStatusBar1.Size = New System.Drawing.Size(800, 22)
|
||||
Me.RibbonStatusBar1.Size = New System.Drawing.Size(800, 24)
|
||||
'
|
||||
'RibbonPage2
|
||||
'
|
||||
@@ -121,184 +151,219 @@ Partial Class frmAdmin_CWProfile
|
||||
Me.TableAdapterManager.TBCW_PROFILESTableAdapter = Me.TBCW_PROFILESTableAdapter
|
||||
Me.TableAdapterManager.UpdateOrder = DigitalData.GUIs.ZooFlow.DBCW_StammdatenTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'TBCW_PROFILESBindingNavigator
|
||||
'LayoutControl1
|
||||
'
|
||||
Me.TBCW_PROFILESBindingNavigator.AddNewItem = Me.BindingNavigatorAddNewItem
|
||||
Me.TBCW_PROFILESBindingNavigator.BindingSource = Me.TBCW_PROFILESBindingSource
|
||||
Me.TBCW_PROFILESBindingNavigator.CountItem = Me.BindingNavigatorCountItem
|
||||
Me.TBCW_PROFILESBindingNavigator.DeleteItem = Me.BindingNavigatorDeleteItem
|
||||
Me.TBCW_PROFILESBindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.TBCW_PROFILESBindingNavigatorSaveItem})
|
||||
Me.TBCW_PROFILESBindingNavigator.Location = New System.Drawing.Point(0, 159)
|
||||
Me.TBCW_PROFILESBindingNavigator.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
|
||||
Me.TBCW_PROFILESBindingNavigator.MoveLastItem = Me.BindingNavigatorMoveLastItem
|
||||
Me.TBCW_PROFILESBindingNavigator.MoveNextItem = Me.BindingNavigatorMoveNextItem
|
||||
Me.TBCW_PROFILESBindingNavigator.MovePreviousItem = Me.BindingNavigatorMovePreviousItem
|
||||
Me.TBCW_PROFILESBindingNavigator.Name = "TBCW_PROFILESBindingNavigator"
|
||||
Me.TBCW_PROFILESBindingNavigator.PositionItem = Me.BindingNavigatorPositionItem
|
||||
Me.TBCW_PROFILESBindingNavigator.Size = New System.Drawing.Size(800, 25)
|
||||
Me.TBCW_PROFILESBindingNavigator.TabIndex = 2
|
||||
Me.TBCW_PROFILESBindingNavigator.Text = "BindingNavigator1"
|
||||
Me.LayoutControl1.Controls.Add(Me.TextEdit1)
|
||||
Me.LayoutControl1.Controls.Add(Me.TextEdit2)
|
||||
Me.LayoutControl1.Controls.Add(Me.TextEdit3)
|
||||
Me.LayoutControl1.Controls.Add(Me.txtAddedWho)
|
||||
Me.LayoutControl1.Controls.Add(Me.txtAddedWhen)
|
||||
Me.LayoutControl1.Controls.Add(Me.txtChangedWho)
|
||||
Me.LayoutControl1.Controls.Add(Me.txtChangedWhen)
|
||||
Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.LayoutControl1.Location = New System.Drawing.Point(0, 63)
|
||||
Me.LayoutControl1.Name = "LayoutControl1"
|
||||
Me.LayoutControl1.OptionsCustomizationForm.DesignTimeCustomizationFormPositionAndSize = New System.Drawing.Rectangle(848, 159, 650, 400)
|
||||
Me.LayoutControl1.Root = Me.Root
|
||||
Me.LayoutControl1.Size = New System.Drawing.Size(800, 363)
|
||||
Me.LayoutControl1.TabIndex = 2
|
||||
Me.LayoutControl1.Text = "LayoutControl1"
|
||||
'
|
||||
'BindingNavigatorMoveFirstItem
|
||||
'Root
|
||||
'
|
||||
Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BindingNavigatorMoveFirstItem.Image = CType(resources.GetObject("BindingNavigatorMoveFirstItem.Image"), System.Drawing.Image)
|
||||
Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem"
|
||||
Me.BindingNavigatorMoveFirstItem.RightToLeftAutoMirrorImage = True
|
||||
Me.BindingNavigatorMoveFirstItem.Size = New System.Drawing.Size(23, 22)
|
||||
Me.BindingNavigatorMoveFirstItem.Text = "Erste verschieben"
|
||||
Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
|
||||
Me.Root.GroupBordersVisible = False
|
||||
Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem3, Me.LayoutControlItem4, Me.LayoutControlItem6, Me.LayoutControlItem5, Me.LayoutControlItem7})
|
||||
Me.Root.Name = "Root"
|
||||
Me.Root.Size = New System.Drawing.Size(800, 363)
|
||||
Me.Root.TextVisible = False
|
||||
'
|
||||
'BindingNavigatorMovePreviousItem
|
||||
'TextEdit1
|
||||
'
|
||||
Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BindingNavigatorMovePreviousItem.Image = CType(resources.GetObject("BindingNavigatorMovePreviousItem.Image"), System.Drawing.Image)
|
||||
Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem"
|
||||
Me.BindingNavigatorMovePreviousItem.RightToLeftAutoMirrorImage = True
|
||||
Me.BindingNavigatorMovePreviousItem.Size = New System.Drawing.Size(23, 22)
|
||||
Me.BindingNavigatorMovePreviousItem.Text = "Vorherige verschieben"
|
||||
Me.TextEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "GUID", True))
|
||||
Me.TextEdit1.Location = New System.Drawing.Point(108, 20)
|
||||
Me.TextEdit1.MenuManager = Me.RibbonControl1
|
||||
Me.TextEdit1.Name = "TextEdit1"
|
||||
Me.TextEdit1.Size = New System.Drawing.Size(672, 20)
|
||||
Me.TextEdit1.StyleController = Me.LayoutControl1
|
||||
Me.TextEdit1.TabIndex = 4
|
||||
'
|
||||
'BindingNavigatorSeparator
|
||||
'LayoutControlItem1
|
||||
'
|
||||
Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator"
|
||||
Me.BindingNavigatorSeparator.Size = New System.Drawing.Size(6, 25)
|
||||
Me.LayoutControlItem1.Control = Me.TextEdit1
|
||||
Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.LayoutControlItem1.Name = "LayoutControlItem1"
|
||||
Me.LayoutControlItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem1.Size = New System.Drawing.Size(780, 40)
|
||||
Me.LayoutControlItem1.Text = "GUID"
|
||||
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(76, 13)
|
||||
'
|
||||
'BindingNavigatorPositionItem
|
||||
'TextEdit2
|
||||
'
|
||||
Me.BindingNavigatorPositionItem.AccessibleName = "Position"
|
||||
Me.BindingNavigatorPositionItem.AutoSize = False
|
||||
Me.BindingNavigatorPositionItem.Name = "BindingNavigatorPositionItem"
|
||||
Me.BindingNavigatorPositionItem.Size = New System.Drawing.Size(50, 23)
|
||||
Me.BindingNavigatorPositionItem.Text = "0"
|
||||
Me.BindingNavigatorPositionItem.ToolTipText = "Aktuelle Position"
|
||||
Me.TextEdit2.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "NAME", True))
|
||||
Me.TextEdit2.Location = New System.Drawing.Point(108, 60)
|
||||
Me.TextEdit2.MenuManager = Me.RibbonControl1
|
||||
Me.TextEdit2.Name = "TextEdit2"
|
||||
Me.TextEdit2.Size = New System.Drawing.Size(672, 20)
|
||||
Me.TextEdit2.StyleController = Me.LayoutControl1
|
||||
Me.TextEdit2.TabIndex = 5
|
||||
'
|
||||
'BindingNavigatorCountItem
|
||||
'LayoutControlItem2
|
||||
'
|
||||
Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem"
|
||||
Me.BindingNavigatorCountItem.Size = New System.Drawing.Size(44, 15)
|
||||
Me.BindingNavigatorCountItem.Text = "von {0}"
|
||||
Me.BindingNavigatorCountItem.ToolTipText = "Die Gesamtanzahl der Elemente."
|
||||
Me.LayoutControlItem2.Control = Me.TextEdit2
|
||||
Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 40)
|
||||
Me.LayoutControlItem2.Name = "LayoutControlItem2"
|
||||
Me.LayoutControlItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem2.Size = New System.Drawing.Size(780, 40)
|
||||
Me.LayoutControlItem2.Text = "Profil"
|
||||
Me.LayoutControlItem2.TextSize = New System.Drawing.Size(76, 13)
|
||||
'
|
||||
'BindingNavigatorSeparator1
|
||||
'TextEdit3
|
||||
'
|
||||
Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator"
|
||||
Me.BindingNavigatorSeparator1.Size = New System.Drawing.Size(6, 6)
|
||||
Me.TextEdit3.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "COMMENT", True))
|
||||
Me.TextEdit3.Location = New System.Drawing.Point(108, 100)
|
||||
Me.TextEdit3.MenuManager = Me.RibbonControl1
|
||||
Me.TextEdit3.Name = "TextEdit3"
|
||||
Me.TextEdit3.Size = New System.Drawing.Size(672, 20)
|
||||
Me.TextEdit3.StyleController = Me.LayoutControl1
|
||||
Me.TextEdit3.TabIndex = 6
|
||||
'
|
||||
'BindingNavigatorMoveNextItem
|
||||
'LayoutControlItem3
|
||||
'
|
||||
Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BindingNavigatorMoveNextItem.Image = CType(resources.GetObject("BindingNavigatorMoveNextItem.Image"), System.Drawing.Image)
|
||||
Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem"
|
||||
Me.BindingNavigatorMoveNextItem.RightToLeftAutoMirrorImage = True
|
||||
Me.BindingNavigatorMoveNextItem.Size = New System.Drawing.Size(23, 20)
|
||||
Me.BindingNavigatorMoveNextItem.Text = "Nächste verschieben"
|
||||
Me.LayoutControlItem3.Control = Me.TextEdit3
|
||||
Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 80)
|
||||
Me.LayoutControlItem3.Name = "LayoutControlItem3"
|
||||
Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem3.Size = New System.Drawing.Size(780, 40)
|
||||
Me.LayoutControlItem3.Text = "Kommentar"
|
||||
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(76, 13)
|
||||
'
|
||||
'BindingNavigatorMoveLastItem
|
||||
'txtAddedWho
|
||||
'
|
||||
Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BindingNavigatorMoveLastItem.Image = CType(resources.GetObject("BindingNavigatorMoveLastItem.Image"), System.Drawing.Image)
|
||||
Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem"
|
||||
Me.BindingNavigatorMoveLastItem.RightToLeftAutoMirrorImage = True
|
||||
Me.BindingNavigatorMoveLastItem.Size = New System.Drawing.Size(23, 20)
|
||||
Me.BindingNavigatorMoveLastItem.Text = "Letzte verschieben"
|
||||
Me.txtAddedWho.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "ADDED_WHO", True))
|
||||
Me.txtAddedWho.Location = New System.Drawing.Point(108, 140)
|
||||
Me.txtAddedWho.MenuManager = Me.RibbonControl1
|
||||
Me.txtAddedWho.Name = "txtAddedWho"
|
||||
Me.txtAddedWho.Size = New System.Drawing.Size(282, 20)
|
||||
Me.txtAddedWho.StyleController = Me.LayoutControl1
|
||||
Me.txtAddedWho.TabIndex = 7
|
||||
'
|
||||
'BindingNavigatorSeparator2
|
||||
'LayoutControlItem4
|
||||
'
|
||||
Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator"
|
||||
Me.BindingNavigatorSeparator2.Size = New System.Drawing.Size(6, 6)
|
||||
Me.LayoutControlItem4.Control = Me.txtAddedWho
|
||||
Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 120)
|
||||
Me.LayoutControlItem4.Name = "LayoutControlItem4"
|
||||
Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem4.Size = New System.Drawing.Size(390, 40)
|
||||
Me.LayoutControlItem4.Text = "Erstellt Wer"
|
||||
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(76, 13)
|
||||
'
|
||||
'BindingNavigatorAddNewItem
|
||||
'txtAddedWhen
|
||||
'
|
||||
Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BindingNavigatorAddNewItem.Image = CType(resources.GetObject("BindingNavigatorAddNewItem.Image"), System.Drawing.Image)
|
||||
Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem"
|
||||
Me.BindingNavigatorAddNewItem.RightToLeftAutoMirrorImage = True
|
||||
Me.BindingNavigatorAddNewItem.Size = New System.Drawing.Size(23, 22)
|
||||
Me.BindingNavigatorAddNewItem.Text = "Neu hinzufügen"
|
||||
Me.txtAddedWhen.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "CHANGED_WHO", True))
|
||||
Me.txtAddedWhen.Location = New System.Drawing.Point(498, 140)
|
||||
Me.txtAddedWhen.MenuManager = Me.RibbonControl1
|
||||
Me.txtAddedWhen.Name = "txtAddedWhen"
|
||||
Me.txtAddedWhen.Size = New System.Drawing.Size(282, 20)
|
||||
Me.txtAddedWhen.StyleController = Me.LayoutControl1
|
||||
Me.txtAddedWhen.TabIndex = 8
|
||||
'
|
||||
'BindingNavigatorDeleteItem
|
||||
'LayoutControlItem5
|
||||
'
|
||||
Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BindingNavigatorDeleteItem.Image = CType(resources.GetObject("BindingNavigatorDeleteItem.Image"), System.Drawing.Image)
|
||||
Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem"
|
||||
Me.BindingNavigatorDeleteItem.RightToLeftAutoMirrorImage = True
|
||||
Me.BindingNavigatorDeleteItem.Size = New System.Drawing.Size(23, 20)
|
||||
Me.BindingNavigatorDeleteItem.Text = "Löschen"
|
||||
Me.LayoutControlItem5.Control = Me.txtAddedWhen
|
||||
Me.LayoutControlItem5.Location = New System.Drawing.Point(390, 120)
|
||||
Me.LayoutControlItem5.Name = "LayoutControlItem5"
|
||||
Me.LayoutControlItem5.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem5.Size = New System.Drawing.Size(390, 40)
|
||||
Me.LayoutControlItem5.Text = "Erstellt Wann"
|
||||
Me.LayoutControlItem5.TextSize = New System.Drawing.Size(76, 13)
|
||||
'
|
||||
'TBCW_PROFILESBindingNavigatorSaveItem
|
||||
'txtChangedWho
|
||||
'
|
||||
Me.TBCW_PROFILESBindingNavigatorSaveItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.TBCW_PROFILESBindingNavigatorSaveItem.Image = CType(resources.GetObject("TBCW_PROFILESBindingNavigatorSaveItem.Image"), System.Drawing.Image)
|
||||
Me.TBCW_PROFILESBindingNavigatorSaveItem.Name = "TBCW_PROFILESBindingNavigatorSaveItem"
|
||||
Me.TBCW_PROFILESBindingNavigatorSaveItem.Size = New System.Drawing.Size(23, 20)
|
||||
Me.TBCW_PROFILESBindingNavigatorSaveItem.Text = "Daten speichern"
|
||||
Me.txtChangedWho.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "ADDED_WHEN", True))
|
||||
Me.txtChangedWho.Location = New System.Drawing.Point(108, 180)
|
||||
Me.txtChangedWho.MenuManager = Me.RibbonControl1
|
||||
Me.txtChangedWho.Name = "txtChangedWho"
|
||||
Me.txtChangedWho.Size = New System.Drawing.Size(282, 20)
|
||||
Me.txtChangedWho.StyleController = Me.LayoutControl1
|
||||
Me.txtChangedWho.TabIndex = 9
|
||||
'
|
||||
'FillToolStrip
|
||||
'LayoutControlItem6
|
||||
'
|
||||
Me.FillToolStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.GUIDToolStripLabel, Me.GUIDToolStripTextBox, Me.FillToolStripButton})
|
||||
Me.FillToolStrip.Location = New System.Drawing.Point(0, 184)
|
||||
Me.FillToolStrip.Name = "FillToolStrip"
|
||||
Me.FillToolStrip.Size = New System.Drawing.Size(800, 25)
|
||||
Me.FillToolStrip.TabIndex = 3
|
||||
Me.FillToolStrip.Text = "FillToolStrip"
|
||||
Me.LayoutControlItem6.Control = Me.txtChangedWho
|
||||
Me.LayoutControlItem6.Location = New System.Drawing.Point(0, 160)
|
||||
Me.LayoutControlItem6.Name = "LayoutControlItem6"
|
||||
Me.LayoutControlItem6.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem6.Size = New System.Drawing.Size(390, 183)
|
||||
Me.LayoutControlItem6.Text = "Geändert Wer"
|
||||
Me.LayoutControlItem6.TextSize = New System.Drawing.Size(76, 13)
|
||||
'
|
||||
'GUIDToolStripLabel
|
||||
'txtChangedWhen
|
||||
'
|
||||
Me.GUIDToolStripLabel.Name = "GUIDToolStripLabel"
|
||||
Me.GUIDToolStripLabel.Size = New System.Drawing.Size(37, 22)
|
||||
Me.GUIDToolStripLabel.Text = "GUID:"
|
||||
Me.txtChangedWhen.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "CHANGED_WHEN", True))
|
||||
Me.txtChangedWhen.Location = New System.Drawing.Point(498, 180)
|
||||
Me.txtChangedWhen.MenuManager = Me.RibbonControl1
|
||||
Me.txtChangedWhen.Name = "txtChangedWhen"
|
||||
Me.txtChangedWhen.Size = New System.Drawing.Size(282, 20)
|
||||
Me.txtChangedWhen.StyleController = Me.LayoutControl1
|
||||
Me.txtChangedWhen.TabIndex = 10
|
||||
'
|
||||
'GUIDToolStripTextBox
|
||||
'LayoutControlItem7
|
||||
'
|
||||
Me.GUIDToolStripTextBox.Name = "GUIDToolStripTextBox"
|
||||
Me.GUIDToolStripTextBox.Size = New System.Drawing.Size(100, 23)
|
||||
Me.LayoutControlItem7.Control = Me.txtChangedWhen
|
||||
Me.LayoutControlItem7.Location = New System.Drawing.Point(390, 160)
|
||||
Me.LayoutControlItem7.Name = "LayoutControlItem7"
|
||||
Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem7.Size = New System.Drawing.Size(390, 183)
|
||||
Me.LayoutControlItem7.Text = "Geändert Wann"
|
||||
Me.LayoutControlItem7.TextSize = New System.Drawing.Size(76, 13)
|
||||
'
|
||||
'FillToolStripButton
|
||||
'labelStatus
|
||||
'
|
||||
Me.FillToolStripButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
|
||||
Me.FillToolStripButton.Name = "FillToolStripButton"
|
||||
Me.FillToolStripButton.Size = New System.Drawing.Size(26, 19)
|
||||
Me.FillToolStripButton.Text = "Fill"
|
||||
Me.labelStatus.Caption = "BarStaticItem1"
|
||||
Me.labelStatus.Id = 3
|
||||
Me.labelStatus.Name = "labelStatus"
|
||||
Me.labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
|
||||
'
|
||||
'GUIDLabel
|
||||
'labelError
|
||||
'
|
||||
GUIDLabel.AutoSize = True
|
||||
GUIDLabel.Location = New System.Drawing.Point(548, 312)
|
||||
GUIDLabel.Name = "GUIDLabel"
|
||||
GUIDLabel.Size = New System.Drawing.Size(37, 13)
|
||||
GUIDLabel.TabIndex = 4
|
||||
GUIDLabel.Text = "GUID:"
|
||||
'
|
||||
'GUIDTextBox
|
||||
'
|
||||
Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "GUID", True))
|
||||
Me.GUIDTextBox.Location = New System.Drawing.Point(591, 309)
|
||||
Me.GUIDTextBox.Name = "GUIDTextBox"
|
||||
Me.GUIDTextBox.Size = New System.Drawing.Size(100, 22)
|
||||
Me.GUIDTextBox.TabIndex = 5
|
||||
Me.labelError.Caption = "BarStaticItem2"
|
||||
Me.labelError.Id = 4
|
||||
Me.labelError.Name = "labelError"
|
||||
Me.labelError.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
|
||||
'
|
||||
'frmAdmin_CWProfile
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(800, 450)
|
||||
Me.Controls.Add(GUIDLabel)
|
||||
Me.Controls.Add(Me.GUIDTextBox)
|
||||
Me.Controls.Add(Me.FillToolStrip)
|
||||
Me.Controls.Add(Me.TBCW_PROFILESBindingNavigator)
|
||||
Me.Controls.Add(Me.LayoutControl1)
|
||||
Me.Controls.Add(Me.RibbonStatusBar1)
|
||||
Me.Controls.Add(Me.RibbonControl1)
|
||||
Me.Name = "frmAdmin_CWProfile"
|
||||
Me.Ribbon = Me.RibbonControl1
|
||||
Me.StatusBar = Me.RibbonStatusBar1
|
||||
Me.Text = "frmAdmin_CWProfiles"
|
||||
Me.Text = "Clipboard Watcher - Profile"
|
||||
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.DBCW_Stammdaten, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBCW_PROFILESBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBCW_PROFILESBindingNavigator, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.TBCW_PROFILESBindingNavigator.ResumeLayout(False)
|
||||
Me.TBCW_PROFILESBindingNavigator.PerformLayout()
|
||||
Me.FillToolStrip.ResumeLayout(False)
|
||||
Me.FillToolStrip.PerformLayout()
|
||||
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.LayoutControl1.ResumeLayout(False)
|
||||
CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TextEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TextEdit3.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.txtAddedWho.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.txtAddedWhen.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.txtChangedWho.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.txtChangedWhen.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
@@ -307,29 +372,30 @@ Partial Class frmAdmin_CWProfile
|
||||
Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
|
||||
Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
|
||||
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
|
||||
Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
|
||||
Friend WithEvents DBCW_Stammdaten As DBCW_Stammdaten
|
||||
Friend WithEvents TBCW_PROFILESBindingSource As BindingSource
|
||||
Friend WithEvents TBCW_PROFILESTableAdapter As DBCW_StammdatenTableAdapters.TBCW_PROFILESTableAdapter
|
||||
Friend WithEvents TableAdapterManager As DBCW_StammdatenTableAdapters.TableAdapterManager
|
||||
Friend WithEvents TBCW_PROFILESBindingNavigator As BindingNavigator
|
||||
Friend WithEvents BindingNavigatorAddNewItem As ToolStripButton
|
||||
Friend WithEvents BindingNavigatorCountItem As ToolStripLabel
|
||||
Friend WithEvents BindingNavigatorDeleteItem As ToolStripButton
|
||||
Friend WithEvents BindingNavigatorMoveFirstItem As ToolStripButton
|
||||
Friend WithEvents BindingNavigatorMovePreviousItem As ToolStripButton
|
||||
Friend WithEvents BindingNavigatorSeparator As ToolStripSeparator
|
||||
Friend WithEvents BindingNavigatorPositionItem As ToolStripTextBox
|
||||
Friend WithEvents BindingNavigatorSeparator1 As ToolStripSeparator
|
||||
Friend WithEvents BindingNavigatorMoveNextItem As ToolStripButton
|
||||
Friend WithEvents BindingNavigatorMoveLastItem As ToolStripButton
|
||||
Friend WithEvents BindingNavigatorSeparator2 As ToolStripSeparator
|
||||
Friend WithEvents TBCW_PROFILESBindingNavigatorSaveItem As ToolStripButton
|
||||
Friend WithEvents FillToolStrip As ToolStrip
|
||||
Friend WithEvents GUIDToolStripLabel As ToolStripLabel
|
||||
Friend WithEvents GUIDToolStripTextBox As ToolStripTextBox
|
||||
Friend WithEvents FillToolStripButton As ToolStripButton
|
||||
Friend WithEvents GUIDTextBox As TextBox
|
||||
Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents LayoutControl1 As DevExpress.XtraLayout.LayoutControl
|
||||
Friend WithEvents TextEdit1 As DevExpress.XtraEditors.TextEdit
|
||||
Friend WithEvents Root As DevExpress.XtraLayout.LayoutControlGroup
|
||||
Friend WithEvents LayoutControlItem1 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents TextEdit2 As DevExpress.XtraEditors.TextEdit
|
||||
Friend WithEvents TextEdit3 As DevExpress.XtraEditors.TextEdit
|
||||
Friend WithEvents LayoutControlItem2 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents LayoutControlItem3 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents txtAddedWho As DevExpress.XtraEditors.TextEdit
|
||||
Friend WithEvents txtAddedWhen As DevExpress.XtraEditors.TextEdit
|
||||
Friend WithEvents txtChangedWho As DevExpress.XtraEditors.TextEdit
|
||||
Friend WithEvents txtChangedWhen As DevExpress.XtraEditors.TextEdit
|
||||
Friend WithEvents LayoutControlItem4 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents LayoutControlItem6 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents LayoutControlItem5 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents LayoutControlItem7 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents labelStatus As DevExpress.XtraBars.BarStaticItem
|
||||
Friend WithEvents labelError As DevExpress.XtraBars.BarStaticItem
|
||||
End Class
|
||||
|
||||
@@ -129,86 +129,4 @@
|
||||
<metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>612, 17</value>
|
||||
</metadata>
|
||||
<metadata name="TBCW_PROFILESBindingNavigator.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>785, 17</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="BindingNavigatorAddNewItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFKSURBVDhPYxi84O4C9v+35nH+vzqH6//FGbz/ocLEg+tA
|
||||
jX8eNf7/87Dh/8nJAqQbcH46L9yAgz0ipBtwfJIgUHPd/z8Pqv7vaBcnbMClmTz/z07l+38SqPFIv9D/
|
||||
fd0iQM3l///eK/q/vkHm/6oauf9LKxX/zy9V/j+rSBXTwFNAf/55WA/UVAvElf//3CsB4rz/f+9m/v97
|
||||
J/n/39tx///djADikP+TcjQxDTjUKwx27t/7pUCNBUCN2UCNqUCNCf//3YoGagz7/+9G0P9/1/3+d6Xp
|
||||
Yhqws13i/5Zmqf/rwM6V/7+kQvH/31sxQI3h/6fmafyfkKX1vztD9397qv7/5kRDwmEyG+hPkHP/3Qj4
|
||||
35OhQ1gDOgD5898NfyD2+9+arE+6Ad3pumD/gnB9nBHpBrQkGfxviDf8XxNr/L8y2oR0A+gEGBgAJCPY
|
||||
nnX8iGkAAAAASUVORK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
<data name="BindingNavigatorDeleteItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFvSURBVDhPtZBNKMNhHMd3Vd5K7eKCWjkgk7yEZDKksciE
|
||||
yMwkBw6LhHZxcCDlQg64SA4kJeVE4jRv89qaWn8tUtoF/7g8H2Ootb+x4nt56nm+38/v+/xUfyJcJ9Bt
|
||||
BMcOH1eRiZV5RGcVwqyHrfWwELweWJoJ9rC2AL0mRLse0VEBcxOKkLeGwlwGIz2h75w6ApC6bERjAdia
|
||||
gkxiyIow5cKkPWxDFYvTiMrUdxDDVnCfwVh/AOo/P2zhhccFzcWBLxmzEPV50Nfyu/Cn2N/1V85DGNKh
|
||||
Rhth+EaCxkLISUDWxvOgjYXa7F/Wv7kGUz4UJeKzGODi6H25d2l+yPLsDwu8v4NWHY8lSbhL0/HtbX8F
|
||||
GLXh1MQgnxwoQ3h5hkEL6JI5TlPj21gNMd6WZyC1VSN7r0Mh7G4i56pxpkQhdTWA/KQ4aUcTh+x0KACm
|
||||
RpBSo3HrM0G6Uq7pl2zvhvNDBcClE8YH4HDv2/A/SKV6BYojAxyEJtLJAAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="BindingNavigatorMoveFirstItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAEqSURBVDhPYxg8oHDW8/9NC57/z5z4+D9UCAOEtz/AKceQ
|
||||
O/PZ/1VH3v/HpSi++8H/4IZruA3ImPL0/8J9H7Aqiu95+H/p/v///asv4DYgoefJ/2lb3mMoimi/D9ac
|
||||
Oev/f6/SE7gNiOx69L939QcURaGt98CaW9cBbe/8+98l/wBuAwKbH/6vm/8Orii45e7/RXv//+8Aas6Y
|
||||
8/O/Xd3P//YZ23Eb4FF1/3/+tDcoiuyKb/9Pn/P7v3/Xt/86he/+WySsx22Afend/9mTX2Mo0k85/9+k
|
||||
6MV/laxP/40jl+E2wCLvzv/U/tdYFRkknfgvm/b1v27wPNwGGGbd/h/W8hKnIv3Uy/81fKfhNkAn7cZ/
|
||||
v+qHeBWpeEzAbYBT7pX/IAV4FQ1CwMAAAPB2wKul5ZpwAAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAC2SURBVDhPYxg6ILz9wX8ok3QQ3/3gf3DDNfIMiO95+H/p
|
||||
/v///asvkG5ARPt9sObMWf//e5WeIM2A0NZ7YM2t64C2d/7975J/gHgDglvu/l+09///DqDmjDk//9vV
|
||||
/fxvn7GdNBfYFd/+nz7n93//rm//dQrf/bdIWE96GOinnP9vUvTiv0rWp//GkctINwAEDJJO/JdN+/pf
|
||||
N3geeQaAgH7q5f8avtPINwAEVDwmUGbAYAUMDADQFGCYBLpQVQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="BindingNavigatorMoveNextItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAACjSURBVDhPYxh8oHDW8/9QJnkgd+az/wnd98g3JGPK0//z
|
||||
9v/+n9B1hzxDEnqe/J+979f/zq1//7uVXibdkMiuR/+nbPv1v2Tp3/8J0//+t8k9S5ohgc0P/7eufQ/W
|
||||
bFzy5b909LX/xpHLiDfEo+r+/5K57+CaFV16SHOBfend/4Etz8jTDAIWeXf+2xRcIU8zCBhm3SZfMwjo
|
||||
pN0gX/NQBAwMAKB+X6AHNEI4AAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="BindingNavigatorMoveLastItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAEsSURBVDhPYxhcoHDW8/9QJgYAyTUteP4/c+JjnGoYcmc+
|
||||
+5/QfQ+rApDcqiPv/4e3P8BtQMaUp//n7f/9P6HrDoYikNzCfR/+Bzdcw21AQs+T/7P3/frfufXvf7fS
|
||||
yygKQXLTtrz/7199AbcBkV2P/k/Z9ut/ydK//xOm//1vk3sWrhgk17v6w3+v0hO4DQhsfvi/de17sGbj
|
||||
ki//paOv/TeOXAbWAJKrm//uv0v+AdwGeFTd/18y9x1cs6JLD1wxSC5/2pv/9hnbcRtgX3r3f2DLMwzN
|
||||
IACSy578+r9FwnrcBljk3flvU3AFQzMIgORS+1/DvYQVGGbdxqoZBEByYS0v/+sGz8NtgE7aDZySIDm/
|
||||
6of/NXyn4TYAH3DKvfJfxWMCGEOFBgVgYAAAvtG/s7kMTpwAAAAASUVORK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
<data name="TBCW_PROFILESBindingNavigatorSaveItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAABMSURBVDhPY6AK+Pbt239SMVQrBIAFgufA8Yf3H+EYWQxE
|
||||
x0zYh2kIKQaAMMwQqHbSDQBhog1AxshqaGsAMXjUgEFpADkYqp0SwMAAAPRDDFPA2mtzAAAAAElFTkSu
|
||||
QmCC
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="FillToolStrip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1021, 17</value>
|
||||
</metadata>
|
||||
<metadata name="GUIDLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>False</value>
|
||||
</metadata>
|
||||
</root>
|
||||
@@ -1,7 +1,6 @@
|
||||
Imports DigitalData.Modules.Logging
|
||||
|
||||
Public Class frmAdmin_CWProfile
|
||||
'Inherits frmAdmin_Base
|
||||
Implements frmAdmin_Interface
|
||||
|
||||
Public Property PrimaryKey As Integer Implements frmAdmin_Interface.PrimaryKey
|
||||
@@ -12,27 +11,70 @@ Public Class frmAdmin_CWProfile
|
||||
|
||||
Private Property Logger As Logger Implements frmAdmin_Interface.Logger
|
||||
|
||||
Private Sub frmAdmin_CWProfile_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
Public Sub New(PrimaryKey As Integer)
|
||||
' Dieser Aufruf ist für den Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||
Logger = My.LogConfig.GetLogger()
|
||||
Me.PrimaryKey = PrimaryKey
|
||||
Me.IsInsert = IsInsert
|
||||
End Sub
|
||||
|
||||
Private Sub frmAdmin_CWProfile_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
Try
|
||||
TBCW_PROFILESTableAdapter.Fill(DBCW_Stammdaten.TBCW_PROFILES, PrimaryKey)
|
||||
Catch ex As Exception
|
||||
ShowError(ex)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub ResetMessages()
|
||||
labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
|
||||
End Sub
|
||||
|
||||
Private Sub ShowStatus(Message As String)
|
||||
labelStatus.Caption = Message
|
||||
labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
End Sub
|
||||
|
||||
Public Function SaveData() As Boolean Implements frmAdmin_Interface.SaveData
|
||||
Try
|
||||
TBCW_PROFILESBindingSource.EndEdit()
|
||||
|
||||
If DBCW_Stammdaten.TBCW_PROFILES.GetChanges() IsNot Nothing Then
|
||||
HasChanges = True
|
||||
|
||||
If IsInsert Then
|
||||
txtAddedWho.EditValue = My.Application.User.UserName
|
||||
Else
|
||||
txtChangedWho.EditValue = My.Application.User.UserName
|
||||
End If
|
||||
|
||||
TBCW_PROFILESBindingSource.EndEdit()
|
||||
TBCW_PROFILESTableAdapter.Update(DBCW_Stammdaten.TBCW_PROFILES)
|
||||
End If
|
||||
|
||||
Return True
|
||||
Catch ex As Exception
|
||||
ShowError(ex)
|
||||
Return False
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Private Sub TBCW_PROFILESBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles TBCW_PROFILESBindingNavigatorSaveItem.Click
|
||||
Me.Validate()
|
||||
Me.TBCW_PROFILESBindingSource.EndEdit()
|
||||
Me.TableAdapterManager.UpdateAll(Me.DBCW_Stammdaten)
|
||||
Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
|
||||
ResetMessages()
|
||||
|
||||
If SaveData() Then
|
||||
Close()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub FillToolStripButton_Click(sender As Object, e As EventArgs) Handles FillToolStripButton.Click
|
||||
Try
|
||||
Me.TBCW_PROFILESTableAdapter.Fill(Me.DBCW_Stammdaten.TBCW_PROFILES, CType(GUIDToolStripTextBox.Text, Integer))
|
||||
Catch ex As System.Exception
|
||||
System.Windows.Forms.MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
|
||||
ResetMessages()
|
||||
|
||||
If SaveData() And HasChanges Then
|
||||
ShowStatus("Attribute gespeichert!")
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
@@ -100,7 +100,7 @@ Partial Class frmAdmin_IDBAttribute
|
||||
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
|
||||
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
|
||||
Me.RibbonControl1.Size = New System.Drawing.Size(800, 66)
|
||||
Me.RibbonControl1.Size = New System.Drawing.Size(800, 63)
|
||||
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
|
||||
'
|
||||
'BarButtonItem1
|
||||
@@ -142,10 +142,10 @@ Partial Class frmAdmin_IDBAttribute
|
||||
'RibbonStatusBar1
|
||||
'
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.labelStatus)
|
||||
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 428)
|
||||
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 426)
|
||||
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
|
||||
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
|
||||
Me.RibbonStatusBar1.Size = New System.Drawing.Size(800, 22)
|
||||
Me.RibbonStatusBar1.Size = New System.Drawing.Size(800, 24)
|
||||
'
|
||||
'RibbonPage2
|
||||
'
|
||||
@@ -166,21 +166,21 @@ Partial Class frmAdmin_IDBAttribute
|
||||
Me.LayoutControl1.Controls.Add(Me.txtChangedWhen)
|
||||
Me.LayoutControl1.Controls.Add(Me.ComboBoxEdit1)
|
||||
Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.LayoutControl1.Location = New System.Drawing.Point(0, 66)
|
||||
Me.LayoutControl1.Location = New System.Drawing.Point(0, 63)
|
||||
Me.LayoutControl1.Name = "LayoutControl1"
|
||||
Me.LayoutControl1.Root = Me.Root
|
||||
Me.LayoutControl1.Size = New System.Drawing.Size(800, 362)
|
||||
Me.LayoutControl1.Size = New System.Drawing.Size(800, 363)
|
||||
Me.LayoutControl1.TabIndex = 2
|
||||
Me.LayoutControl1.Text = "LayoutControl1"
|
||||
'
|
||||
'TextEdit1
|
||||
'
|
||||
Me.TextEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "GUID", True))
|
||||
Me.TextEdit1.Location = New System.Drawing.Point(168, 20)
|
||||
Me.TextEdit1.Location = New System.Drawing.Point(154, 20)
|
||||
Me.TextEdit1.MenuManager = Me.RibbonControl1
|
||||
Me.TextEdit1.Name = "TextEdit1"
|
||||
Me.TextEdit1.Properties.ReadOnly = True
|
||||
Me.TextEdit1.Size = New System.Drawing.Size(612, 20)
|
||||
Me.TextEdit1.Size = New System.Drawing.Size(626, 20)
|
||||
Me.TextEdit1.StyleController = Me.LayoutControl1
|
||||
Me.TextEdit1.TabIndex = 4
|
||||
'
|
||||
@@ -197,10 +197,10 @@ Partial Class frmAdmin_IDBAttribute
|
||||
'TextEdit2
|
||||
'
|
||||
Me.TextEdit2.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "TITLE", True))
|
||||
Me.TextEdit2.Location = New System.Drawing.Point(168, 60)
|
||||
Me.TextEdit2.Location = New System.Drawing.Point(154, 60)
|
||||
Me.TextEdit2.MenuManager = Me.RibbonControl1
|
||||
Me.TextEdit2.Name = "TextEdit2"
|
||||
Me.TextEdit2.Size = New System.Drawing.Size(612, 20)
|
||||
Me.TextEdit2.Size = New System.Drawing.Size(626, 20)
|
||||
Me.TextEdit2.StyleController = Me.LayoutControl1
|
||||
Me.TextEdit2.TabIndex = 5
|
||||
'
|
||||
@@ -208,11 +208,11 @@ Partial Class frmAdmin_IDBAttribute
|
||||
'
|
||||
Me.SpinEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "VIEW_SEQUENCE", True))
|
||||
Me.SpinEdit1.EditValue = New Decimal(New Integer() {0, 0, 0, 0})
|
||||
Me.SpinEdit1.Location = New System.Drawing.Point(558, 180)
|
||||
Me.SpinEdit1.Location = New System.Drawing.Point(544, 180)
|
||||
Me.SpinEdit1.MenuManager = Me.RibbonControl1
|
||||
Me.SpinEdit1.Name = "SpinEdit1"
|
||||
Me.SpinEdit1.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
|
||||
Me.SpinEdit1.Size = New System.Drawing.Size(222, 20)
|
||||
Me.SpinEdit1.Size = New System.Drawing.Size(236, 20)
|
||||
Me.SpinEdit1.StyleController = Me.LayoutControl1
|
||||
Me.SpinEdit1.TabIndex = 6
|
||||
'
|
||||
@@ -223,7 +223,7 @@ Partial Class frmAdmin_IDBAttribute
|
||||
Me.CheckEdit1.MenuManager = Me.RibbonControl1
|
||||
Me.CheckEdit1.Name = "CheckEdit1"
|
||||
Me.CheckEdit1.Properties.Caption = "Attribut mehrzeilig"
|
||||
Me.CheckEdit1.Size = New System.Drawing.Size(760, 18)
|
||||
Me.CheckEdit1.Size = New System.Drawing.Size(760, 20)
|
||||
Me.CheckEdit1.StyleController = Me.LayoutControl1
|
||||
Me.CheckEdit1.TabIndex = 7
|
||||
'
|
||||
@@ -234,72 +234,72 @@ Partial Class frmAdmin_IDBAttribute
|
||||
Me.CheckEdit2.MenuManager = Me.RibbonControl1
|
||||
Me.CheckEdit2.Name = "CheckEdit2"
|
||||
Me.CheckEdit2.Properties.Caption = "Standard in Ergebnisliste"
|
||||
Me.CheckEdit2.Size = New System.Drawing.Size(370, 18)
|
||||
Me.CheckEdit2.Size = New System.Drawing.Size(370, 20)
|
||||
Me.CheckEdit2.StyleController = Me.LayoutControl1
|
||||
Me.CheckEdit2.TabIndex = 8
|
||||
'
|
||||
'TextEdit3
|
||||
'
|
||||
Me.TextEdit3.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "COMMENT", True))
|
||||
Me.TextEdit3.Location = New System.Drawing.Point(168, 140)
|
||||
Me.TextEdit3.Location = New System.Drawing.Point(154, 140)
|
||||
Me.TextEdit3.MenuManager = Me.RibbonControl1
|
||||
Me.TextEdit3.Name = "TextEdit3"
|
||||
Me.TextEdit3.Size = New System.Drawing.Size(612, 20)
|
||||
Me.TextEdit3.Size = New System.Drawing.Size(626, 20)
|
||||
Me.TextEdit3.StyleController = Me.LayoutControl1
|
||||
Me.TextEdit3.TabIndex = 9
|
||||
'
|
||||
'txtAddedWho
|
||||
'
|
||||
Me.txtAddedWho.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "ADDED_WHO", True))
|
||||
Me.txtAddedWho.Location = New System.Drawing.Point(168, 258)
|
||||
Me.txtAddedWho.Location = New System.Drawing.Point(154, 260)
|
||||
Me.txtAddedWho.MenuManager = Me.RibbonControl1
|
||||
Me.txtAddedWho.Name = "txtAddedWho"
|
||||
Me.txtAddedWho.Properties.ReadOnly = True
|
||||
Me.txtAddedWho.Size = New System.Drawing.Size(222, 20)
|
||||
Me.txtAddedWho.Size = New System.Drawing.Size(236, 20)
|
||||
Me.txtAddedWho.StyleController = Me.LayoutControl1
|
||||
Me.txtAddedWho.TabIndex = 10
|
||||
'
|
||||
'txtAddedWhen
|
||||
'
|
||||
Me.txtAddedWhen.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "ADDED_WHEN", True))
|
||||
Me.txtAddedWhen.Location = New System.Drawing.Point(558, 258)
|
||||
Me.txtAddedWhen.Location = New System.Drawing.Point(544, 260)
|
||||
Me.txtAddedWhen.MenuManager = Me.RibbonControl1
|
||||
Me.txtAddedWhen.Name = "txtAddedWhen"
|
||||
Me.txtAddedWhen.Properties.ReadOnly = True
|
||||
Me.txtAddedWhen.Size = New System.Drawing.Size(222, 20)
|
||||
Me.txtAddedWhen.Size = New System.Drawing.Size(236, 20)
|
||||
Me.txtAddedWhen.StyleController = Me.LayoutControl1
|
||||
Me.txtAddedWhen.TabIndex = 11
|
||||
'
|
||||
'txtChangedWho
|
||||
'
|
||||
Me.txtChangedWho.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "CHANGED_WHO", True))
|
||||
Me.txtChangedWho.Location = New System.Drawing.Point(168, 298)
|
||||
Me.txtChangedWho.Location = New System.Drawing.Point(154, 300)
|
||||
Me.txtChangedWho.MenuManager = Me.RibbonControl1
|
||||
Me.txtChangedWho.Name = "txtChangedWho"
|
||||
Me.txtChangedWho.Properties.ReadOnly = True
|
||||
Me.txtChangedWho.Size = New System.Drawing.Size(222, 20)
|
||||
Me.txtChangedWho.Size = New System.Drawing.Size(236, 20)
|
||||
Me.txtChangedWho.StyleController = Me.LayoutControl1
|
||||
Me.txtChangedWho.TabIndex = 12
|
||||
'
|
||||
'txtChangedWhen
|
||||
'
|
||||
Me.txtChangedWhen.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "CHANGED_WHEN", True))
|
||||
Me.txtChangedWhen.Location = New System.Drawing.Point(558, 298)
|
||||
Me.txtChangedWhen.Location = New System.Drawing.Point(544, 300)
|
||||
Me.txtChangedWhen.MenuManager = Me.RibbonControl1
|
||||
Me.txtChangedWhen.Name = "txtChangedWhen"
|
||||
Me.txtChangedWhen.Properties.ReadOnly = True
|
||||
Me.txtChangedWhen.Size = New System.Drawing.Size(222, 20)
|
||||
Me.txtChangedWhen.Size = New System.Drawing.Size(236, 20)
|
||||
Me.txtChangedWhen.StyleController = Me.LayoutControl1
|
||||
Me.txtChangedWhen.TabIndex = 13
|
||||
'
|
||||
'ComboBoxEdit1
|
||||
'
|
||||
Me.ComboBoxEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "TYP_ID", True))
|
||||
Me.ComboBoxEdit1.Location = New System.Drawing.Point(168, 100)
|
||||
Me.ComboBoxEdit1.Location = New System.Drawing.Point(154, 100)
|
||||
Me.ComboBoxEdit1.MenuManager = Me.RibbonControl1
|
||||
Me.ComboBoxEdit1.Name = "ComboBoxEdit1"
|
||||
Me.ComboBoxEdit1.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
|
||||
Me.ComboBoxEdit1.Size = New System.Drawing.Size(612, 20)
|
||||
Me.ComboBoxEdit1.Size = New System.Drawing.Size(626, 20)
|
||||
Me.ComboBoxEdit1.StyleController = Me.LayoutControl1
|
||||
Me.ComboBoxEdit1.TabIndex = 14
|
||||
'
|
||||
@@ -309,7 +309,7 @@ Partial Class frmAdmin_IDBAttribute
|
||||
Me.Root.GroupBordersVisible = False
|
||||
Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem4, Me.LayoutControlItem6, Me.LayoutControlItem7, Me.LayoutControlItem3, Me.LayoutControlItem11, Me.LayoutControlItem9, Me.LayoutControlItem5, Me.LayoutControlItem8, Me.LayoutControlItem10})
|
||||
Me.Root.Name = "Root"
|
||||
Me.Root.Size = New System.Drawing.Size(800, 362)
|
||||
Me.Root.Size = New System.Drawing.Size(800, 363)
|
||||
Me.Root.TextVisible = False
|
||||
'
|
||||
'LayoutControlItem1
|
||||
@@ -321,7 +321,7 @@ Partial Class frmAdmin_IDBAttribute
|
||||
Me.LayoutControlItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem1.Size = New System.Drawing.Size(780, 40)
|
||||
Me.LayoutControlItem1.Text = "GUID"
|
||||
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(145, 13)
|
||||
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(131, 13)
|
||||
'
|
||||
'LayoutControlItem2
|
||||
'
|
||||
@@ -331,7 +331,7 @@ Partial Class frmAdmin_IDBAttribute
|
||||
Me.LayoutControlItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem2.Size = New System.Drawing.Size(780, 40)
|
||||
Me.LayoutControlItem2.Text = "Bezeichnung"
|
||||
Me.LayoutControlItem2.TextSize = New System.Drawing.Size(145, 13)
|
||||
Me.LayoutControlItem2.TextSize = New System.Drawing.Size(131, 13)
|
||||
'
|
||||
'LayoutControlItem4
|
||||
'
|
||||
@@ -339,7 +339,7 @@ Partial Class frmAdmin_IDBAttribute
|
||||
Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 200)
|
||||
Me.LayoutControlItem4.Name = "LayoutControlItem4"
|
||||
Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem4.Size = New System.Drawing.Size(780, 38)
|
||||
Me.LayoutControlItem4.Size = New System.Drawing.Size(780, 40)
|
||||
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(0, 0)
|
||||
Me.LayoutControlItem4.TextVisible = False
|
||||
'
|
||||
@@ -351,17 +351,17 @@ Partial Class frmAdmin_IDBAttribute
|
||||
Me.LayoutControlItem6.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem6.Size = New System.Drawing.Size(780, 40)
|
||||
Me.LayoutControlItem6.Text = "Kommentar"
|
||||
Me.LayoutControlItem6.TextSize = New System.Drawing.Size(145, 13)
|
||||
Me.LayoutControlItem6.TextSize = New System.Drawing.Size(131, 13)
|
||||
'
|
||||
'LayoutControlItem7
|
||||
'
|
||||
Me.LayoutControlItem7.Control = Me.txtAddedWho
|
||||
Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 238)
|
||||
Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 240)
|
||||
Me.LayoutControlItem7.Name = "LayoutControlItem7"
|
||||
Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem7.Size = New System.Drawing.Size(390, 40)
|
||||
Me.LayoutControlItem7.Text = "Erstellt Wer"
|
||||
Me.LayoutControlItem7.TextSize = New System.Drawing.Size(145, 13)
|
||||
Me.LayoutControlItem7.TextSize = New System.Drawing.Size(131, 13)
|
||||
'
|
||||
'LayoutControlItem3
|
||||
'
|
||||
@@ -372,7 +372,7 @@ Partial Class frmAdmin_IDBAttribute
|
||||
Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem3.Size = New System.Drawing.Size(390, 40)
|
||||
Me.LayoutControlItem3.Text = "Reihenfolge in Ergebnisliste"
|
||||
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(145, 13)
|
||||
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(131, 13)
|
||||
'
|
||||
'LayoutControlItem11
|
||||
'
|
||||
@@ -382,17 +382,17 @@ Partial Class frmAdmin_IDBAttribute
|
||||
Me.LayoutControlItem11.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem11.Size = New System.Drawing.Size(780, 40)
|
||||
Me.LayoutControlItem11.Text = "Attribut-Typ"
|
||||
Me.LayoutControlItem11.TextSize = New System.Drawing.Size(145, 13)
|
||||
Me.LayoutControlItem11.TextSize = New System.Drawing.Size(131, 13)
|
||||
'
|
||||
'LayoutControlItem9
|
||||
'
|
||||
Me.LayoutControlItem9.Control = Me.txtChangedWho
|
||||
Me.LayoutControlItem9.Location = New System.Drawing.Point(0, 278)
|
||||
Me.LayoutControlItem9.Location = New System.Drawing.Point(0, 280)
|
||||
Me.LayoutControlItem9.Name = "LayoutControlItem9"
|
||||
Me.LayoutControlItem9.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem9.Size = New System.Drawing.Size(390, 64)
|
||||
Me.LayoutControlItem9.Size = New System.Drawing.Size(390, 63)
|
||||
Me.LayoutControlItem9.Text = "Geändert Wer"
|
||||
Me.LayoutControlItem9.TextSize = New System.Drawing.Size(145, 13)
|
||||
Me.LayoutControlItem9.TextSize = New System.Drawing.Size(131, 13)
|
||||
'
|
||||
'LayoutControlItem5
|
||||
'
|
||||
@@ -407,22 +407,22 @@ Partial Class frmAdmin_IDBAttribute
|
||||
'LayoutControlItem8
|
||||
'
|
||||
Me.LayoutControlItem8.Control = Me.txtAddedWhen
|
||||
Me.LayoutControlItem8.Location = New System.Drawing.Point(390, 238)
|
||||
Me.LayoutControlItem8.Location = New System.Drawing.Point(390, 240)
|
||||
Me.LayoutControlItem8.Name = "LayoutControlItem8"
|
||||
Me.LayoutControlItem8.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem8.Size = New System.Drawing.Size(390, 40)
|
||||
Me.LayoutControlItem8.Text = "Erstellt Wann"
|
||||
Me.LayoutControlItem8.TextSize = New System.Drawing.Size(145, 13)
|
||||
Me.LayoutControlItem8.TextSize = New System.Drawing.Size(131, 13)
|
||||
'
|
||||
'LayoutControlItem10
|
||||
'
|
||||
Me.LayoutControlItem10.Control = Me.txtChangedWhen
|
||||
Me.LayoutControlItem10.Location = New System.Drawing.Point(390, 278)
|
||||
Me.LayoutControlItem10.Location = New System.Drawing.Point(390, 280)
|
||||
Me.LayoutControlItem10.Name = "LayoutControlItem10"
|
||||
Me.LayoutControlItem10.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
|
||||
Me.LayoutControlItem10.Size = New System.Drawing.Size(390, 64)
|
||||
Me.LayoutControlItem10.Size = New System.Drawing.Size(390, 63)
|
||||
Me.LayoutControlItem10.Text = "Geändert Wann"
|
||||
Me.LayoutControlItem10.TextSize = New System.Drawing.Size(145, 13)
|
||||
Me.LayoutControlItem10.TextSize = New System.Drawing.Size(131, 13)
|
||||
'
|
||||
'TBIDB_ATTRIBUTETableAdapter
|
||||
'
|
||||
@@ -446,10 +446,11 @@ Partial Class frmAdmin_IDBAttribute
|
||||
Me.Controls.Add(Me.LayoutControl1)
|
||||
Me.Controls.Add(Me.RibbonStatusBar1)
|
||||
Me.Controls.Add(Me.RibbonControl1)
|
||||
Me.IconOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.bo_appearance
|
||||
Me.Name = "frmAdmin_IDBAttribute"
|
||||
Me.Ribbon = Me.RibbonControl1
|
||||
Me.StatusBar = Me.RibbonStatusBar1
|
||||
Me.Text = "frmAdmin_Attribute"
|
||||
Me.Text = "IDB - Attribut"
|
||||
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.LayoutControl1.ResumeLayout(False)
|
||||
|
||||
@@ -123,6 +123,9 @@
|
||||
<metadata name="DSIDB_Stammdaten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>74, 22</value>
|
||||
</metadata>
|
||||
<metadata name="DSIDB_Stammdaten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>74, 22</value>
|
||||
</metadata>
|
||||
<metadata name="TBIDB_ATTRIBUTETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>649, 17</value>
|
||||
</metadata>
|
||||
|
||||
@@ -116,6 +116,7 @@ Partial Class frmAdmin_SourceSQL
|
||||
Me.labelStatus.Id = 3
|
||||
Me.labelStatus.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.about1
|
||||
Me.labelStatus.Name = "labelStatus"
|
||||
Me.labelStatus.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
|
||||
Me.labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
|
||||
'
|
||||
'labelError
|
||||
@@ -394,10 +395,11 @@ Partial Class frmAdmin_SourceSQL
|
||||
Me.Controls.Add(Me.LayoutControl1)
|
||||
Me.Controls.Add(Me.RibbonStatusBar1)
|
||||
Me.Controls.Add(Me.RibbonControl1)
|
||||
Me.IconOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.managedatasource
|
||||
Me.Name = "frmAdmin_SourceSQL"
|
||||
Me.Ribbon = Me.RibbonControl1
|
||||
Me.StatusBar = Me.RibbonStatusBar1
|
||||
Me.Text = "Source SQL"
|
||||
Me.Text = "IDB - Source SQL"
|
||||
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.LayoutControl1.ResumeLayout(False)
|
||||
|
||||
@@ -123,9 +123,6 @@
|
||||
<metadata name="DSIDB_Stammdaten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>314, 17</value>
|
||||
</metadata>
|
||||
<metadata name="DSIDB_Stammdaten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>314, 17</value>
|
||||
</metadata>
|
||||
<metadata name="TBZF_ADMIN_SOURCE_SQLTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>754, 17</value>
|
||||
</metadata>
|
||||
|
||||
222
GUIs.ZooFlow/Administration/frmAdmin_Start.Designer.vb
generated
222
GUIs.ZooFlow/Administration/frmAdmin_Start.Designer.vb
generated
@@ -34,7 +34,13 @@ Partial Class frmAdmin_Start
|
||||
Dim VIEW_SEQUENCELabel As System.Windows.Forms.Label
|
||||
Dim TITLELabel As System.Windows.Forms.Label
|
||||
Dim GUIDLabel As System.Windows.Forms.Label
|
||||
Dim GridLevelNode1 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
|
||||
Dim GridLevelNode2 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
|
||||
Dim GridLevelNode3 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAdmin_Start))
|
||||
Me.ViewCWProcesses = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.GridCWProfiles = New DevExpress.XtraGrid.GridControl()
|
||||
Me.WinExplorerView1 = New DevExpress.XtraGrid.Views.WinExplorer.WinExplorerView()
|
||||
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
|
||||
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
|
||||
@@ -63,10 +69,12 @@ Partial Class frmAdmin_Start
|
||||
Me.RibbonPage_IDB = New DevExpress.XtraBars.Ribbon.RibbonPage()
|
||||
Me.RibbonPageGroupAttributes = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
||||
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
|
||||
Me.ViewCWWindows = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.ViewCWControls = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
|
||||
Me.TreeListMenu = New DevExpress.XtraTreeList.TreeList()
|
||||
Me.TreeListColumn1 = New DevExpress.XtraTreeList.Columns.TreeListColumn()
|
||||
Me.SvgImageCollection1 = New DevExpress.Utils.SvgImageCollection(Me.components)
|
||||
Me.MainTreeImages = New DevExpress.Utils.SvgImageCollection(Me.components)
|
||||
Me.DockManager1 = New DevExpress.XtraBars.Docking.DockManager(Me.components)
|
||||
Me.DockPanel1 = New DevExpress.XtraBars.Docking.DockPanel()
|
||||
Me.DockPanel1_Container = New DevExpress.XtraBars.Docking.ControlContainer()
|
||||
@@ -81,6 +89,7 @@ Partial Class frmAdmin_Start
|
||||
Me.XtraTabPageIDB_Attributes_New = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.GridAttributes = New DevExpress.XtraGrid.GridControl()
|
||||
Me.ViewAttributes = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.GridView2 = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.XtraTabPageIDB_Attributes = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.ComboBox1 = New System.Windows.Forms.ComboBox()
|
||||
Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
|
||||
@@ -103,11 +112,18 @@ Partial Class frmAdmin_Start
|
||||
Me.GridSourceSQL = New DevExpress.XtraGrid.GridControl()
|
||||
Me.ViewSourceSQL = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.XtraTabPage_GlobalIndexer = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.TreeList2 = 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.GridControl2 = New DevExpress.XtraGrid.GridControl()
|
||||
Me.GridView2 = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.TreeList1 = New DevExpress.XtraTreeList.TreeList()
|
||||
Me.COL_ENTITY = New DevExpress.XtraTreeList.Columns.TreeListColumn()
|
||||
Me.COL_ENITY_SCOPE = New DevExpress.XtraTreeList.Columns.TreeListColumn()
|
||||
Me.COL_PARENT = New DevExpress.XtraTreeList.Columns.TreeListColumn()
|
||||
Me.COL_GUID = New DevExpress.XtraTreeList.Columns.TreeListColumn()
|
||||
Me.COL_NODE_TITLE = New DevExpress.XtraTreeList.Columns.TreeListColumn()
|
||||
Me.CWImages = New DevExpress.Utils.SvgImageCollection(Me.components)
|
||||
Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.XtraTabControl = New DevExpress.XtraTab.XtraTabControl()
|
||||
CHANGED_WHENLabel = New System.Windows.Forms.Label()
|
||||
@@ -118,9 +134,14 @@ Partial Class frmAdmin_Start
|
||||
VIEW_SEQUENCELabel = New System.Windows.Forms.Label()
|
||||
TITLELabel = New System.Windows.Forms.Label()
|
||||
GUIDLabel = New System.Windows.Forms.Label()
|
||||
CType(Me.ViewCWProcesses, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridCWProfiles, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.WinExplorerView1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.ViewCWWindows, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.ViewCWControls, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TreeListMenu, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.MainTreeImages, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.DockManager1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.DockPanel1.SuspendLayout()
|
||||
Me.DockPanel1_Container.SuspendLayout()
|
||||
@@ -133,18 +154,22 @@ Partial Class frmAdmin_Start
|
||||
Me.XtraTabPageIDB_Attributes_New.SuspendLayout()
|
||||
CType(Me.GridAttributes, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.ViewAttributes, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.XtraTabPageIDB_Attributes.SuspendLayout()
|
||||
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.XtraTabPageIDB_SourceSQL.SuspendLayout()
|
||||
CType(Me.GridSourceSQL, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.ViewSourceSQL, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.XtraTabPage_GlobalIndexer.SuspendLayout()
|
||||
CType(Me.TreeList2, 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.GridControl2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TreeList1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.CWImages, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.XtraTabControl, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.XtraTabControl.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
@@ -221,6 +246,36 @@ Partial Class frmAdmin_Start
|
||||
GUIDLabel.TabIndex = 0
|
||||
GUIDLabel.Text = "GUID:"
|
||||
'
|
||||
'ViewCWProcesses
|
||||
'
|
||||
Me.ViewCWProcesses.GridControl = Me.GridCWProfiles
|
||||
Me.ViewCWProcesses.Name = "ViewCWProcesses"
|
||||
Me.ViewCWProcesses.VertScrollVisibility = DevExpress.XtraGrid.Views.Base.ScrollVisibility.Never
|
||||
'
|
||||
'GridCWProfiles
|
||||
'
|
||||
GridLevelNode1.LevelTemplate = Me.ViewCWProcesses
|
||||
GridLevelNode2.LevelTemplate = Me.ViewCWWindows
|
||||
GridLevelNode3.LevelTemplate = Me.ViewCWControls
|
||||
GridLevelNode3.RelationName = "Level3"
|
||||
GridLevelNode2.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode3})
|
||||
GridLevelNode2.RelationName = "Level2"
|
||||
GridLevelNode1.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode2})
|
||||
GridLevelNode1.RelationName = "Level1"
|
||||
Me.GridCWProfiles.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode1})
|
||||
Me.GridCWProfiles.Location = New System.Drawing.Point(819, 41)
|
||||
Me.GridCWProfiles.MainView = Me.WinExplorerView1
|
||||
Me.GridCWProfiles.MenuManager = Me.RibbonControl1
|
||||
Me.GridCWProfiles.Name = "GridCWProfiles"
|
||||
Me.GridCWProfiles.Size = New System.Drawing.Size(319, 266)
|
||||
Me.GridCWProfiles.TabIndex = 0
|
||||
Me.GridCWProfiles.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.WinExplorerView1, Me.ViewCWWindows, Me.ViewCWControls, Me.ViewCWProcesses})
|
||||
'
|
||||
'WinExplorerView1
|
||||
'
|
||||
Me.WinExplorerView1.GridControl = Me.GridCWProfiles
|
||||
Me.WinExplorerView1.Name = "WinExplorerView1"
|
||||
'
|
||||
'RibbonControl1
|
||||
'
|
||||
Me.RibbonControl1.ExpandCollapseItem.Id = 0
|
||||
@@ -279,6 +334,7 @@ Partial Class frmAdmin_Start
|
||||
Me.labelStatus.Id = 6
|
||||
Me.labelStatus.ImageOptions.SvgImage = CType(resources.GetObject("labelStatus.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.labelStatus.Name = "labelStatus"
|
||||
Me.labelStatus.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
|
||||
Me.labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
|
||||
'
|
||||
'labelError
|
||||
@@ -424,6 +480,16 @@ Partial Class frmAdmin_Start
|
||||
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
|
||||
Me.RibbonStatusBar1.Size = New System.Drawing.Size(1328, 22)
|
||||
'
|
||||
'ViewCWWindows
|
||||
'
|
||||
Me.ViewCWWindows.GridControl = Me.GridCWProfiles
|
||||
Me.ViewCWWindows.Name = "ViewCWWindows"
|
||||
'
|
||||
'ViewCWControls
|
||||
'
|
||||
Me.ViewCWControls.GridControl = Me.GridCWProfiles
|
||||
Me.ViewCWControls.Name = "ViewCWControls"
|
||||
'
|
||||
'RibbonPage2
|
||||
'
|
||||
Me.RibbonPage2.Name = "RibbonPage2"
|
||||
@@ -453,7 +519,7 @@ Partial Class frmAdmin_Start
|
||||
Me.TreeListMenu.OptionsView.ShowHorzLines = False
|
||||
Me.TreeListMenu.OptionsView.ShowIndicator = False
|
||||
Me.TreeListMenu.OptionsView.ShowVertLines = False
|
||||
Me.TreeListMenu.SelectImageList = Me.SvgImageCollection1
|
||||
Me.TreeListMenu.SelectImageList = Me.MainTreeImages
|
||||
Me.TreeListMenu.Size = New System.Drawing.Size(193, 521)
|
||||
Me.TreeListMenu.TabIndex = 8
|
||||
'
|
||||
@@ -465,14 +531,14 @@ Partial Class frmAdmin_Start
|
||||
Me.TreeListColumn1.Visible = True
|
||||
Me.TreeListColumn1.VisibleIndex = 0
|
||||
'
|
||||
'SvgImageCollection1
|
||||
'MainTreeImages
|
||||
'
|
||||
Me.SvgImageCollection1.Add("shopping_box", "image://svgimages/icon builder/shopping_box.svg")
|
||||
Me.SvgImageCollection1.Add("bo_organization", "image://svgimages/business objects/bo_organization.svg")
|
||||
Me.SvgImageCollection1.Add("bo_appearance", "image://svgimages/business objects/bo_appearance.svg")
|
||||
Me.SvgImageCollection1.Add("managedatasource", "image://svgimages/spreadsheet/managedatasource.svg")
|
||||
Me.SvgImageCollection1.Add("grandtotals", "image://svgimages/dashboards/grandtotals.svg")
|
||||
Me.SvgImageCollection1.Add("allowuserstoeditranges", "image://svgimages/spreadsheet/allowuserstoeditranges.svg")
|
||||
Me.MainTreeImages.Add("shopping_box", "image://svgimages/icon builder/shopping_box.svg")
|
||||
Me.MainTreeImages.Add("bo_organization", "image://svgimages/business objects/bo_organization.svg")
|
||||
Me.MainTreeImages.Add("bo_appearance", "image://svgimages/business objects/bo_appearance.svg")
|
||||
Me.MainTreeImages.Add("managedatasource", "image://svgimages/spreadsheet/managedatasource.svg")
|
||||
Me.MainTreeImages.Add("grandtotals", "image://svgimages/dashboards/grandtotals.svg")
|
||||
Me.MainTreeImages.Add("allowuserstoeditranges", "image://svgimages/spreadsheet/allowuserstoeditranges.svg")
|
||||
'
|
||||
'DockManager1
|
||||
'
|
||||
@@ -565,13 +631,18 @@ Partial Class frmAdmin_Start
|
||||
Me.GridAttributes.Name = "GridAttributes"
|
||||
Me.GridAttributes.Size = New System.Drawing.Size(1124, 524)
|
||||
Me.GridAttributes.TabIndex = 0
|
||||
Me.GridAttributes.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewAttributes})
|
||||
Me.GridAttributes.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewAttributes, Me.GridView2})
|
||||
'
|
||||
'ViewAttributes
|
||||
'
|
||||
Me.ViewAttributes.GridControl = Me.GridAttributes
|
||||
Me.ViewAttributes.Name = "ViewAttributes"
|
||||
'
|
||||
'GridView2
|
||||
'
|
||||
Me.GridView2.GridControl = Me.GridAttributes
|
||||
Me.GridView2.Name = "GridView2"
|
||||
'
|
||||
'XtraTabPageIDB_Attributes
|
||||
'
|
||||
Me.XtraTabPageIDB_Attributes.AutoScroll = True
|
||||
@@ -778,11 +849,29 @@ Partial Class frmAdmin_Start
|
||||
'
|
||||
'XtraTabPage_GlobalIndexer
|
||||
'
|
||||
Me.XtraTabPage_GlobalIndexer.Controls.Add(Me.TreeList2)
|
||||
Me.XtraTabPage_GlobalIndexer.Name = "XtraTabPage_GlobalIndexer"
|
||||
Me.XtraTabPage_GlobalIndexer.PageVisible = False
|
||||
Me.XtraTabPage_GlobalIndexer.Size = New System.Drawing.Size(1126, 547)
|
||||
Me.XtraTabPage_GlobalIndexer.Text = "Global Indexer"
|
||||
'
|
||||
'TreeList2
|
||||
'
|
||||
Me.TreeList2.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.TreeList2.Location = New System.Drawing.Point(0, 0)
|
||||
Me.TreeList2.MenuManager = Me.RibbonControl1
|
||||
Me.TreeList2.Name = "TreeList2"
|
||||
Me.TreeList2.PreviewFieldName = "Title"
|
||||
Me.TreeList2.Size = New System.Drawing.Size(1126, 547)
|
||||
Me.TreeList2.StateImageList = Me.GLOBIXImages
|
||||
Me.TreeList2.TabIndex = 0
|
||||
'
|
||||
'GLOBIXImages
|
||||
'
|
||||
Me.GLOBIXImages.Add("bo_document", "image://svgimages/business objects/bo_document.svg")
|
||||
Me.GLOBIXImages.Add("calculatenow", "image://svgimages/spreadsheet/calculatenow.svg")
|
||||
Me.GLOBIXImages.Add("calculationoptions", "image://svgimages/spreadsheet/calculationoptions.svg")
|
||||
'
|
||||
'XtraTabPage_ClipboardWatcher
|
||||
'
|
||||
Me.XtraTabPage_ClipboardWatcher.Controls.Add(Me.XtraTabControl1)
|
||||
@@ -793,7 +882,6 @@ Partial Class frmAdmin_Start
|
||||
'
|
||||
'XtraTabControl1
|
||||
'
|
||||
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.XtraTabPageCWProfiles
|
||||
@@ -803,26 +891,70 @@ Partial Class frmAdmin_Start
|
||||
'
|
||||
'XtraTabPageCWProfiles
|
||||
'
|
||||
Me.XtraTabPageCWProfiles.Controls.Add(Me.GridControl2)
|
||||
Me.XtraTabPageCWProfiles.Controls.Add(Me.TreeList1)
|
||||
Me.XtraTabPageCWProfiles.Controls.Add(Me.GridCWProfiles)
|
||||
Me.XtraTabPageCWProfiles.Name = "XtraTabPageCWProfiles"
|
||||
Me.XtraTabPageCWProfiles.Size = New System.Drawing.Size(1124, 524)
|
||||
Me.XtraTabPageCWProfiles.Text = "Profile"
|
||||
'
|
||||
'GridControl2
|
||||
'TreeList1
|
||||
'
|
||||
Me.GridControl2.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.GridControl2.Location = New System.Drawing.Point(0, 0)
|
||||
Me.GridControl2.MainView = Me.GridView2
|
||||
Me.GridControl2.MenuManager = Me.RibbonControl1
|
||||
Me.GridControl2.Name = "GridControl2"
|
||||
Me.GridControl2.Size = New System.Drawing.Size(1124, 524)
|
||||
Me.GridControl2.TabIndex = 0
|
||||
Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2})
|
||||
Me.TreeList1.Columns.AddRange(New DevExpress.XtraTreeList.Columns.TreeListColumn() {Me.COL_ENTITY, Me.COL_ENITY_SCOPE, Me.COL_PARENT, Me.COL_GUID, Me.COL_NODE_TITLE})
|
||||
Me.TreeList1.KeyFieldName = ""
|
||||
Me.TreeList1.Location = New System.Drawing.Point(4, 3)
|
||||
Me.TreeList1.MenuManager = Me.RibbonControl1
|
||||
Me.TreeList1.Name = "TreeList1"
|
||||
Me.TreeList1.OptionsView.ShowIndentAsRowStyle = True
|
||||
Me.TreeList1.ParentFieldName = ""
|
||||
Me.TreeList1.Size = New System.Drawing.Size(809, 504)
|
||||
Me.TreeList1.StateImageList = Me.CWImages
|
||||
Me.TreeList1.TabIndex = 2
|
||||
'
|
||||
'GridView2
|
||||
'COL_ENTITY
|
||||
'
|
||||
Me.GridView2.GridControl = Me.GridControl2
|
||||
Me.GridView2.Name = "GridView2"
|
||||
Me.COL_ENTITY.Caption = "Entität"
|
||||
Me.COL_ENTITY.FieldName = "Entity"
|
||||
Me.COL_ENTITY.Name = "COL_ENTITY"
|
||||
Me.COL_ENTITY.Visible = True
|
||||
Me.COL_ENTITY.VisibleIndex = 1
|
||||
'
|
||||
'COL_ENITY_SCOPE
|
||||
'
|
||||
Me.COL_ENITY_SCOPE.Caption = "Scope"
|
||||
Me.COL_ENITY_SCOPE.FieldName = "Scope"
|
||||
Me.COL_ENITY_SCOPE.Name = "COL_ENITY_SCOPE"
|
||||
Me.COL_ENITY_SCOPE.Visible = True
|
||||
Me.COL_ENITY_SCOPE.VisibleIndex = 2
|
||||
'
|
||||
'COL_PARENT
|
||||
'
|
||||
Me.COL_PARENT.Caption = "ParentId"
|
||||
Me.COL_PARENT.FieldName = "ParentId"
|
||||
Me.COL_PARENT.Name = "COL_PARENT"
|
||||
Me.COL_PARENT.Visible = True
|
||||
Me.COL_PARENT.VisibleIndex = 3
|
||||
'
|
||||
'COL_GUID
|
||||
'
|
||||
Me.COL_GUID.Caption = "Guid"
|
||||
Me.COL_GUID.FieldName = "Guid"
|
||||
Me.COL_GUID.Name = "COL_GUID"
|
||||
Me.COL_GUID.Visible = True
|
||||
Me.COL_GUID.VisibleIndex = 4
|
||||
'
|
||||
'COL_NODE_TITLE
|
||||
'
|
||||
Me.COL_NODE_TITLE.Caption = "Titel"
|
||||
Me.COL_NODE_TITLE.FieldName = "Title"
|
||||
Me.COL_NODE_TITLE.Name = "COL_NODE_TITLE"
|
||||
Me.COL_NODE_TITLE.Visible = True
|
||||
Me.COL_NODE_TITLE.VisibleIndex = 0
|
||||
'
|
||||
'CWImages
|
||||
'
|
||||
Me.CWImages.Add("detailed", "image://svgimages/outlook inspired/detailed.svg")
|
||||
Me.CWImages.Add("newtablestyle", "image://svgimages/actions/newtablestyle.svg")
|
||||
Me.CWImages.Add("bo_appointment", "image://svgimages/business objects/bo_appointment.svg")
|
||||
'
|
||||
'XtraTabPage2
|
||||
'
|
||||
@@ -855,9 +987,14 @@ Partial Class frmAdmin_Start
|
||||
Me.Ribbon = Me.RibbonControl1
|
||||
Me.StatusBar = Me.RibbonStatusBar1
|
||||
Me.Text = "Administration"
|
||||
CType(Me.ViewCWProcesses, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridCWProfiles, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.WinExplorerView1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.ViewCWWindows, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.ViewCWControls, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TreeListMenu, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.MainTreeImages, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.DockManager1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.DockPanel1.ResumeLayout(False)
|
||||
Me.DockPanel1_Container.ResumeLayout(False)
|
||||
@@ -870,6 +1007,7 @@ Partial Class frmAdmin_Start
|
||||
Me.XtraTabPageIDB_Attributes_New.ResumeLayout(False)
|
||||
CType(Me.GridAttributes, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.ViewAttributes, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.XtraTabPageIDB_Attributes.ResumeLayout(False)
|
||||
Me.XtraTabPageIDB_Attributes.PerformLayout()
|
||||
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
@@ -877,12 +1015,15 @@ Partial Class frmAdmin_Start
|
||||
Me.XtraTabPageIDB_SourceSQL.ResumeLayout(False)
|
||||
CType(Me.GridSourceSQL, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.ViewSourceSQL, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.XtraTabPage_GlobalIndexer.ResumeLayout(False)
|
||||
CType(Me.TreeList2, 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.GridControl2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TreeList1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.CWImages, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.XtraTabControl, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.XtraTabControl.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
@@ -898,7 +1039,7 @@ Partial Class frmAdmin_Start
|
||||
Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
|
||||
Friend WithEvents TreeListMenu As DevExpress.XtraTreeList.TreeList
|
||||
Friend WithEvents TreeListColumn1 As DevExpress.XtraTreeList.Columns.TreeListColumn
|
||||
Friend WithEvents SvgImageCollection1 As DevExpress.Utils.SvgImageCollection
|
||||
Friend WithEvents MainTreeImages As DevExpress.Utils.SvgImageCollection
|
||||
Friend WithEvents RibbonGroup_ClipboardWatcher_DataSearch As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
Friend WithEvents RibbonGroup_ClipboardWatcher_Process As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
Friend WithEvents RibbonGroup_ClipboardWatcher_Window As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
@@ -966,6 +1107,19 @@ Partial Class frmAdmin_Start
|
||||
Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl
|
||||
Friend WithEvents XtraTabPageCWProfiles As DevExpress.XtraTab.XtraTabPage
|
||||
Friend WithEvents XtraTabPage2 As DevExpress.XtraTab.XtraTabPage
|
||||
Friend WithEvents GridControl2 As GridControl
|
||||
Friend WithEvents GridCWProfiles As GridControl
|
||||
Friend WithEvents GridView2 As GridView
|
||||
Friend WithEvents ViewCWProcesses As GridView
|
||||
Friend WithEvents ViewCWWindows As GridView
|
||||
Friend WithEvents ViewCWControls As GridView
|
||||
Friend WithEvents TreeList1 As DevExpress.XtraTreeList.TreeList
|
||||
Friend WithEvents WinExplorerView1 As Views.WinExplorer.WinExplorerView
|
||||
Friend WithEvents COL_ENTITY As DevExpress.XtraTreeList.Columns.TreeListColumn
|
||||
Friend WithEvents COL_ENITY_SCOPE As DevExpress.XtraTreeList.Columns.TreeListColumn
|
||||
Friend WithEvents COL_PARENT As DevExpress.XtraTreeList.Columns.TreeListColumn
|
||||
Friend WithEvents COL_GUID As DevExpress.XtraTreeList.Columns.TreeListColumn
|
||||
Friend WithEvents COL_NODE_TITLE As DevExpress.XtraTreeList.Columns.TreeListColumn
|
||||
Friend WithEvents CWImages As DevExpress.Utils.SvgImageCollection
|
||||
Friend WithEvents TreeList2 As DevExpress.XtraTreeList.TreeList
|
||||
Friend WithEvents GLOBIXImages As DevExpress.Utils.SvgImageCollection
|
||||
End Class
|
||||
|
||||
@@ -291,17 +291,23 @@
|
||||
bGFzcz0iR3JlZW4iIC8+DQogIDwvZz4NCjwvc3ZnPgs=
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="SvgImageCollection1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>22, 21</value>
|
||||
<metadata name="MainTreeImages.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>122, 17</value>
|
||||
</metadata>
|
||||
<metadata name="DockManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>188, 21</value>
|
||||
<value>396, 17</value>
|
||||
</metadata>
|
||||
<metadata name="TBIDB_ATTRIBUTEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>483, 21</value>
|
||||
<value>691, 17</value>
|
||||
</metadata>
|
||||
<metadata name="DSIDB_Stammdaten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>323, 21</value>
|
||||
<value>531, 17</value>
|
||||
</metadata>
|
||||
<metadata name="CWImages.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<metadata name="GLOBIXImages.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>264, 17</value>
|
||||
</metadata>
|
||||
<data name="frmAdmin_Start.IconOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
@@ -326,19 +332,16 @@
|
||||
LjEsMjguMSwyNy42LDI3LjZ6IiBjbGFzcz0iQmx1ZSIgLz4NCiAgPC9nPg0KPC9zdmc+Cw==
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="DSIDB_Stammdaten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>323, 21</value>
|
||||
</metadata>
|
||||
<metadata name="TBIDB_ATTRIBUTETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>711, 21</value>
|
||||
<value>919, 17</value>
|
||||
</metadata>
|
||||
<metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>933, 21</value>
|
||||
<value>1141, 17</value>
|
||||
</metadata>
|
||||
<metadata name="TBIDB_ATTRIBUTE_TYPEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1106, 21</value>
|
||||
<value>17, 56</value>
|
||||
</metadata>
|
||||
<metadata name="TBIDB_ATTRIBUTE_TYPETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1366, 21</value>
|
||||
<value>277, 56</value>
|
||||
</metadata>
|
||||
</root>
|
||||
@@ -1,10 +1,11 @@
|
||||
Imports DevExpress.Utils
|
||||
Imports DevExpress.XtraBars.Docking2010.Views
|
||||
Imports DevExpress.XtraBars.Ribbon
|
||||
Imports DevExpress.XtraGrid
|
||||
Imports DevExpress.XtraGrid.Views.Grid
|
||||
Imports DevExpress.XtraGrid.Views.Grid.ViewInfo
|
||||
Imports DevExpress.XtraTab
|
||||
Imports DevExpress.XtraTreeList
|
||||
Imports DevExpress.XtraTreeList.Nodes
|
||||
Imports DigitalData.Modules.Logging
|
||||
|
||||
Public Class frmAdmin_Start
|
||||
@@ -18,14 +19,17 @@ Public Class frmAdmin_Start
|
||||
Private Const CW_PROFILES = "CW_PROFILES"
|
||||
|
||||
Private PrimaryKey As String = Nothing
|
||||
Private SourceCommands As New Dictionary(Of String, SourceSql)
|
||||
Private AdminItems As New List(Of AdminItem)
|
||||
Private CurrentPage As String
|
||||
|
||||
|
||||
Private Class SourceSql
|
||||
Public Title As String
|
||||
Public SQL As String
|
||||
Public PrimaryKey As String
|
||||
Private Class AdminItem
|
||||
Public Property Guid As Integer
|
||||
Public Property ParentId As Integer
|
||||
Public Property Title As String
|
||||
Public Property Entity As String
|
||||
Public Property Scope As String
|
||||
Public Property Summary As String
|
||||
End Class
|
||||
|
||||
Private Sub frmAdministration_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
@@ -39,17 +43,20 @@ Public Class frmAdmin_Start
|
||||
|
||||
Private Function Load_SQLData() As Boolean
|
||||
Try
|
||||
Dim oTable As DataTable = My.Database.GetDatatable("SELECT * FROM TBZF_ADMIN_SOURCE_SQL")
|
||||
SourceCommands.Clear()
|
||||
Dim oTable As DataTable = My.Database.GetDatatable("SELECT * FROM VWIDB_ADMINISTRATION_TREEVIEW")
|
||||
AdminItems.Clear()
|
||||
|
||||
For Each oRow As DataRow In oTable.Rows
|
||||
Dim oSource As New SourceSql With {
|
||||
.PrimaryKey = oRow.Item("PK_COLUMN"),
|
||||
.SQL = oRow.Item("SQL_COMMAND"),
|
||||
.Title = oRow.Item("ENTITY_TITLE")
|
||||
Dim oItem As New AdminItem With {
|
||||
.Guid = oRow.Item("GUID"),
|
||||
.ParentId = oRow.Item("PARENT"),
|
||||
.Entity = oRow.Item("ENTITY").ToString,
|
||||
.Scope = oRow.Item("ENTITY_SCOPE").ToString,
|
||||
.Title = oRow.Item("NODE_TITLE").ToString,
|
||||
.Summary = oRow.Item("SUMMARY").ToString
|
||||
}
|
||||
|
||||
SourceCommands.Add(oRow.Item("ENTITY_TITLE"), oSource)
|
||||
AdminItems.Add(oItem)
|
||||
Next
|
||||
Return True
|
||||
Catch ex As Exception
|
||||
@@ -96,11 +103,6 @@ Public Class frmAdmin_Start
|
||||
|
||||
CurrentPage = e.Node.Tag.ToString
|
||||
|
||||
Dim oSource As SourceSql
|
||||
If SourceCommands.ContainsKey(CurrentPage) Then
|
||||
oSource = SourceCommands.Item(CurrentPage)
|
||||
End If
|
||||
|
||||
Select Case e.Node.Tag.ToString
|
||||
Case IDB_START
|
||||
Display_Tab(XtraTabPage_IDB)
|
||||
@@ -109,8 +111,8 @@ Public Class frmAdmin_Start
|
||||
Display_Tab(XtraTabPage_IDB)
|
||||
Display_Tab(XtraTabPageIDB_Attributes_New)
|
||||
|
||||
Dim oTable As DataTable = My.Database.GetDatatable(oSource.SQL)
|
||||
Load_Grid(oTable, oSource.PrimaryKey, GridAttributes)
|
||||
'Dim oTable As DataTable = My.Database.GetDatatable(oSource.Title)
|
||||
'Load_Grid(oTable, oSource, GridAttributes)
|
||||
|
||||
Case IDB_BUSINESS_ENTITY
|
||||
'DisplayTab(XtraTabPage_Entities)
|
||||
@@ -119,20 +121,27 @@ Public Class frmAdmin_Start
|
||||
Display_Tab(XtraTabPage_GlobalIndexer)
|
||||
Display_RibbonPage(RibbonPage_GlobalIndexer)
|
||||
|
||||
Dim oCWItems As List(Of AdminItem) = (From Item As AdminItem In AdminItems
|
||||
Where Item.Entity = "GLOBIX"
|
||||
Select Item).ToList()
|
||||
Load_Tree(oCWItems, TreeList2)
|
||||
|
||||
Case CW_PROFILES
|
||||
Display_Tab(XtraTabPage_ClipboardWatcher)
|
||||
Display_Tab(XtraTabPageCWProfiles)
|
||||
Display_RibbonPage(RibbonPage_ClipboardWatcher)
|
||||
|
||||
Dim oTable As DataTable = My.Database.GetDatatable(oSource.SQL)
|
||||
Load_Grid(oTable, oSource.PrimaryKey, GridControl2)
|
||||
Dim oCWItems As List(Of AdminItem) = (From Item As AdminItem In AdminItems
|
||||
Where Item.Entity = "CW"
|
||||
Select Item).ToList()
|
||||
Load_Tree(oCWItems, TreeList1)
|
||||
|
||||
Case IDB_SOURCE_SQL
|
||||
Display_Tab(XtraTabPage_IDB)
|
||||
Display_Tab(XtraTabPageIDB_SourceSQL)
|
||||
|
||||
Dim oTable As DataTable = My.Database.GetDatatable(oSource.SQL)
|
||||
Load_Grid(oTable, oSource.PrimaryKey, GridSourceSQL)
|
||||
'Dim oTable As DataTable = My.Database.GetDatatable(oSource.Title)
|
||||
'Load_Grid(oTable, oSource, GridSourceSQL)
|
||||
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
@@ -141,68 +150,106 @@ Public Class frmAdmin_Start
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Load_Grid(DataSource As DataTable, PrimaryKey As String, GridControl As GridControl)
|
||||
'Private Sub Load_Children(Source As AdminItem, DataSet As DataSet, DataTable As DataTable)
|
||||
' Dim oChildren = AdminItems.Where(Function(cmd) cmd.Value.ParentId = Source.Guid).ToList()
|
||||
|
||||
' If oChildren.Count > 0 Then
|
||||
' For Each oChild In oChildren
|
||||
' Dim oChildSource As AdminItem = oChild.Value
|
||||
' Dim oChildTable As DataTable = My.Database.GetDatatable(oChildSource.Title)
|
||||
' oChildTable.TableName = oChildSource.Title
|
||||
' Dim oRelationName As String = $"{Source.Title}__{oChildSource.Title}"
|
||||
|
||||
' DataSet.Tables.Add(oChildTable)
|
||||
' DataSet.Relations.Add(New DataRelation(oRelationName,
|
||||
' DataTable.Columns.Item(Source.Entity),
|
||||
' oChildTable.Columns.Item(oChildSource.Scope)))
|
||||
|
||||
' Load_Children(oChildSource, DataSet, oChildTable)
|
||||
' Next
|
||||
' End If
|
||||
'End Sub
|
||||
|
||||
Private Sub Load_Tree(Source As List(Of AdminItem), TreeList As TreeList)
|
||||
TreeList.HierarchyFieldName = "Title"
|
||||
TreeList.KeyFieldName = "Guid"
|
||||
TreeList.ParentFieldName = "ParentId"
|
||||
'TreeList.PreviewFieldName = "Summary"
|
||||
'TreeList.PreviewLineCount = 3
|
||||
'TreeList.OptionsView.ShowPreview = True
|
||||
TreeList.DataSource = Source
|
||||
TreeList.ForceInitialize()
|
||||
End Sub
|
||||
|
||||
Private Sub Load_Grid(DataSource As DataTable, Source As AdminItem, GridControl As GridControl)
|
||||
Try
|
||||
Me.PrimaryKey = PrimaryKey
|
||||
PrimaryKey = Source.Entity
|
||||
|
||||
GridControl.DataSource = DataSource
|
||||
GridControl.ForceInitialize()
|
||||
Dim oDataSet As New DataSet()
|
||||
DataSource.TableName = Source.Title
|
||||
oDataSet.Tables.Add(DataSource)
|
||||
|
||||
Dim oGridView = DirectCast(GridControl.DefaultView, GridView)
|
||||
'Load_Children(Source, oDataSet, DataSource)
|
||||
|
||||
With oGridView.Appearance.EvenRow
|
||||
.BackColor = Color.Gainsboro
|
||||
.Options.UseBackColor = True
|
||||
End With
|
||||
'GridControl.DataSource = oDataSet.Tables.Item(Source.Title)
|
||||
'GridControl.ForceInitialize()
|
||||
|
||||
With oGridView.Appearance.FocusedCell
|
||||
.BackColor = Color.Gold
|
||||
.Options.UseBackColor = True
|
||||
End With
|
||||
'Dim oGridView = DirectCast(GridControl.DefaultView, GridView)
|
||||
|
||||
With oGridView.Appearance.FocusedRow
|
||||
.BackColor = Color.Gold
|
||||
.Options.UseBackColor = True
|
||||
End With
|
||||
'With oGridView.Appearance.EvenRow
|
||||
' .BackColor = Color.Gainsboro
|
||||
' .Options.UseBackColor = True
|
||||
'End With
|
||||
|
||||
With oGridView.OptionsBehavior
|
||||
.Editable = False
|
||||
.ReadOnly = True
|
||||
End With
|
||||
'With oGridView.Appearance.FocusedCell
|
||||
' .BackColor = Color.Gold
|
||||
' .Options.UseBackColor = True
|
||||
'End With
|
||||
|
||||
With oGridView.OptionsClipboard
|
||||
.CopyColumnHeaders = DefaultBoolean.False
|
||||
End With
|
||||
'With oGridView.Appearance.FocusedRow
|
||||
' .BackColor = Color.Gold
|
||||
' .Options.UseBackColor = True
|
||||
'End With
|
||||
|
||||
With oGridView.OptionsFind
|
||||
.AlwaysVisible = True
|
||||
End With
|
||||
'With oGridView.OptionsBehavior
|
||||
' .Editable = False
|
||||
' .ReadOnly = True
|
||||
'End With
|
||||
|
||||
With oGridView.OptionsView
|
||||
.ShowAutoFilterRow = True
|
||||
.EnableAppearanceEvenRow = True
|
||||
.ShowIndicator = False
|
||||
End With
|
||||
'With oGridView.OptionsClipboard
|
||||
' .CopyColumnHeaders = DefaultBoolean.False
|
||||
'End With
|
||||
|
||||
AddHandler oGridView.KeyDown, Sub(sender As Object, e As KeyEventArgs)
|
||||
Dim oView As GridView = DirectCast(sender, GridView)
|
||||
If e.Control AndAlso e.KeyCode = Keys.C And e.Modifiers = Keys.Control Then
|
||||
Dim oCellValue = oView.GetRowCellValue(oView.FocusedRowHandle, oView.FocusedColumn)
|
||||
If oCellValue IsNot Nothing AndAlso oCellValue.ToString() <> String.Empty Then
|
||||
Clipboard.SetText(oCellValue.ToString)
|
||||
End If
|
||||
e.Handled = True
|
||||
End If
|
||||
End Sub
|
||||
'With oGridView.OptionsFind
|
||||
' .AlwaysVisible = True
|
||||
'End With
|
||||
|
||||
oGridView.BestFitColumns()
|
||||
'With oGridView.OptionsView
|
||||
' .ShowAutoFilterRow = True
|
||||
' .EnableAppearanceEvenRow = True
|
||||
' .ShowIndicator = False
|
||||
'End With
|
||||
|
||||
'AddHandler oGridView.KeyDown, Sub(sender As Object, e As KeyEventArgs)
|
||||
' Dim oView As GridView = DirectCast(sender, GridView)
|
||||
' If e.Control AndAlso e.KeyCode = Keys.C And e.Modifiers = Keys.Control Then
|
||||
' Dim oCellValue = oView.GetRowCellValue(oView.FocusedRowHandle, oView.FocusedColumn)
|
||||
' If oCellValue IsNot Nothing AndAlso oCellValue.ToString() <> String.Empty Then
|
||||
' Clipboard.SetText(oCellValue.ToString)
|
||||
' End If
|
||||
' e.Handled = True
|
||||
' End If
|
||||
' End Sub
|
||||
|
||||
'oGridView.BestFitColumns()
|
||||
|
||||
Catch ex As Exception
|
||||
ShowError(ex)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub View_DoubleClick(sender As Object, e As EventArgs) Handles ViewAttributes.DoubleClick, ViewSourceSQL.DoubleClick
|
||||
Private Sub View_DoubleClick(sender As Object, e As EventArgs) Handles _
|
||||
ViewAttributes.DoubleClick, ViewSourceSQL.DoubleClick
|
||||
Dim oView As GridView = TryCast(sender, GridView)
|
||||
Dim hitInfo As GridHitInfo = oView.CalcHitInfo(TryCast(e, DXMouseEventArgs).Location)
|
||||
If hitInfo.InDataRow Then
|
||||
@@ -213,11 +260,14 @@ Public Class frmAdmin_Start
|
||||
|
||||
Select Case oView.Name
|
||||
Case ViewAttributes.Name
|
||||
Load_Attributes(oPrimaryKey)
|
||||
Load_Attribute(oPrimaryKey)
|
||||
|
||||
Case ViewSourceSQL.Name
|
||||
Load_SourceSql(oPrimaryKey)
|
||||
|
||||
Case WinExplorerView1.Name
|
||||
Load_CWProfile(oPrimaryKey)
|
||||
|
||||
End Select
|
||||
|
||||
End If
|
||||
@@ -227,15 +277,15 @@ Public Class frmAdmin_Start
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub Load_Attributes(PrimaryKey As Integer)
|
||||
Private Sub Load_Attribute(PrimaryKey As Integer)
|
||||
Try
|
||||
Dim oForm As New frmAdmin_IDBAttribute(PrimaryKey)
|
||||
oForm.ShowDialog()
|
||||
|
||||
If oForm.HasChanges Then
|
||||
Dim oSource As SourceSql = SourceCommands.Item(CurrentPage)
|
||||
Dim oTable As DataTable = My.Database.GetDatatable(oSource.SQL)
|
||||
Load_Grid(oTable, oSource.PrimaryKey, GridAttributes)
|
||||
Dim oSource As AdminItem = AdminItems.Item(CurrentPage)
|
||||
Dim oTable As DataTable = My.Database.GetDatatable(oSource.Title)
|
||||
Load_Grid(oTable, oSource, GridAttributes)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
ShowError(ex)
|
||||
@@ -248,9 +298,24 @@ Public Class frmAdmin_Start
|
||||
oForm.ShowDialog()
|
||||
|
||||
If oForm.HasChanges Then
|
||||
Dim oSource As SourceSql = SourceCommands.Item(CurrentPage)
|
||||
Dim oTable As DataTable = My.Database.GetDatatable(oSource.SQL)
|
||||
Load_Grid(oTable, oSource.PrimaryKey, GridSourceSQL)
|
||||
Dim oSource As AdminItem = AdminItems.Item(CurrentPage)
|
||||
Dim oTable As DataTable = My.Database.GetDatatable(oSource.Title)
|
||||
Load_Grid(oTable, oSource, GridSourceSQL)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
ShowError(ex)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub Load_CWProfile(PrimaryKey As Integer)
|
||||
Try
|
||||
Dim oForm As New frmAdmin_CWProfile(PrimaryKey)
|
||||
oForm.ShowDialog()
|
||||
|
||||
If oForm.HasChanges Then
|
||||
Dim oSource As AdminItem = AdminItems.Item(CurrentPage)
|
||||
Dim oTable As DataTable = My.Database.GetDatatable(oSource.Title)
|
||||
'Load_Tree(oTable, oSource, TreeList1)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
ShowError(ex)
|
||||
@@ -262,7 +327,7 @@ Public Class frmAdmin_Start
|
||||
Dim oRow As DataRow = ViewAttributes.GetFocusedDataRow
|
||||
If oRow IsNot Nothing Then
|
||||
Dim oPrimaryKey As Integer = oRow.Item(PrimaryKey)
|
||||
Load_Attributes(oPrimaryKey)
|
||||
Load_Attribute(oPrimaryKey)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
ShowError(ex)
|
||||
@@ -282,4 +347,42 @@ Public Class frmAdmin_Start
|
||||
Private Sub ResetStatus()
|
||||
labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
|
||||
End Sub
|
||||
|
||||
Private Sub TreeList1_GetStateImage(sender As Object, e As GetStateImageEventArgs) Handles TreeList1.GetStateImage
|
||||
Dim oTreeList As TreeList = DirectCast(sender, TreeList)
|
||||
Dim oItem As AdminItem = oTreeList.GetRow(e.Node.Id)
|
||||
|
||||
Select Case oItem.Scope
|
||||
Case "PROFILE"
|
||||
e.NodeImageIndex = 0
|
||||
|
||||
Case "PROCESS"
|
||||
e.NodeImageIndex = 1
|
||||
|
||||
Case "WINDOW"
|
||||
e.NodeImageIndex = 2
|
||||
|
||||
Case "CONTROL"
|
||||
e.NodeImageIndex = 3
|
||||
End Select
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub TreeList2_GetStateImage(sender As Object, e As GetStateImageEventArgs) Handles TreeList2.GetStateImage
|
||||
Dim oTreeList As TreeList = DirectCast(sender, TreeList)
|
||||
Dim oItem As AdminItem = oTreeList.GetRow(e.Node.Id)
|
||||
|
||||
Select Case oItem.Scope
|
||||
Case "PROFILE"
|
||||
e.NodeImageIndex = 0
|
||||
|
||||
Case "INDEX_MAN"
|
||||
e.NodeImageIndex = 1
|
||||
|
||||
Case "INDEX_AUTO"
|
||||
e.NodeImageIndex = 2
|
||||
|
||||
End Select
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
@@ -22,8 +22,8 @@
|
||||
Public Const VECTORSEPARATOR = "╚"
|
||||
Public Const SERVICE_ADDRESS_SEPARATOR = ":"
|
||||
|
||||
Public Const HOTKEY_TOGGLE_WATCHER = 354522017
|
||||
Public Const HOTKEY_TRIGGER_WATCHER = 354523017
|
||||
Public Const HOTKEY_TOGGLE_WATCHER As Integer = 354522017
|
||||
Public Const HOTKEY_TRIGGER_WATCHER As Integer = 354523017
|
||||
|
||||
Public Const NOTIFICATION_DELAY = 2500
|
||||
|
||||
|
||||
@@ -166,7 +166,7 @@ Public Class ClassInit
|
||||
Try
|
||||
MyApplication.Service.Address = My.SystemConfig.AppServerConfig
|
||||
|
||||
Dim oSplit() As String = MyApplication.Service.Address.Split(":")
|
||||
Dim oSplit() As String = MyApplication.Service.Address.Split(":"c)
|
||||
Dim oAppServerAddress As String = oSplit(0)
|
||||
Dim oAppServerPort As Integer = 9000
|
||||
If oSplit.Length = 2 Then
|
||||
|
||||
40
GUIs.ZooFlow/My Project/Resources.Designer.vb
generated
40
GUIs.ZooFlow/My Project/Resources.Designer.vb
generated
@@ -250,6 +250,16 @@ Namespace My.Resources
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property actions_check2() As DevExpress.Utils.Svg.SvgImage
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("actions_check2", resourceCulture)
|
||||
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
|
||||
'''</summary>
|
||||
@@ -290,6 +300,16 @@ Namespace My.Resources
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property bo_appearance() As DevExpress.Utils.Svg.SvgImage
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("bo_appearance", resourceCulture)
|
||||
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
|
||||
'''</summary>
|
||||
@@ -410,6 +430,16 @@ Namespace My.Resources
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property managedatasource() As DevExpress.Utils.Svg.SvgImage
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("managedatasource", resourceCulture)
|
||||
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
|
||||
'''</summary>
|
||||
@@ -440,6 +470,16 @@ Namespace My.Resources
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property save2() As DevExpress.Utils.Svg.SvgImage
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("save2", resourceCulture)
|
||||
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
|
||||
@@ -151,6 +151,9 @@
|
||||
<data name="DD_Icons_ICO_PMANAGER_128px" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\DD_Icons_ICO_PMANAGER_128px.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="actions_check2" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\actions_check2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name="4_GLOBIX_AKTIV_ZOO" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\4_GLOBIX_AKTIV_ZOO.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
@@ -214,6 +217,9 @@
|
||||
<data name="1_LOGO_ZOO_FLOW_DROP2" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\1_LOGO_ZOO_FLOW_DROP2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="bo_appearance" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\bo_appearance.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name="Flow" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Flow.PNG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
@@ -235,6 +241,12 @@
|
||||
<data name="actions_addcircled1" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\actions_addcircled1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name="managedatasource" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\managedatasource.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name="updatedataextract" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\updatedataextract.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name="actions_edit" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\actions_edit.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
@@ -247,7 +259,7 @@
|
||||
<data name="2_ZOO_FLOW_Abo" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\2_ZOO_FLOW_Abo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="updatedataextract" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\updatedataextract.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<data name="save2" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\save2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
</root>
|
||||
15
GUIs.ZooFlow/Resources/actions_check2.svg
Normal file
15
GUIs.ZooFlow/Resources/actions_check2.svg
Normal file
@@ -0,0 +1,15 @@
|
||||
<?xml version='1.0' encoding='UTF-8'?>
|
||||
<svg x="0px" y="0px" viewBox="0 0 32 32" version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xml:space="preserve" id="Layer_1" style="enable-background:new 0 0 32 32">
|
||||
<style type="text/css">
|
||||
.Blue{fill:#1177D7;}
|
||||
.Yellow{fill:#FFB115;}
|
||||
.Black{fill:#727272;}
|
||||
.Green{fill:#039C23;}
|
||||
.Red{fill:#D11C1C;}
|
||||
.st0{opacity:0.75;}
|
||||
.st1{opacity:0.5;}
|
||||
</style>
|
||||
<g id="Check">
|
||||
<polygon points="27,5 11,21 5,15 2,18 11,27 30,8 " class="Green" />
|
||||
</g>
|
||||
</svg>
|
||||
30
GUIs.ZooFlow/Resources/bo_appearance.svg
Normal file
30
GUIs.ZooFlow/Resources/bo_appearance.svg
Normal file
@@ -0,0 +1,30 @@
|
||||
<?xml version='1.0' encoding='UTF-8'?>
|
||||
<svg x="0px" y="0px" viewBox="0 0 32 32" version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xml:space="preserve" id="Layer_1" style="enable-background:new 0 0 32 32">
|
||||
<style type="text/css">
|
||||
.Blue{fill:#1177D7;}
|
||||
.Yellow{fill:#FFB115;}
|
||||
.Red{fill:#D11C1C;}
|
||||
.Green{fill:#039C23;}
|
||||
.Black{fill:#727272;}
|
||||
.White{fill:#FFFFFF;}
|
||||
.st0{opacity:0.5;}
|
||||
.st1{opacity:0.75;}
|
||||
.st2{display:none;}
|
||||
.st3{display:inline;fill:#FFB115;}
|
||||
.st4{display:inline;}
|
||||
.st5{display:inline;opacity:0.75;}
|
||||
.st6{display:inline;opacity:0.5;}
|
||||
.st7{display:inline;fill:#039C23;}
|
||||
.st8{display:inline;fill:#D11C1C;}
|
||||
.st9{display:inline;fill:#1177D7;}
|
||||
.st10{display:inline;fill:#FFFFFF;}
|
||||
</style>
|
||||
<g id="Appearance">
|
||||
<rect x="12" y="4" width="8" height="6" rx="0" ry="0" class="Yellow" />
|
||||
<rect x="2" y="12" width="8" height="6" rx="0" ry="0" class="Red" />
|
||||
<rect x="22" y="20" width="8" height="6" rx="0" ry="0" class="Green" />
|
||||
<g class="st0">
|
||||
<path d="M12,12h8v6h-8V12z M10,10V4H2v6H10z M22,10h8V4h-8V10z M22,18h8v-6h-8V18z M12,20v6h8v-6H12z M10,26v-6H2v6 H10z" class="Black" />
|
||||
</g>
|
||||
</g>
|
||||
</svg>
|
||||
9
GUIs.ZooFlow/Resources/managedatasource.svg
Normal file
9
GUIs.ZooFlow/Resources/managedatasource.svg
Normal file
@@ -0,0 +1,9 @@
|
||||
<?xml version='1.0' encoding='UTF-8'?>
|
||||
<svg x="0px" y="0px" viewBox="0 0 32 32" version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xml:space="preserve" id="Manage_Data_Source" style="enable-background:new 0 0 32 32">
|
||||
<style type="text/css">
|
||||
.Yellow{fill:#FFB115;}
|
||||
.Blue{fill:#1177D7;}
|
||||
</style>
|
||||
<path d="M2,10V6c0-2.2,4.5-4,10-4s10,1.8,10,4v4c0,2.2-4.5,4-10,4S2,12.2,2,10z M12,20v-0.7l2.5-0.4L13,16.8l1-0.9 C13.3,16,12.7,16,12,16c-5.5,0-10-1.8-10-4v4C2,18.2,6.5,20,12,20z M14.5,25.1L12,24.7V22c-5.5,0-10-1.8-10-4v4c0,2.2,4.5,4,10,4 c0.7,0,1.3,0,1.9-0.1L14.5,25.1z" class="Yellow" />
|
||||
<path d="M30,23v-2l-2.2-0.4c-0.2-0.6-0.4-1.3-0.7-1.8l1.3-1.8l-1.4-1.4l-1.8,1.3c-0.5-0.3-1.2-0.6-1.8-0.7L23,14h-2 l-0.4,2.2c-0.6,0.2-1.3,0.4-1.8,0.7l-1.8-1.3l-1.4,1.4l1.3,1.8c-0.3,0.5-0.6,1.2-0.7,1.8L14,21v2l2.2,0.4c0.2,0.6,0.4,1.3,0.7,1.8 l-1.3,1.8l1.4,1.4l1.8-1.3c0.5,0.3,1.2,0.6,1.8,0.7L21,30h2l0.4-2.2c0.6-0.2,1.3-0.4,1.8-0.7l1.8,1.3l1.4-1.4l-1.3-1.8 c0.3-0.5,0.6-1.2,0.7-1.8L30,23z M22,24c-1.1,0-2-0.9-2-2s0.9-2,2-2s2,0.9,2,2S23.1,24,22,24z" class="Blue" />
|
||||
</svg>
|
||||
7
GUIs.ZooFlow/Resources/save2.svg
Normal file
7
GUIs.ZooFlow/Resources/save2.svg
Normal file
@@ -0,0 +1,7 @@
|
||||
<?xml version='1.0' encoding='UTF-8'?>
|
||||
<svg x="0px" y="0px" viewBox="0 0 32 32" version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xml:space="preserve" id="Save" style="enable-background:new 0 0 32 32">
|
||||
<style type="text/css">
|
||||
.Black{fill:#727272;}
|
||||
</style>
|
||||
<path d="M27,4h-3v10H8V4H5C4.4,4,4,4.4,4,5v22c0,0.6,0.4,1,1,1h22c0.6,0,1-0.4,1-1V5C28,4.4,27.6,4,27,4z M24,24H8v-6 h16V24z M10,4v8h10V4H10z M14,10h-2V6h2V10z" class="Black" />
|
||||
</svg>
|
||||
@@ -56,15 +56,6 @@
|
||||
<Reference Include="DevExpress.XtraLayout.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
|
||||
<Reference Include="DevExpress.XtraPrinting.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
|
||||
<Reference Include="DevExpress.XtraTreeList.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
|
||||
<Reference Include="DigitalData.Controls.DocumentViewer">
|
||||
<HintPath>..\Controls.DocumentViewer\bin\Debug\DigitalData.Controls.DocumentViewer.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DigitalData.Controls.LookupGrid">
|
||||
<HintPath>..\Controls.LookupGrid\bin\Debug\DigitalData.Controls.LookupGrid.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DigitalData.GUIs.Common">
|
||||
<HintPath>..\GUIs.Common\bin\Debug\DigitalData.GUIs.Common.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="Independentsoft.Msg">
|
||||
<HintPath>P:\Visual Studio Projekte\Bibliotheken\MSG .NET\Bin\22_11_19\Independentsoft.Msg.dll</HintPath>
|
||||
</Reference>
|
||||
@@ -396,10 +387,22 @@
|
||||
</None>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<ProjectReference Include="..\Controls.DocumentViewer\DocumentViewer.vbproj">
|
||||
<Project>{0958cddf-4a16-41f6-8837-8335f71d599c}</Project>
|
||||
<Name>DocumentViewer</Name>
|
||||
</ProjectReference>
|
||||
<ProjectReference Include="..\Controls.LookupGrid\LookupControl.vbproj">
|
||||
<Project>{3dcd6d1a-c830-4241-b7e4-27430e7ea483}</Project>
|
||||
<Name>LookupControl</Name>
|
||||
</ProjectReference>
|
||||
<ProjectReference Include="..\GUIs.ClipboardWatcher\ClipboardWatcher.vbproj">
|
||||
<Project>{B7D465A2-AE31-4CDF-A8B2-34B42D3EA84E}</Project>
|
||||
<Name>ClipboardWatcher</Name>
|
||||
</ProjectReference>
|
||||
<ProjectReference Include="..\GUIs.Common\Common.vbproj">
|
||||
<Project>{d20a6bf2-c7c6-4a7a-b34d-fa27d775a049}</Project>
|
||||
<Name>Common</Name>
|
||||
</ProjectReference>
|
||||
<ProjectReference Include="..\Modules.Config\Config.vbproj">
|
||||
<Project>{44982F9B-6116-44E2-85D0-F39650B1EF99}</Project>
|
||||
<Name>Config</Name>
|
||||
@@ -565,6 +568,18 @@
|
||||
<ItemGroup>
|
||||
<None Include="Resources\updatedataextract.svg" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\bo_appearance.svg" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\managedatasource.svg" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\actions_check2.svg" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\save2.svg" />
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
||||
Other similar extension points exist, see Microsoft.Common.targets.
|
||||
|
||||
@@ -34,6 +34,11 @@ Public Class frmFlowForm
|
||||
Private ClassWindow As Window
|
||||
Private ProfileFilter As ProfileFilter
|
||||
Private ProfileLoader As ClassProfileLoader
|
||||
Private Animator As New Animator() With {
|
||||
.PopupColor = Color.FromArgb(255, 214, 49),
|
||||
.PopupOpacity = 0.8,
|
||||
.PopupSize = New Size(100, 30)
|
||||
}
|
||||
|
||||
' Runtime Flags
|
||||
Private ApplicationLoading As Boolean = True
|
||||
@@ -229,13 +234,13 @@ Public Class frmFlowForm
|
||||
|
||||
Select Case oFunctionKey
|
||||
Case "CTRL"
|
||||
HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_CONTROL, ClassConstants.HOTKEY_TRIGGER_WATCHER)
|
||||
HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_CONTROL, HOTKEY_TRIGGER_WATCHER)
|
||||
Case "SHIFT"
|
||||
HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_SHIFT, ClassConstants.HOTKEY_TRIGGER_WATCHER)
|
||||
HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_SHIFT, HOTKEY_TRIGGER_WATCHER)
|
||||
Case "ALT"
|
||||
HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_ALT, ClassConstants.HOTKEY_TRIGGER_WATCHER)
|
||||
HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_ALT, HOTKEY_TRIGGER_WATCHER)
|
||||
Case "WIN"
|
||||
HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_WIN, ClassConstants.HOTKEY_TRIGGER_WATCHER)
|
||||
HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_WIN, HOTKEY_TRIGGER_WATCHER)
|
||||
End Select
|
||||
|
||||
AddHandler HotkeyClass.HotKeyPressed, AddressOf HotkeyClass_HotKeyPressed
|
||||
@@ -943,6 +948,8 @@ Public Class frmFlowForm
|
||||
|
||||
Select Case HotKeyID
|
||||
Case HOTKEY_TRIGGER_WATCHER
|
||||
Animator.Highlight(Cursor.Position)
|
||||
|
||||
If oState.CurrentClipboardContents = String.Empty Then
|
||||
Logger.Info("Current Clipboard Contents is empty. Exiting.")
|
||||
Exit Sub
|
||||
@@ -995,8 +1002,6 @@ Public Class frmFlowForm
|
||||
End Sub
|
||||
|
||||
Private Sub TestToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TestToolStripMenuItem.Click
|
||||
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
|
||||
Reference in New Issue
Block a user