MS_08.06.2016

This commit is contained in:
SchreiberM
2016-06-09 11:55:21 +02:00
parent e172c4e3ec
commit af27d8f335
3 changed files with 2094 additions and 2814 deletions

View File

@@ -24,9 +24,9 @@ Partial Class frmConstructor_Main
Private Sub InitializeComponent() Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container() Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmConstructor_Main)) Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmConstructor_Main))
Dim GridLevelNode4 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode() Dim GridLevelNode1 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
Dim GridLevelNode5 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode() Dim GridLevelNode2 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
Dim GridLevelNode6 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode() Dim GridLevelNode3 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
Me.SplitContainerMain = New DevExpress.XtraEditors.SplitContainerControl() Me.SplitContainerMain = New DevExpress.XtraEditors.SplitContainerControl()
Me.SplitContainerTop = New DevExpress.XtraEditors.SplitContainerControl() Me.SplitContainerTop = New DevExpress.XtraEditors.SplitContainerControl()
Me.TreeViewMain = New System.Windows.Forms.TreeView() Me.TreeViewMain = New System.Windows.Forms.TreeView()
@@ -192,106 +192,76 @@ Partial Class frmConstructor_Main
resources.ApplyResources(Me.SplitContainerMain, "SplitContainerMain") resources.ApplyResources(Me.SplitContainerMain, "SplitContainerMain")
Me.SplitContainerMain.Horizontal = False Me.SplitContainerMain.Horizontal = False
Me.SplitContainerMain.Name = "SplitContainerMain" Me.SplitContainerMain.Name = "SplitContainerMain"
resources.ApplyResources(Me.SplitContainerMain.Panel1, "SplitContainerMain.Panel1")
Me.SplitContainerMain.Panel1.Controls.Add(Me.SplitContainerTop) Me.SplitContainerMain.Panel1.Controls.Add(Me.SplitContainerTop)
resources.ApplyResources(Me.SplitContainerMain.Panel2, "SplitContainerMain.Panel2") resources.ApplyResources(Me.SplitContainerMain.Panel1, "SplitContainerMain.Panel1")
Me.SplitContainerMain.Panel2.Controls.Add(Me.TCDetails) Me.SplitContainerMain.Panel2.Controls.Add(Me.TCDetails)
Me.SplitContainerMain.Panel2.Controls.Add(Me.ToolStripEdit) Me.SplitContainerMain.Panel2.Controls.Add(Me.ToolStripEdit)
resources.ApplyResources(Me.SplitContainerMain.Panel2, "SplitContainerMain.Panel2")
Me.SplitContainerMain.SplitterPosition = 248 Me.SplitContainerMain.SplitterPosition = 248
Me.ttToolTip.SetToolTip(Me.SplitContainerMain, resources.GetString("SplitContainerMain.ToolTip"))
' '
'SplitContainerTop 'SplitContainerTop
' '
resources.ApplyResources(Me.SplitContainerTop, "SplitContainerTop")
Me.SplitContainerTop.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel1 Me.SplitContainerTop.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel1
resources.ApplyResources(Me.SplitContainerTop, "SplitContainerTop")
Me.SplitContainerTop.Name = "SplitContainerTop" Me.SplitContainerTop.Name = "SplitContainerTop"
resources.ApplyResources(Me.SplitContainerTop.Panel1, "SplitContainerTop.Panel1")
Me.SplitContainerTop.Panel1.Controls.Add(Me.TreeViewMain) Me.SplitContainerTop.Panel1.Controls.Add(Me.TreeViewMain)
resources.ApplyResources(Me.SplitContainerTop.Panel2, "SplitContainerTop.Panel2") resources.ApplyResources(Me.SplitContainerTop.Panel1, "SplitContainerTop.Panel1")
Me.SplitContainerTop.Panel2.Controls.Add(Me.GridControlMain) Me.SplitContainerTop.Panel2.Controls.Add(Me.GridControlMain)
resources.ApplyResources(Me.SplitContainerTop.Panel2, "SplitContainerTop.Panel2")
Me.SplitContainerTop.SplitterPosition = 283 Me.SplitContainerTop.SplitterPosition = 283
Me.ttToolTip.SetToolTip(Me.SplitContainerTop, resources.GetString("SplitContainerTop.ToolTip"))
' '
'TreeViewMain 'TreeViewMain
' '
resources.ApplyResources(Me.TreeViewMain, "TreeViewMain")
Me.ToolTipController.SetAllowHtmlText(Me.TreeViewMain, CType(resources.GetObject("TreeViewMain.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.TreeViewMain.BackColor = System.Drawing.SystemColors.GradientInactiveCaption Me.TreeViewMain.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
Me.TreeViewMain.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.TreeViewMain.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.TreeViewMain.ContextMenuStrip = Me.CMSEntity Me.TreeViewMain.ContextMenuStrip = Me.CMSEntity
resources.ApplyResources(Me.TreeViewMain, "TreeViewMain")
Me.TreeViewMain.FullRowSelect = True Me.TreeViewMain.FullRowSelect = True
Me.TreeViewMain.Name = "TreeViewMain" Me.TreeViewMain.Name = "TreeViewMain"
Me.TreeViewMain.ShowLines = False Me.TreeViewMain.ShowLines = False
Me.ToolTipController.SetTitle(Me.TreeViewMain, resources.GetString("TreeViewMain.Title"))
Me.ToolTipController.SetToolTip(Me.TreeViewMain, resources.GetString("TreeViewMain.ToolTip"))
Me.ttToolTip.SetToolTip(Me.TreeViewMain, resources.GetString("TreeViewMain.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.TreeViewMain, CType(resources.GetObject("TreeViewMain.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'CMSEntity 'CMSEntity
' '
resources.ApplyResources(Me.CMSEntity, "CMSEntity")
Me.ToolTipController.SetAllowHtmlText(Me.CMSEntity, CType(resources.GetObject("CMSEntity.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.CMSEntity.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ResetEbenenAuswahlToolStripMenuItem, Me.DateiimportEntitätToolStripMenuItem, Me.FormDesignerToolStripMenuItem}) Me.CMSEntity.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ResetEbenenAuswahlToolStripMenuItem, Me.DateiimportEntitätToolStripMenuItem, Me.FormDesignerToolStripMenuItem})
Me.CMSEntity.Name = "ContextMenuStrip2" Me.CMSEntity.Name = "ContextMenuStrip2"
Me.ToolTipController.SetTitle(Me.CMSEntity, resources.GetString("CMSEntity.Title")) resources.ApplyResources(Me.CMSEntity, "CMSEntity")
Me.ToolTipController.SetToolTip(Me.CMSEntity, resources.GetString("CMSEntity.ToolTip"))
Me.ttToolTip.SetToolTip(Me.CMSEntity, resources.GetString("CMSEntity.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.CMSEntity, CType(resources.GetObject("CMSEntity.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'ResetEbenenAuswahlToolStripMenuItem 'ResetEbenenAuswahlToolStripMenuItem
' '
resources.ApplyResources(Me.ResetEbenenAuswahlToolStripMenuItem, "ResetEbenenAuswahlToolStripMenuItem")
Me.ResetEbenenAuswahlToolStripMenuItem.Name = "ResetEbenenAuswahlToolStripMenuItem" Me.ResetEbenenAuswahlToolStripMenuItem.Name = "ResetEbenenAuswahlToolStripMenuItem"
resources.ApplyResources(Me.ResetEbenenAuswahlToolStripMenuItem, "ResetEbenenAuswahlToolStripMenuItem")
' '
'DateiimportEntitätToolStripMenuItem 'DateiimportEntitätToolStripMenuItem
' '
resources.ApplyResources(Me.DateiimportEntitätToolStripMenuItem, "DateiimportEntitätToolStripMenuItem")
Me.DateiimportEntitätToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.folder_Open_32xMD Me.DateiimportEntitätToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.folder_Open_32xMD
Me.DateiimportEntitätToolStripMenuItem.Name = "DateiimportEntitätToolStripMenuItem" Me.DateiimportEntitätToolStripMenuItem.Name = "DateiimportEntitätToolStripMenuItem"
resources.ApplyResources(Me.DateiimportEntitätToolStripMenuItem, "DateiimportEntitätToolStripMenuItem")
' '
'FormDesignerToolStripMenuItem 'FormDesignerToolStripMenuItem
' '
resources.ApplyResources(Me.FormDesignerToolStripMenuItem, "FormDesignerToolStripMenuItem")
Me.FormDesignerToolStripMenuItem.Name = "FormDesignerToolStripMenuItem" Me.FormDesignerToolStripMenuItem.Name = "FormDesignerToolStripMenuItem"
resources.ApplyResources(Me.FormDesignerToolStripMenuItem, "FormDesignerToolStripMenuItem")
' '
'GridControlMain 'GridControlMain
' '
resources.ApplyResources(Me.GridControlMain, "GridControlMain")
Me.GridControlMain.AllowDrop = True Me.GridControlMain.AllowDrop = True
Me.GridControlMain.ContextMenuStrip = Me.ContextMenuGrid Me.GridControlMain.ContextMenuStrip = Me.ContextMenuGrid
Me.GridControlMain.EmbeddedNavigator.AccessibleDescription = resources.GetString("GridControlMain.EmbeddedNavigator.AccessibleDescription") resources.ApplyResources(Me.GridControlMain, "GridControlMain")
Me.GridControlMain.EmbeddedNavigator.AccessibleName = resources.GetString("GridControlMain.EmbeddedNavigator.AccessibleName") GridLevelNode1.LevelTemplate = Me.grvwGrid
Me.GridControlMain.EmbeddedNavigator.AllowHtmlTextInToolTip = CType(resources.GetObject("GridControlMain.EmbeddedNavigator.AllowHtmlTextInToolTip"), DevExpress.Utils.DefaultBoolean) GridLevelNode1.RelationName = "Level1"
Me.GridControlMain.EmbeddedNavigator.Anchor = CType(resources.GetObject("GridControlMain.EmbeddedNavigator.Anchor"), System.Windows.Forms.AnchorStyles) GridLevelNode2.LevelTemplate = Me.grvwCarousel
Me.GridControlMain.EmbeddedNavigator.BackgroundImage = CType(resources.GetObject("GridControlMain.EmbeddedNavigator.BackgroundImage"), System.Drawing.Image) GridLevelNode2.RelationName = "Level2"
Me.GridControlMain.EmbeddedNavigator.BackgroundImageLayout = CType(resources.GetObject("GridControlMain.EmbeddedNavigator.BackgroundImageLayout"), System.Windows.Forms.ImageLayout) GridLevelNode3.RelationName = "Level3"
Me.GridControlMain.EmbeddedNavigator.ImeMode = CType(resources.GetObject("GridControlMain.EmbeddedNavigator.ImeMode"), System.Windows.Forms.ImeMode) Me.GridControlMain.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode1, GridLevelNode2, GridLevelNode3})
Me.GridControlMain.EmbeddedNavigator.MaximumSize = CType(resources.GetObject("GridControlMain.EmbeddedNavigator.MaximumSize"), System.Drawing.Size)
Me.GridControlMain.EmbeddedNavigator.TextLocation = CType(resources.GetObject("GridControlMain.EmbeddedNavigator.TextLocation"), DevExpress.XtraEditors.NavigatorButtonsTextLocation)
Me.GridControlMain.EmbeddedNavigator.ToolTip = resources.GetString("GridControlMain.EmbeddedNavigator.ToolTip")
Me.GridControlMain.EmbeddedNavigator.ToolTipIconType = CType(resources.GetObject("GridControlMain.EmbeddedNavigator.ToolTipIconType"), DevExpress.Utils.ToolTipIconType)
Me.GridControlMain.EmbeddedNavigator.ToolTipTitle = resources.GetString("GridControlMain.EmbeddedNavigator.ToolTipTitle")
GridLevelNode4.LevelTemplate = Me.grvwGrid
GridLevelNode4.RelationName = "Level1"
GridLevelNode5.LevelTemplate = Me.grvwCarousel
GridLevelNode5.RelationName = "Level2"
GridLevelNode6.RelationName = "Level3"
Me.GridControlMain.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode4, GridLevelNode5, GridLevelNode6})
Me.GridControlMain.MainView = Me.grvwTiles Me.GridControlMain.MainView = Me.grvwTiles
Me.GridControlMain.Name = "GridControlMain" Me.GridControlMain.Name = "GridControlMain"
Me.ttToolTip.SetToolTip(Me.GridControlMain, resources.GetString("GridControlMain.ToolTip"))
Me.GridControlMain.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.grvwGrid, Me.grvwCarousel, Me.grvwTiles}) Me.GridControlMain.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.grvwGrid, Me.grvwCarousel, Me.grvwTiles})
' '
'ContextMenuGrid 'ContextMenuGrid
' '
resources.ApplyResources(Me.ContextMenuGrid, "ContextMenuGrid")
Me.ToolTipController.SetAllowHtmlText(Me.ContextMenuGrid, CType(resources.GetObject("ContextMenuGrid.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.ContextMenuGrid.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.FunktionenDataGridToolStripMenuItem, Me.ToolStripSeparator1, Me.AnsichtUmschaltenToolStripMenuItem, Me.ButtonSetViewAsDefault, Me.ButtonResetView, Me.ToolStripSeparator2, Me.SucheAnzeigenToolStripMenuItem, Me.ButtonResetFilter, Me.ButtonExportToExcel, Me.DatenNeuLadenToolStripMenuItem, Me.ToolStripSeparator6, Me.tsmi_RecordDelete, Me.MassenänderungToolStripMenuItem}) Me.ContextMenuGrid.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.FunktionenDataGridToolStripMenuItem, Me.ToolStripSeparator1, Me.AnsichtUmschaltenToolStripMenuItem, Me.ButtonSetViewAsDefault, Me.ButtonResetView, Me.ToolStripSeparator2, Me.SucheAnzeigenToolStripMenuItem, Me.ButtonResetFilter, Me.ButtonExportToExcel, Me.DatenNeuLadenToolStripMenuItem, Me.ToolStripSeparator6, Me.tsmi_RecordDelete, Me.MassenänderungToolStripMenuItem})
Me.ContextMenuGrid.Name = "ContextMenuGrid" Me.ContextMenuGrid.Name = "ContextMenuGrid"
Me.ToolTipController.SetTitle(Me.ContextMenuGrid, resources.GetString("ContextMenuGrid.Title")) resources.ApplyResources(Me.ContextMenuGrid, "ContextMenuGrid")
Me.ToolTipController.SetToolTip(Me.ContextMenuGrid, resources.GetString("ContextMenuGrid.ToolTip"))
Me.ttToolTip.SetToolTip(Me.ContextMenuGrid, resources.GetString("ContextMenuGrid.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.ContextMenuGrid, CType(resources.GetObject("ContextMenuGrid.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'FunktionenDataGridToolStripMenuItem 'FunktionenDataGridToolStripMenuItem
' '
@@ -300,99 +270,95 @@ Partial Class frmConstructor_Main
' '
'ToolStripSeparator1 'ToolStripSeparator1
' '
resources.ApplyResources(Me.ToolStripSeparator1, "ToolStripSeparator1")
Me.ToolStripSeparator1.Name = "ToolStripSeparator1" Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
resources.ApplyResources(Me.ToolStripSeparator1, "ToolStripSeparator1")
' '
'AnsichtUmschaltenToolStripMenuItem 'AnsichtUmschaltenToolStripMenuItem
' '
resources.ApplyResources(Me.AnsichtUmschaltenToolStripMenuItem, "AnsichtUmschaltenToolStripMenuItem")
Me.AnsichtUmschaltenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ButtonQuickViewCarousel, Me.ButtonQuickViewTiles, Me.ButtonDetailView}) Me.AnsichtUmschaltenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ButtonQuickViewCarousel, Me.ButtonQuickViewTiles, Me.ButtonDetailView})
Me.AnsichtUmschaltenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.view_16xLG Me.AnsichtUmschaltenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.view_16xLG
Me.AnsichtUmschaltenToolStripMenuItem.Name = "AnsichtUmschaltenToolStripMenuItem" Me.AnsichtUmschaltenToolStripMenuItem.Name = "AnsichtUmschaltenToolStripMenuItem"
resources.ApplyResources(Me.AnsichtUmschaltenToolStripMenuItem, "AnsichtUmschaltenToolStripMenuItem")
' '
'ButtonQuickViewCarousel 'ButtonQuickViewCarousel
' '
resources.ApplyResources(Me.ButtonQuickViewCarousel, "ButtonQuickViewCarousel")
Me.ButtonQuickViewCarousel.Image = Global.DD_Record_Organiser.My.Resources.Resources.Carousel_16x16 Me.ButtonQuickViewCarousel.Image = Global.DD_Record_Organiser.My.Resources.Resources.Carousel_16x16
Me.ButtonQuickViewCarousel.Name = "ButtonQuickViewCarousel" Me.ButtonQuickViewCarousel.Name = "ButtonQuickViewCarousel"
resources.ApplyResources(Me.ButtonQuickViewCarousel, "ButtonQuickViewCarousel")
' '
'ButtonQuickViewTiles 'ButtonQuickViewTiles
' '
resources.ApplyResources(Me.ButtonQuickViewTiles, "ButtonQuickViewTiles")
Me.ButtonQuickViewTiles.Image = Global.DD_Record_Organiser.My.Resources.Resources.application_view_tile Me.ButtonQuickViewTiles.Image = Global.DD_Record_Organiser.My.Resources.Resources.application_view_tile
Me.ButtonQuickViewTiles.Name = "ButtonQuickViewTiles" Me.ButtonQuickViewTiles.Name = "ButtonQuickViewTiles"
resources.ApplyResources(Me.ButtonQuickViewTiles, "ButtonQuickViewTiles")
' '
'ButtonDetailView 'ButtonDetailView
' '
resources.ApplyResources(Me.ButtonDetailView, "ButtonDetailView")
Me.ButtonDetailView.Image = Global.DD_Record_Organiser.My.Resources.Resources.application_view_detail Me.ButtonDetailView.Image = Global.DD_Record_Organiser.My.Resources.Resources.application_view_detail
Me.ButtonDetailView.Name = "ButtonDetailView" Me.ButtonDetailView.Name = "ButtonDetailView"
resources.ApplyResources(Me.ButtonDetailView, "ButtonDetailView")
' '
'ButtonSetViewAsDefault 'ButtonSetViewAsDefault
' '
resources.ApplyResources(Me.ButtonSetViewAsDefault, "ButtonSetViewAsDefault")
Me.ButtonSetViewAsDefault.Image = Global.DD_Record_Organiser.My.Resources.Resources.checkbox_16xLG Me.ButtonSetViewAsDefault.Image = Global.DD_Record_Organiser.My.Resources.Resources.checkbox_16xLG
Me.ButtonSetViewAsDefault.Name = "ButtonSetViewAsDefault" Me.ButtonSetViewAsDefault.Name = "ButtonSetViewAsDefault"
resources.ApplyResources(Me.ButtonSetViewAsDefault, "ButtonSetViewAsDefault")
' '
'ButtonResetView 'ButtonResetView
' '
resources.ApplyResources(Me.ButtonResetView, "ButtonResetView")
Me.ButtonResetView.Name = "ButtonResetView" Me.ButtonResetView.Name = "ButtonResetView"
resources.ApplyResources(Me.ButtonResetView, "ButtonResetView")
' '
'ToolStripSeparator2 'ToolStripSeparator2
' '
resources.ApplyResources(Me.ToolStripSeparator2, "ToolStripSeparator2")
Me.ToolStripSeparator2.Name = "ToolStripSeparator2" Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
resources.ApplyResources(Me.ToolStripSeparator2, "ToolStripSeparator2")
' '
'SucheAnzeigenToolStripMenuItem 'SucheAnzeigenToolStripMenuItem
' '
resources.ApplyResources(Me.SucheAnzeigenToolStripMenuItem, "SucheAnzeigenToolStripMenuItem")
Me.SucheAnzeigenToolStripMenuItem.Name = "SucheAnzeigenToolStripMenuItem" Me.SucheAnzeigenToolStripMenuItem.Name = "SucheAnzeigenToolStripMenuItem"
resources.ApplyResources(Me.SucheAnzeigenToolStripMenuItem, "SucheAnzeigenToolStripMenuItem")
' '
'ButtonResetFilter 'ButtonResetFilter
' '
resources.ApplyResources(Me.ButtonResetFilter, "ButtonResetFilter")
Me.ButtonResetFilter.Name = "ButtonResetFilter" Me.ButtonResetFilter.Name = "ButtonResetFilter"
resources.ApplyResources(Me.ButtonResetFilter, "ButtonResetFilter")
' '
'ButtonExportToExcel 'ButtonExportToExcel
' '
resources.ApplyResources(Me.ButtonExportToExcel, "ButtonExportToExcel")
Me.ButtonExportToExcel.Image = Global.DD_Record_Organiser.My.Resources.Resources.Excel_25ixel Me.ButtonExportToExcel.Image = Global.DD_Record_Organiser.My.Resources.Resources.Excel_25ixel
Me.ButtonExportToExcel.Name = "ButtonExportToExcel" Me.ButtonExportToExcel.Name = "ButtonExportToExcel"
resources.ApplyResources(Me.ButtonExportToExcel, "ButtonExportToExcel")
' '
'DatenNeuLadenToolStripMenuItem 'DatenNeuLadenToolStripMenuItem
' '
resources.ApplyResources(Me.DatenNeuLadenToolStripMenuItem, "DatenNeuLadenToolStripMenuItem")
Me.DatenNeuLadenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.refresh_16xLG Me.DatenNeuLadenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.refresh_16xLG
Me.DatenNeuLadenToolStripMenuItem.Name = "DatenNeuLadenToolStripMenuItem" Me.DatenNeuLadenToolStripMenuItem.Name = "DatenNeuLadenToolStripMenuItem"
resources.ApplyResources(Me.DatenNeuLadenToolStripMenuItem, "DatenNeuLadenToolStripMenuItem")
' '
'ToolStripSeparator6 'ToolStripSeparator6
' '
resources.ApplyResources(Me.ToolStripSeparator6, "ToolStripSeparator6")
Me.ToolStripSeparator6.Name = "ToolStripSeparator6" Me.ToolStripSeparator6.Name = "ToolStripSeparator6"
resources.ApplyResources(Me.ToolStripSeparator6, "ToolStripSeparator6")
' '
'tsmi_RecordDelete 'tsmi_RecordDelete
' '
resources.ApplyResources(Me.tsmi_RecordDelete, "tsmi_RecordDelete")
Me.tsmi_RecordDelete.Image = Global.DD_Record_Organiser.My.Resources.Resources.delete Me.tsmi_RecordDelete.Image = Global.DD_Record_Organiser.My.Resources.Resources.delete
Me.tsmi_RecordDelete.Name = "tsmi_RecordDelete" Me.tsmi_RecordDelete.Name = "tsmi_RecordDelete"
resources.ApplyResources(Me.tsmi_RecordDelete, "tsmi_RecordDelete")
' '
'MassenänderungToolStripMenuItem 'MassenänderungToolStripMenuItem
' '
resources.ApplyResources(Me.MassenänderungToolStripMenuItem, "MassenänderungToolStripMenuItem")
Me.MassenänderungToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources._4_four_rows_9716 Me.MassenänderungToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources._4_four_rows_9716
Me.MassenänderungToolStripMenuItem.Name = "MassenänderungToolStripMenuItem" Me.MassenänderungToolStripMenuItem.Name = "MassenänderungToolStripMenuItem"
resources.ApplyResources(Me.MassenänderungToolStripMenuItem, "MassenänderungToolStripMenuItem")
' '
'grvwGrid 'grvwGrid
' '
Me.grvwGrid.Appearance.EvenRow.BackColor = CType(resources.GetObject("grvwGrid.Appearance.EvenRow.BackColor"), System.Drawing.Color) Me.grvwGrid.Appearance.EvenRow.BackColor = CType(resources.GetObject("grvwGrid.Appearance.EvenRow.BackColor"), System.Drawing.Color)
Me.grvwGrid.Appearance.EvenRow.FontSizeDelta = CType(resources.GetObject("grvwGrid.Appearance.EvenRow.FontSizeDelta"), Integer)
Me.grvwGrid.Appearance.EvenRow.FontStyleDelta = CType(resources.GetObject("grvwGrid.Appearance.EvenRow.FontStyleDelta"), System.Drawing.FontStyle)
Me.grvwGrid.Appearance.EvenRow.GradientMode = CType(resources.GetObject("grvwGrid.Appearance.EvenRow.GradientMode"), System.Drawing.Drawing2D.LinearGradientMode)
Me.grvwGrid.Appearance.EvenRow.Image = CType(resources.GetObject("grvwGrid.Appearance.EvenRow.Image"), System.Drawing.Image)
Me.grvwGrid.Appearance.EvenRow.Options.UseBackColor = True Me.grvwGrid.Appearance.EvenRow.Options.UseBackColor = True
resources.ApplyResources(Me.grvwGrid, "grvwGrid")
Me.grvwGrid.GridControl = Me.GridControlMain Me.grvwGrid.GridControl = Me.GridControlMain
resources.ApplyResources(Me.grvwGrid, "grvwGrid")
Me.grvwGrid.HorzScrollVisibility = DevExpress.XtraGrid.Views.Base.ScrollVisibility.Always Me.grvwGrid.HorzScrollVisibility = DevExpress.XtraGrid.Views.Base.ScrollVisibility.Always
Me.grvwGrid.Name = "grvwGrid" Me.grvwGrid.Name = "grvwGrid"
Me.grvwGrid.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False] Me.grvwGrid.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
@@ -412,17 +378,12 @@ Partial Class frmConstructor_Main
' '
'grvwCarousel 'grvwCarousel
' '
resources.ApplyResources(Me.grvwCarousel, "grvwCarousel")
Me.grvwCarousel.GridControl = Me.GridControlMain Me.grvwCarousel.GridControl = Me.GridControlMain
Me.grvwCarousel.Name = "grvwCarousel" Me.grvwCarousel.Name = "grvwCarousel"
Me.grvwCarousel.TemplateCard = Nothing Me.grvwCarousel.TemplateCard = Nothing
' '
'grvwTiles 'grvwTiles
' '
Me.grvwTiles.AppearanceGroupText.FontSizeDelta = CType(resources.GetObject("grvwTiles.AppearanceGroupText.FontSizeDelta"), Integer)
Me.grvwTiles.AppearanceGroupText.FontStyleDelta = CType(resources.GetObject("grvwTiles.AppearanceGroupText.FontStyleDelta"), System.Drawing.FontStyle)
Me.grvwTiles.AppearanceGroupText.GradientMode = CType(resources.GetObject("grvwTiles.AppearanceGroupText.GradientMode"), System.Drawing.Drawing2D.LinearGradientMode)
Me.grvwTiles.AppearanceGroupText.Image = CType(resources.GetObject("grvwTiles.AppearanceGroupText.Image"), System.Drawing.Image)
Me.grvwTiles.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.HotFlat Me.grvwTiles.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.HotFlat
Me.grvwTiles.FocusBorderColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(255, Byte), Integer)) Me.grvwTiles.FocusBorderColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(255, Byte), Integer))
Me.grvwTiles.GridControl = Me.GridControlMain Me.grvwTiles.GridControl = Me.GridControlMain
@@ -434,133 +395,97 @@ Partial Class frmConstructor_Main
Me.grvwTiles.OptionsTiles.RowCount = 2 Me.grvwTiles.OptionsTiles.RowCount = 2
Me.grvwTiles.OptionsTiles.ScrollMode = DevExpress.XtraEditors.TileControlScrollMode.ScrollBar Me.grvwTiles.OptionsTiles.ScrollMode = DevExpress.XtraEditors.TileControlScrollMode.ScrollBar
Me.grvwTiles.OptionsTiles.VerticalContentAlignment = DevExpress.Utils.VertAlignment.Top Me.grvwTiles.OptionsTiles.VerticalContentAlignment = DevExpress.Utils.VertAlignment.Top
resources.ApplyResources(Me.grvwTiles, "grvwTiles")
' '
'TCDetails 'TCDetails
' '
resources.ApplyResources(Me.TCDetails, "TCDetails")
Me.TCDetails.AppearancePage.HeaderHotTracked.BackColor = CType(resources.GetObject("TCDetails.AppearancePage.HeaderHotTracked.BackColor"), System.Drawing.Color) Me.TCDetails.AppearancePage.HeaderHotTracked.BackColor = CType(resources.GetObject("TCDetails.AppearancePage.HeaderHotTracked.BackColor"), System.Drawing.Color)
Me.TCDetails.AppearancePage.HeaderHotTracked.BackColor2 = CType(resources.GetObject("TCDetails.AppearancePage.HeaderHotTracked.BackColor2"), System.Drawing.Color) Me.TCDetails.AppearancePage.HeaderHotTracked.BackColor2 = CType(resources.GetObject("TCDetails.AppearancePage.HeaderHotTracked.BackColor2"), System.Drawing.Color)
Me.TCDetails.AppearancePage.HeaderHotTracked.Font = CType(resources.GetObject("TCDetails.AppearancePage.HeaderHotTracked.Font"), System.Drawing.Font) Me.TCDetails.AppearancePage.HeaderHotTracked.Font = CType(resources.GetObject("TCDetails.AppearancePage.HeaderHotTracked.Font"), System.Drawing.Font)
Me.TCDetails.AppearancePage.HeaderHotTracked.FontSizeDelta = CType(resources.GetObject("TCDetails.AppearancePage.HeaderHotTracked.FontSizeDelta"), Integer)
Me.TCDetails.AppearancePage.HeaderHotTracked.FontStyleDelta = CType(resources.GetObject("TCDetails.AppearancePage.HeaderHotTracked.FontStyleDelta"), System.Drawing.FontStyle)
Me.TCDetails.AppearancePage.HeaderHotTracked.GradientMode = CType(resources.GetObject("TCDetails.AppearancePage.HeaderHotTracked.GradientMode"), System.Drawing.Drawing2D.LinearGradientMode)
Me.TCDetails.AppearancePage.HeaderHotTracked.Image = CType(resources.GetObject("TCDetails.AppearancePage.HeaderHotTracked.Image"), System.Drawing.Image)
Me.TCDetails.AppearancePage.HeaderHotTracked.Options.UseBackColor = True Me.TCDetails.AppearancePage.HeaderHotTracked.Options.UseBackColor = True
Me.TCDetails.AppearancePage.HeaderHotTracked.Options.UseFont = True Me.TCDetails.AppearancePage.HeaderHotTracked.Options.UseFont = True
resources.ApplyResources(Me.TCDetails, "TCDetails")
Me.TCDetails.Name = "TCDetails" Me.TCDetails.Name = "TCDetails"
Me.TCDetails.SelectedTabPage = Me.TabDetails Me.TCDetails.SelectedTabPage = Me.TabDetails
Me.TCDetails.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.TabDetails, Me.TabWindream, Me.TabFollowUp, Me.TabPos}) Me.TCDetails.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.TabDetails, Me.TabWindream, Me.TabFollowUp, Me.TabPos})
Me.ttToolTip.SetToolTip(Me.TCDetails, resources.GetString("TCDetails.ToolTip"))
' '
'TabDetails 'TabDetails
' '
resources.ApplyResources(Me.TabDetails, "TabDetails")
Me.TabDetails.Controls.Add(Me.pnlDetails) Me.TabDetails.Controls.Add(Me.pnlDetails)
Me.TabDetails.Image = Global.DD_Record_Organiser.My.Resources.Resources.grid_Data_16xMD Me.TabDetails.Image = Global.DD_Record_Organiser.My.Resources.Resources.grid_Data_16xMD
Me.TabDetails.Name = "TabDetails" Me.TabDetails.Name = "TabDetails"
Me.ttToolTip.SetToolTip(Me.TabDetails, resources.GetString("TabDetails.ToolTip")) resources.ApplyResources(Me.TabDetails, "TabDetails")
' '
'pnlDetails 'pnlDetails
' '
resources.ApplyResources(Me.pnlDetails, "pnlDetails")
Me.pnlDetails.AllowDrop = True Me.pnlDetails.AllowDrop = True
Me.ToolTipController.SetAllowHtmlText(Me.pnlDetails, CType(resources.GetObject("pnlDetails.AllowHtmlText"), DevExpress.Utils.DefaultBoolean)) resources.ApplyResources(Me.pnlDetails, "pnlDetails")
Me.pnlDetails.Name = "pnlDetails" Me.pnlDetails.Name = "pnlDetails"
Me.ToolTipController.SetTitle(Me.pnlDetails, resources.GetString("pnlDetails.Title"))
Me.ToolTipController.SetToolTip(Me.pnlDetails, resources.GetString("pnlDetails.ToolTip"))
Me.ttToolTip.SetToolTip(Me.pnlDetails, resources.GetString("pnlDetails.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.pnlDetails, CType(resources.GetObject("pnlDetails.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'TabWindream 'TabWindream
' '
resources.ApplyResources(Me.TabWindream, "TabWindream")
Me.TabWindream.AllowDrop = True Me.TabWindream.AllowDrop = True
Me.TabWindream.Controls.Add(Me.GridControlDocSearch) Me.TabWindream.Controls.Add(Me.GridControlDocSearch)
Me.TabWindream.Controls.Add(Me.ToolStripDokumente) Me.TabWindream.Controls.Add(Me.ToolStripDokumente)
Me.TabWindream.Image = Global.DD_Record_Organiser.My.Resources.Resources.Files_7954 Me.TabWindream.Image = Global.DD_Record_Organiser.My.Resources.Resources.Files_7954
Me.TabWindream.Name = "TabWindream" Me.TabWindream.Name = "TabWindream"
Me.ttToolTip.SetToolTip(Me.TabWindream, resources.GetString("TabWindream.ToolTip")) resources.ApplyResources(Me.TabWindream, "TabWindream")
' '
'GridControlDocSearch 'GridControlDocSearch
' '
resources.ApplyResources(Me.GridControlDocSearch, "GridControlDocSearch")
Me.GridControlDocSearch.ContextMenuStrip = Me.ContextMenuStripResultFiles Me.GridControlDocSearch.ContextMenuStrip = Me.ContextMenuStripResultFiles
Me.GridControlDocSearch.EmbeddedNavigator.AccessibleDescription = resources.GetString("GridControlDocSearch.EmbeddedNavigator.AccessibleDescription") resources.ApplyResources(Me.GridControlDocSearch, "GridControlDocSearch")
Me.GridControlDocSearch.EmbeddedNavigator.AccessibleName = resources.GetString("GridControlDocSearch.EmbeddedNavigator.AccessibleName")
Me.GridControlDocSearch.EmbeddedNavigator.AllowHtmlTextInToolTip = CType(resources.GetObject("GridControlDocSearch.EmbeddedNavigator.AllowHtmlTextInToolTip"), DevExpress.Utils.DefaultBoolean)
Me.GridControlDocSearch.EmbeddedNavigator.Anchor = CType(resources.GetObject("GridControlDocSearch.EmbeddedNavigator.Anchor"), System.Windows.Forms.AnchorStyles)
Me.GridControlDocSearch.EmbeddedNavigator.BackgroundImage = CType(resources.GetObject("GridControlDocSearch.EmbeddedNavigator.BackgroundImage"), System.Drawing.Image)
Me.GridControlDocSearch.EmbeddedNavigator.BackgroundImageLayout = CType(resources.GetObject("GridControlDocSearch.EmbeddedNavigator.BackgroundImageLayout"), System.Windows.Forms.ImageLayout)
Me.GridControlDocSearch.EmbeddedNavigator.ImeMode = CType(resources.GetObject("GridControlDocSearch.EmbeddedNavigator.ImeMode"), System.Windows.Forms.ImeMode)
Me.GridControlDocSearch.EmbeddedNavigator.MaximumSize = CType(resources.GetObject("GridControlDocSearch.EmbeddedNavigator.MaximumSize"), System.Drawing.Size)
Me.GridControlDocSearch.EmbeddedNavigator.TextLocation = CType(resources.GetObject("GridControlDocSearch.EmbeddedNavigator.TextLocation"), DevExpress.XtraEditors.NavigatorButtonsTextLocation)
Me.GridControlDocSearch.EmbeddedNavigator.ToolTip = resources.GetString("GridControlDocSearch.EmbeddedNavigator.ToolTip")
Me.GridControlDocSearch.EmbeddedNavigator.ToolTipIconType = CType(resources.GetObject("GridControlDocSearch.EmbeddedNavigator.ToolTipIconType"), DevExpress.Utils.ToolTipIconType)
Me.GridControlDocSearch.EmbeddedNavigator.ToolTipTitle = resources.GetString("GridControlDocSearch.EmbeddedNavigator.ToolTipTitle")
Me.GridControlDocSearch.MainView = Me.GridViewDoc_Search Me.GridControlDocSearch.MainView = Me.GridViewDoc_Search
Me.GridControlDocSearch.Name = "GridControlDocSearch" Me.GridControlDocSearch.Name = "GridControlDocSearch"
Me.ttToolTip.SetToolTip(Me.GridControlDocSearch, resources.GetString("GridControlDocSearch.ToolTip"))
Me.GridControlDocSearch.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDoc_Search}) Me.GridControlDocSearch.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDoc_Search})
' '
'ContextMenuStripResultFiles 'ContextMenuStripResultFiles
' '
resources.ApplyResources(Me.ContextMenuStripResultFiles, "ContextMenuStripResultFiles")
Me.ToolTipController.SetAllowHtmlText(Me.ContextMenuStripResultFiles, CType(resources.GetObject("ContextMenuStripResultFiles.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.ContextMenuStripResultFiles.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiÖffnenToolStripMenuItem, Me.ToolStripSeparator7, Me.CopyToolStripMenuItem, Me.ToolStripSeparator8, Me.DeleteToolStripMenuItem, Me.ToolStripSeparator9, Me.PropertiesToolStripMenuItem}) Me.ContextMenuStripResultFiles.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiÖffnenToolStripMenuItem, Me.ToolStripSeparator7, Me.CopyToolStripMenuItem, Me.ToolStripSeparator8, Me.DeleteToolStripMenuItem, Me.ToolStripSeparator9, Me.PropertiesToolStripMenuItem})
Me.ContextMenuStripResultFiles.Name = "ContextMenuStripResultFiles" Me.ContextMenuStripResultFiles.Name = "ContextMenuStripResultFiles"
Me.ToolTipController.SetTitle(Me.ContextMenuStripResultFiles, resources.GetString("ContextMenuStripResultFiles.Title")) resources.ApplyResources(Me.ContextMenuStripResultFiles, "ContextMenuStripResultFiles")
Me.ToolTipController.SetToolTip(Me.ContextMenuStripResultFiles, resources.GetString("ContextMenuStripResultFiles.ToolTip"))
Me.ttToolTip.SetToolTip(Me.ContextMenuStripResultFiles, resources.GetString("ContextMenuStripResultFiles.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.ContextMenuStripResultFiles, CType(resources.GetObject("ContextMenuStripResultFiles.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'DateiÖffnenToolStripMenuItem 'DateiÖffnenToolStripMenuItem
' '
resources.ApplyResources(Me.DateiÖffnenToolStripMenuItem, "DateiÖffnenToolStripMenuItem")
Me.DateiÖffnenToolStripMenuItem.Name = "DateiÖffnenToolStripMenuItem" Me.DateiÖffnenToolStripMenuItem.Name = "DateiÖffnenToolStripMenuItem"
resources.ApplyResources(Me.DateiÖffnenToolStripMenuItem, "DateiÖffnenToolStripMenuItem")
' '
'ToolStripSeparator7 'ToolStripSeparator7
' '
resources.ApplyResources(Me.ToolStripSeparator7, "ToolStripSeparator7")
Me.ToolStripSeparator7.Name = "ToolStripSeparator7" Me.ToolStripSeparator7.Name = "ToolStripSeparator7"
resources.ApplyResources(Me.ToolStripSeparator7, "ToolStripSeparator7")
' '
'CopyToolStripMenuItem 'CopyToolStripMenuItem
' '
resources.ApplyResources(Me.CopyToolStripMenuItem, "CopyToolStripMenuItem")
Me.CopyToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.Copy_6524 Me.CopyToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.Copy_6524
Me.CopyToolStripMenuItem.Name = "CopyToolStripMenuItem" Me.CopyToolStripMenuItem.Name = "CopyToolStripMenuItem"
resources.ApplyResources(Me.CopyToolStripMenuItem, "CopyToolStripMenuItem")
' '
'ToolStripSeparator8 'ToolStripSeparator8
' '
resources.ApplyResources(Me.ToolStripSeparator8, "ToolStripSeparator8")
Me.ToolStripSeparator8.Name = "ToolStripSeparator8" Me.ToolStripSeparator8.Name = "ToolStripSeparator8"
resources.ApplyResources(Me.ToolStripSeparator8, "ToolStripSeparator8")
' '
'DeleteToolStripMenuItem 'DeleteToolStripMenuItem
' '
resources.ApplyResources(Me.DeleteToolStripMenuItem, "DeleteToolStripMenuItem")
Me.DeleteToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.delete Me.DeleteToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.delete
Me.DeleteToolStripMenuItem.Name = "DeleteToolStripMenuItem" Me.DeleteToolStripMenuItem.Name = "DeleteToolStripMenuItem"
resources.ApplyResources(Me.DeleteToolStripMenuItem, "DeleteToolStripMenuItem")
' '
'ToolStripSeparator9 'ToolStripSeparator9
' '
resources.ApplyResources(Me.ToolStripSeparator9, "ToolStripSeparator9")
Me.ToolStripSeparator9.Name = "ToolStripSeparator9" Me.ToolStripSeparator9.Name = "ToolStripSeparator9"
resources.ApplyResources(Me.ToolStripSeparator9, "ToolStripSeparator9")
' '
'PropertiesToolStripMenuItem 'PropertiesToolStripMenuItem
' '
resources.ApplyResources(Me.PropertiesToolStripMenuItem, "PropertiesToolStripMenuItem")
Me.PropertiesToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.PropertyGridEditorPart_6041 Me.PropertiesToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.PropertyGridEditorPart_6041
Me.PropertiesToolStripMenuItem.Name = "PropertiesToolStripMenuItem" Me.PropertiesToolStripMenuItem.Name = "PropertiesToolStripMenuItem"
resources.ApplyResources(Me.PropertiesToolStripMenuItem, "PropertiesToolStripMenuItem")
' '
'GridViewDoc_Search 'GridViewDoc_Search
' '
Me.GridViewDoc_Search.Appearance.OddRow.BackColor = CType(resources.GetObject("GridViewDoc_Search.Appearance.OddRow.BackColor"), System.Drawing.Color) Me.GridViewDoc_Search.Appearance.OddRow.BackColor = CType(resources.GetObject("GridViewDoc_Search.Appearance.OddRow.BackColor"), System.Drawing.Color)
Me.GridViewDoc_Search.Appearance.OddRow.FontSizeDelta = CType(resources.GetObject("GridViewDoc_Search.Appearance.OddRow.FontSizeDelta"), Integer)
Me.GridViewDoc_Search.Appearance.OddRow.FontStyleDelta = CType(resources.GetObject("GridViewDoc_Search.Appearance.OddRow.FontStyleDelta"), System.Drawing.FontStyle)
Me.GridViewDoc_Search.Appearance.OddRow.GradientMode = CType(resources.GetObject("GridViewDoc_Search.Appearance.OddRow.GradientMode"), System.Drawing.Drawing2D.LinearGradientMode)
Me.GridViewDoc_Search.Appearance.OddRow.Image = CType(resources.GetObject("GridViewDoc_Search.Appearance.OddRow.Image"), System.Drawing.Image)
Me.GridViewDoc_Search.Appearance.OddRow.Options.UseBackColor = True Me.GridViewDoc_Search.Appearance.OddRow.Options.UseBackColor = True
resources.ApplyResources(Me.GridViewDoc_Search, "GridViewDoc_Search")
Me.GridViewDoc_Search.FocusRectStyle = DevExpress.XtraGrid.Views.Grid.DrawFocusRectStyle.RowFullFocus Me.GridViewDoc_Search.FocusRectStyle = DevExpress.XtraGrid.Views.Grid.DrawFocusRectStyle.RowFullFocus
Me.GridViewDoc_Search.GridControl = Me.GridControlDocSearch Me.GridViewDoc_Search.GridControl = Me.GridControlDocSearch
Me.GridViewDoc_Search.Name = "GridViewDoc_Search" Me.GridViewDoc_Search.Name = "GridViewDoc_Search"
@@ -572,15 +497,10 @@ Partial Class frmConstructor_Main
' '
'ToolStripDokumente 'ToolStripDokumente
' '
resources.ApplyResources(Me.ToolStripDokumente, "ToolStripDokumente")
Me.ToolStripDokumente.AllowDrop = True Me.ToolStripDokumente.AllowDrop = True
Me.ToolTipController.SetAllowHtmlText(Me.ToolStripDokumente, CType(resources.GetObject("ToolStripDokumente.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.ToolStripDokumente.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tslblWindreamView, Me.ToolStripDropDownButton2}) Me.ToolStripDokumente.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tslblWindreamView, Me.ToolStripDropDownButton2})
resources.ApplyResources(Me.ToolStripDokumente, "ToolStripDokumente")
Me.ToolStripDokumente.Name = "ToolStripDokumente" Me.ToolStripDokumente.Name = "ToolStripDokumente"
Me.ToolTipController.SetTitle(Me.ToolStripDokumente, resources.GetString("ToolStripDokumente.Title"))
Me.ToolTipController.SetToolTip(Me.ToolStripDokumente, resources.GetString("ToolStripDokumente.ToolTip"))
Me.ttToolTip.SetToolTip(Me.ToolStripDokumente, resources.GetString("ToolStripDokumente.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.ToolStripDokumente, CType(resources.GetObject("ToolStripDokumente.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'tslblWindreamView 'tslblWindreamView
' '
@@ -589,38 +509,32 @@ Partial Class frmConstructor_Main
' '
'ToolStripDropDownButton2 'ToolStripDropDownButton2
' '
resources.ApplyResources(Me.ToolStripDropDownButton2, "ToolStripDropDownButton2")
Me.ToolStripDropDownButton2.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right Me.ToolStripDropDownButton2.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.ToolStripDropDownButton2.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.KonfigurationToolStripMenuItem}) Me.ToolStripDropDownButton2.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.KonfigurationToolStripMenuItem})
resources.ApplyResources(Me.ToolStripDropDownButton2, "ToolStripDropDownButton2")
Me.ToolStripDropDownButton2.Name = "ToolStripDropDownButton2" Me.ToolStripDropDownButton2.Name = "ToolStripDropDownButton2"
' '
'KonfigurationToolStripMenuItem 'KonfigurationToolStripMenuItem
' '
resources.ApplyResources(Me.KonfigurationToolStripMenuItem, "KonfigurationToolStripMenuItem")
Me.KonfigurationToolStripMenuItem.Name = "KonfigurationToolStripMenuItem" Me.KonfigurationToolStripMenuItem.Name = "KonfigurationToolStripMenuItem"
resources.ApplyResources(Me.KonfigurationToolStripMenuItem, "KonfigurationToolStripMenuItem")
' '
'TabFollowUp 'TabFollowUp
' '
resources.ApplyResources(Me.TabFollowUp, "TabFollowUp")
Me.TabFollowUp.Controls.Add(Me.ListViewFollowUps) Me.TabFollowUp.Controls.Add(Me.ListViewFollowUps)
Me.TabFollowUp.Controls.Add(Me.grpbxFU_Profile) Me.TabFollowUp.Controls.Add(Me.grpbxFU_Profile)
Me.TabFollowUp.Controls.Add(Me.Label5) Me.TabFollowUp.Controls.Add(Me.Label5)
Me.TabFollowUp.Image = Global.DD_Record_Organiser.My.Resources.Resources.Task_16xMD Me.TabFollowUp.Image = Global.DD_Record_Organiser.My.Resources.Resources.Task_16xMD
Me.TabFollowUp.Name = "TabFollowUp" Me.TabFollowUp.Name = "TabFollowUp"
Me.ttToolTip.SetToolTip(Me.TabFollowUp, resources.GetString("TabFollowUp.ToolTip")) resources.ApplyResources(Me.TabFollowUp, "TabFollowUp")
' '
'ListViewFollowUps 'ListViewFollowUps
' '
resources.ApplyResources(Me.ListViewFollowUps, "ListViewFollowUps") resources.ApplyResources(Me.ListViewFollowUps, "ListViewFollowUps")
Me.ToolTipController.SetAllowHtmlText(Me.ListViewFollowUps, CType(resources.GetObject("ListViewFollowUps.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.ListViewFollowUps.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader1, Me.ColumnHeader2}) Me.ListViewFollowUps.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader1, Me.ColumnHeader2})
Me.ListViewFollowUps.FullRowSelect = True Me.ListViewFollowUps.FullRowSelect = True
Me.ListViewFollowUps.HideSelection = False Me.ListViewFollowUps.HideSelection = False
Me.ListViewFollowUps.Name = "ListViewFollowUps" Me.ListViewFollowUps.Name = "ListViewFollowUps"
Me.ToolTipController.SetTitle(Me.ListViewFollowUps, resources.GetString("ListViewFollowUps.Title"))
Me.ToolTipController.SetToolTip(Me.ListViewFollowUps, resources.GetString("ListViewFollowUps.ToolTip"))
Me.ttToolTip.SetToolTip(Me.ListViewFollowUps, resources.GetString("ListViewFollowUps.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.ListViewFollowUps, CType(resources.GetObject("ListViewFollowUps.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
Me.ListViewFollowUps.UseCompatibleStateImageBehavior = False Me.ListViewFollowUps.UseCompatibleStateImageBehavior = False
Me.ListViewFollowUps.View = System.Windows.Forms.View.Details Me.ListViewFollowUps.View = System.Windows.Forms.View.Details
' '
@@ -635,7 +549,6 @@ Partial Class frmConstructor_Main
'grpbxFU_Profile 'grpbxFU_Profile
' '
resources.ApplyResources(Me.grpbxFU_Profile, "grpbxFU_Profile") resources.ApplyResources(Me.grpbxFU_Profile, "grpbxFU_Profile")
Me.ToolTipController.SetAllowHtmlText(Me.grpbxFU_Profile, CType(resources.GetObject("grpbxFU_Profile.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.grpbxFU_Profile.Controls.Add(Me.GroupBox4) Me.grpbxFU_Profile.Controls.Add(Me.GroupBox4)
Me.grpbxFU_Profile.Controls.Add(Me.lblFollowUp_save) Me.grpbxFU_Profile.Controls.Add(Me.lblFollowUp_save)
Me.grpbxFU_Profile.Controls.Add(Me.chkFollowUp) Me.grpbxFU_Profile.Controls.Add(Me.chkFollowUp)
@@ -643,15 +556,10 @@ Partial Class frmConstructor_Main
Me.grpbxFU_Profile.Controls.Add(Me.lblWiedervorlage_Control) Me.grpbxFU_Profile.Controls.Add(Me.lblWiedervorlage_Control)
Me.grpbxFU_Profile.Name = "grpbxFU_Profile" Me.grpbxFU_Profile.Name = "grpbxFU_Profile"
Me.grpbxFU_Profile.TabStop = False Me.grpbxFU_Profile.TabStop = False
Me.ToolTipController.SetTitle(Me.grpbxFU_Profile, resources.GetString("grpbxFU_Profile.Title"))
Me.ttToolTip.SetToolTip(Me.grpbxFU_Profile, resources.GetString("grpbxFU_Profile.ToolTip"))
Me.ToolTipController.SetToolTip(Me.grpbxFU_Profile, resources.GetString("grpbxFU_Profile.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.grpbxFU_Profile, CType(resources.GetObject("grpbxFU_Profile.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'GroupBox4 'GroupBox4
' '
resources.ApplyResources(Me.GroupBox4, "GroupBox4") resources.ApplyResources(Me.GroupBox4, "GroupBox4")
Me.ToolTipController.SetAllowHtmlText(Me.GroupBox4, CType(resources.GetObject("GroupBox4.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.GroupBox4.Controls.Add(Me.btnRemoveUser_FollowUp) Me.GroupBox4.Controls.Add(Me.btnRemoveUser_FollowUp)
Me.GroupBox4.Controls.Add(Me.btnAddUser_FollowUp) Me.GroupBox4.Controls.Add(Me.btnAddUser_FollowUp)
Me.GroupBox4.Controls.Add(Me.cmbFollowUpUser) Me.GroupBox4.Controls.Add(Me.cmbFollowUpUser)
@@ -660,179 +568,96 @@ Partial Class frmConstructor_Main
Me.GroupBox4.Controls.Add(Me.Label7) Me.GroupBox4.Controls.Add(Me.Label7)
Me.GroupBox4.Name = "GroupBox4" Me.GroupBox4.Name = "GroupBox4"
Me.GroupBox4.TabStop = False Me.GroupBox4.TabStop = False
Me.ToolTipController.SetTitle(Me.GroupBox4, resources.GetString("GroupBox4.Title"))
Me.ttToolTip.SetToolTip(Me.GroupBox4, resources.GetString("GroupBox4.ToolTip"))
Me.ToolTipController.SetToolTip(Me.GroupBox4, resources.GetString("GroupBox4.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.GroupBox4, CType(resources.GetObject("GroupBox4.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'btnRemoveUser_FollowUp 'btnRemoveUser_FollowUp
' '
resources.ApplyResources(Me.btnRemoveUser_FollowUp, "btnRemoveUser_FollowUp") resources.ApplyResources(Me.btnRemoveUser_FollowUp, "btnRemoveUser_FollowUp")
Me.ToolTipController.SetAllowHtmlText(Me.btnRemoveUser_FollowUp, CType(resources.GetObject("btnRemoveUser_FollowUp.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.btnRemoveUser_FollowUp.Name = "btnRemoveUser_FollowUp" Me.btnRemoveUser_FollowUp.Name = "btnRemoveUser_FollowUp"
Me.ToolTipController.SetTitle(Me.btnRemoveUser_FollowUp, resources.GetString("btnRemoveUser_FollowUp.Title"))
Me.ToolTipController.SetToolTip(Me.btnRemoveUser_FollowUp, resources.GetString("btnRemoveUser_FollowUp.ToolTip"))
Me.ttToolTip.SetToolTip(Me.btnRemoveUser_FollowUp, resources.GetString("btnRemoveUser_FollowUp.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.btnRemoveUser_FollowUp, CType(resources.GetObject("btnRemoveUser_FollowUp.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
Me.btnRemoveUser_FollowUp.UseVisualStyleBackColor = True Me.btnRemoveUser_FollowUp.UseVisualStyleBackColor = True
' '
'btnAddUser_FollowUp 'btnAddUser_FollowUp
' '
resources.ApplyResources(Me.btnAddUser_FollowUp, "btnAddUser_FollowUp") resources.ApplyResources(Me.btnAddUser_FollowUp, "btnAddUser_FollowUp")
Me.ToolTipController.SetAllowHtmlText(Me.btnAddUser_FollowUp, CType(resources.GetObject("btnAddUser_FollowUp.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.btnAddUser_FollowUp.Image = Global.DD_Record_Organiser.My.Resources.Resources.AddMark_10580 Me.btnAddUser_FollowUp.Image = Global.DD_Record_Organiser.My.Resources.Resources.AddMark_10580
Me.btnAddUser_FollowUp.Name = "btnAddUser_FollowUp" Me.btnAddUser_FollowUp.Name = "btnAddUser_FollowUp"
Me.ToolTipController.SetTitle(Me.btnAddUser_FollowUp, resources.GetString("btnAddUser_FollowUp.Title"))
Me.ToolTipController.SetToolTip(Me.btnAddUser_FollowUp, resources.GetString("btnAddUser_FollowUp.ToolTip"))
Me.ttToolTip.SetToolTip(Me.btnAddUser_FollowUp, resources.GetString("btnAddUser_FollowUp.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.btnAddUser_FollowUp, CType(resources.GetObject("btnAddUser_FollowUp.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
Me.btnAddUser_FollowUp.UseVisualStyleBackColor = True Me.btnAddUser_FollowUp.UseVisualStyleBackColor = True
' '
'cmbFollowUpUser 'cmbFollowUpUser
' '
resources.ApplyResources(Me.cmbFollowUpUser, "cmbFollowUpUser") resources.ApplyResources(Me.cmbFollowUpUser, "cmbFollowUpUser")
Me.ToolTipController.SetAllowHtmlText(Me.cmbFollowUpUser, CType(resources.GetObject("cmbFollowUpUser.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.cmbFollowUpUser.FormattingEnabled = True Me.cmbFollowUpUser.FormattingEnabled = True
Me.cmbFollowUpUser.Name = "cmbFollowUpUser" Me.cmbFollowUpUser.Name = "cmbFollowUpUser"
Me.ToolTipController.SetTitle(Me.cmbFollowUpUser, resources.GetString("cmbFollowUpUser.Title"))
Me.ToolTipController.SetToolTip(Me.cmbFollowUpUser, resources.GetString("cmbFollowUpUser.ToolTip"))
Me.ttToolTip.SetToolTip(Me.cmbFollowUpUser, resources.GetString("cmbFollowUpUser.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.cmbFollowUpUser, CType(resources.GetObject("cmbFollowUpUser.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'Label6 'Label6
' '
resources.ApplyResources(Me.Label6, "Label6") resources.ApplyResources(Me.Label6, "Label6")
Me.ToolTipController.SetAllowHtmlText(Me.Label6, CType(resources.GetObject("Label6.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.Label6.Name = "Label6" Me.Label6.Name = "Label6"
Me.ToolTipController.SetTitle(Me.Label6, resources.GetString("Label6.Title"))
Me.ToolTipController.SetToolTip(Me.Label6, resources.GetString("Label6.ToolTip"))
Me.ttToolTip.SetToolTip(Me.Label6, resources.GetString("Label6.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.Label6, CType(resources.GetObject("Label6.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'ListBoxUser2Profile 'ListBoxUser2Profile
' '
resources.ApplyResources(Me.ListBoxUser2Profile, "ListBoxUser2Profile") resources.ApplyResources(Me.ListBoxUser2Profile, "ListBoxUser2Profile")
Me.ToolTipController.SetAllowHtmlText(Me.ListBoxUser2Profile, CType(resources.GetObject("ListBoxUser2Profile.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.ListBoxUser2Profile.FormattingEnabled = True Me.ListBoxUser2Profile.FormattingEnabled = True
Me.ListBoxUser2Profile.Name = "ListBoxUser2Profile" Me.ListBoxUser2Profile.Name = "ListBoxUser2Profile"
Me.ToolTipController.SetTitle(Me.ListBoxUser2Profile, resources.GetString("ListBoxUser2Profile.Title"))
Me.ttToolTip.SetToolTip(Me.ListBoxUser2Profile, resources.GetString("ListBoxUser2Profile.ToolTip"))
Me.ToolTipController.SetToolTip(Me.ListBoxUser2Profile, resources.GetString("ListBoxUser2Profile.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.ListBoxUser2Profile, CType(resources.GetObject("ListBoxUser2Profile.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'Label7 'Label7
' '
resources.ApplyResources(Me.Label7, "Label7") resources.ApplyResources(Me.Label7, "Label7")
Me.ToolTipController.SetAllowHtmlText(Me.Label7, CType(resources.GetObject("Label7.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.Label7.Name = "Label7" Me.Label7.Name = "Label7"
Me.ToolTipController.SetTitle(Me.Label7, resources.GetString("Label7.Title"))
Me.ToolTipController.SetToolTip(Me.Label7, resources.GetString("Label7.ToolTip"))
Me.ttToolTip.SetToolTip(Me.Label7, resources.GetString("Label7.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.Label7, CType(resources.GetObject("Label7.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'lblFollowUp_save 'lblFollowUp_save
' '
resources.ApplyResources(Me.lblFollowUp_save, "lblFollowUp_save") resources.ApplyResources(Me.lblFollowUp_save, "lblFollowUp_save")
Me.ToolTipController.SetAllowHtmlText(Me.lblFollowUp_save, CType(resources.GetObject("lblFollowUp_save.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.lblFollowUp_save.BackColor = System.Drawing.Color.Lime Me.lblFollowUp_save.BackColor = System.Drawing.Color.Lime
Me.lblFollowUp_save.Name = "lblFollowUp_save" Me.lblFollowUp_save.Name = "lblFollowUp_save"
Me.ToolTipController.SetTitle(Me.lblFollowUp_save, resources.GetString("lblFollowUp_save.Title"))
Me.ToolTipController.SetToolTip(Me.lblFollowUp_save, resources.GetString("lblFollowUp_save.ToolTip"))
Me.ttToolTip.SetToolTip(Me.lblFollowUp_save, resources.GetString("lblFollowUp_save.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.lblFollowUp_save, CType(resources.GetObject("lblFollowUp_save.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'chkFollowUp 'chkFollowUp
' '
resources.ApplyResources(Me.chkFollowUp, "chkFollowUp") resources.ApplyResources(Me.chkFollowUp, "chkFollowUp")
Me.ToolTipController.SetAllowHtmlText(Me.chkFollowUp, CType(resources.GetObject("chkFollowUp.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.chkFollowUp.Name = "chkFollowUp" Me.chkFollowUp.Name = "chkFollowUp"
Me.ToolTipController.SetTitle(Me.chkFollowUp, resources.GetString("chkFollowUp.Title"))
Me.ToolTipController.SetToolTip(Me.chkFollowUp, resources.GetString("chkFollowUp.ToolTip"))
Me.ttToolTip.SetToolTip(Me.chkFollowUp, resources.GetString("chkFollowUp.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.chkFollowUp, CType(resources.GetObject("chkFollowUp.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
Me.chkFollowUp.UseVisualStyleBackColor = True Me.chkFollowUp.UseVisualStyleBackColor = True
' '
'dtpFollowUp 'dtpFollowUp
' '
resources.ApplyResources(Me.dtpFollowUp, "dtpFollowUp") resources.ApplyResources(Me.dtpFollowUp, "dtpFollowUp")
Me.ToolTipController.SetAllowHtmlText(Me.dtpFollowUp, CType(resources.GetObject("dtpFollowUp.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.dtpFollowUp.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.dtpFollowUp.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
Me.dtpFollowUp.Name = "dtpFollowUp" Me.dtpFollowUp.Name = "dtpFollowUp"
Me.ToolTipController.SetTitle(Me.dtpFollowUp, resources.GetString("dtpFollowUp.Title"))
Me.ToolTipController.SetToolTip(Me.dtpFollowUp, resources.GetString("dtpFollowUp.ToolTip"))
Me.ttToolTip.SetToolTip(Me.dtpFollowUp, resources.GetString("dtpFollowUp.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.dtpFollowUp, CType(resources.GetObject("dtpFollowUp.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'lblWiedervorlage_Control 'lblWiedervorlage_Control
' '
resources.ApplyResources(Me.lblWiedervorlage_Control, "lblWiedervorlage_Control") resources.ApplyResources(Me.lblWiedervorlage_Control, "lblWiedervorlage_Control")
Me.ToolTipController.SetAllowHtmlText(Me.lblWiedervorlage_Control, CType(resources.GetObject("lblWiedervorlage_Control.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.lblWiedervorlage_Control.Name = "lblWiedervorlage_Control" Me.lblWiedervorlage_Control.Name = "lblWiedervorlage_Control"
Me.ToolTipController.SetTitle(Me.lblWiedervorlage_Control, resources.GetString("lblWiedervorlage_Control.Title"))
Me.ToolTipController.SetToolTip(Me.lblWiedervorlage_Control, resources.GetString("lblWiedervorlage_Control.ToolTip"))
Me.ttToolTip.SetToolTip(Me.lblWiedervorlage_Control, resources.GetString("lblWiedervorlage_Control.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.lblWiedervorlage_Control, CType(resources.GetObject("lblWiedervorlage_Control.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'Label5 'Label5
' '
resources.ApplyResources(Me.Label5, "Label5") resources.ApplyResources(Me.Label5, "Label5")
Me.ToolTipController.SetAllowHtmlText(Me.Label5, CType(resources.GetObject("Label5.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.Label5.Name = "Label5" Me.Label5.Name = "Label5"
Me.ToolTipController.SetTitle(Me.Label5, resources.GetString("Label5.Title"))
Me.ToolTipController.SetToolTip(Me.Label5, resources.GetString("Label5.ToolTip"))
Me.ttToolTip.SetToolTip(Me.Label5, resources.GetString("Label5.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.Label5, CType(resources.GetObject("Label5.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'TabPos 'TabPos
' '
resources.ApplyResources(Me.TabPos, "TabPos")
Me.TabPos.Controls.Add(Me.Panel1) Me.TabPos.Controls.Add(Me.Panel1)
Me.TabPos.Controls.Add(Me.BindingNavigatorPOS) Me.TabPos.Controls.Add(Me.BindingNavigatorPOS)
Me.TabPos.Image = CType(resources.GetObject("TabPos.Image"), System.Drawing.Image) Me.TabPos.Image = CType(resources.GetObject("TabPos.Image"), System.Drawing.Image)
Me.TabPos.Name = "TabPos" Me.TabPos.Name = "TabPos"
Me.TabPos.PageVisible = False Me.TabPos.PageVisible = False
Me.ttToolTip.SetToolTip(Me.TabPos, resources.GetString("TabPos.ToolTip")) resources.ApplyResources(Me.TabPos, "TabPos")
' '
'Panel1 'Panel1
' '
resources.ApplyResources(Me.Panel1, "Panel1")
Me.ToolTipController.SetAllowHtmlText(Me.Panel1, CType(resources.GetObject("Panel1.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.Panel1.Controls.Add(Me.GridControlPos) Me.Panel1.Controls.Add(Me.GridControlPos)
resources.ApplyResources(Me.Panel1, "Panel1")
Me.Panel1.Name = "Panel1" Me.Panel1.Name = "Panel1"
Me.ToolTipController.SetTitle(Me.Panel1, resources.GetString("Panel1.Title"))
Me.ToolTipController.SetToolTip(Me.Panel1, resources.GetString("Panel1.ToolTip"))
Me.ttToolTip.SetToolTip(Me.Panel1, resources.GetString("Panel1.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.Panel1, CType(resources.GetObject("Panel1.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'GridControlPos 'GridControlPos
' '
resources.ApplyResources(Me.GridControlPos, "GridControlPos") resources.ApplyResources(Me.GridControlPos, "GridControlPos")
Me.GridControlPos.EmbeddedNavigator.AccessibleDescription = resources.GetString("GridControlPos.EmbeddedNavigator.AccessibleDescription")
Me.GridControlPos.EmbeddedNavigator.AccessibleName = resources.GetString("GridControlPos.EmbeddedNavigator.AccessibleName")
Me.GridControlPos.EmbeddedNavigator.AllowHtmlTextInToolTip = CType(resources.GetObject("GridControlPos.EmbeddedNavigator.AllowHtmlTextInToolTip"), DevExpress.Utils.DefaultBoolean)
Me.GridControlPos.EmbeddedNavigator.Anchor = CType(resources.GetObject("GridControlPos.EmbeddedNavigator.Anchor"), System.Windows.Forms.AnchorStyles)
Me.GridControlPos.EmbeddedNavigator.BackgroundImage = CType(resources.GetObject("GridControlPos.EmbeddedNavigator.BackgroundImage"), System.Drawing.Image)
Me.GridControlPos.EmbeddedNavigator.BackgroundImageLayout = CType(resources.GetObject("GridControlPos.EmbeddedNavigator.BackgroundImageLayout"), System.Windows.Forms.ImageLayout)
Me.GridControlPos.EmbeddedNavigator.ImeMode = CType(resources.GetObject("GridControlPos.EmbeddedNavigator.ImeMode"), System.Windows.Forms.ImeMode)
Me.GridControlPos.EmbeddedNavigator.MaximumSize = CType(resources.GetObject("GridControlPos.EmbeddedNavigator.MaximumSize"), System.Drawing.Size)
Me.GridControlPos.EmbeddedNavigator.TextLocation = CType(resources.GetObject("GridControlPos.EmbeddedNavigator.TextLocation"), DevExpress.XtraEditors.NavigatorButtonsTextLocation)
Me.GridControlPos.EmbeddedNavigator.ToolTip = resources.GetString("GridControlPos.EmbeddedNavigator.ToolTip")
Me.GridControlPos.EmbeddedNavigator.ToolTipIconType = CType(resources.GetObject("GridControlPos.EmbeddedNavigator.ToolTipIconType"), DevExpress.Utils.ToolTipIconType)
Me.GridControlPos.EmbeddedNavigator.ToolTipTitle = resources.GetString("GridControlPos.EmbeddedNavigator.ToolTipTitle")
Me.GridControlPos.MainView = Me.grvwGridPos Me.GridControlPos.MainView = Me.grvwGridPos
Me.GridControlPos.Name = "GridControlPos" Me.GridControlPos.Name = "GridControlPos"
Me.ttToolTip.SetToolTip(Me.GridControlPos, resources.GetString("GridControlPos.ToolTip"))
Me.GridControlPos.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.grvwGridPos}) Me.GridControlPos.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.grvwGridPos})
' '
'grvwGridPos 'grvwGridPos
' '
Me.grvwGridPos.Appearance.EvenRow.BackColor = CType(resources.GetObject("grvwGridPos.Appearance.EvenRow.BackColor"), System.Drawing.Color) Me.grvwGridPos.Appearance.EvenRow.BackColor = CType(resources.GetObject("grvwGridPos.Appearance.EvenRow.BackColor"), System.Drawing.Color)
Me.grvwGridPos.Appearance.EvenRow.FontSizeDelta = CType(resources.GetObject("grvwGridPos.Appearance.EvenRow.FontSizeDelta"), Integer)
Me.grvwGridPos.Appearance.EvenRow.FontStyleDelta = CType(resources.GetObject("grvwGridPos.Appearance.EvenRow.FontStyleDelta"), System.Drawing.FontStyle)
Me.grvwGridPos.Appearance.EvenRow.GradientMode = CType(resources.GetObject("grvwGridPos.Appearance.EvenRow.GradientMode"), System.Drawing.Drawing2D.LinearGradientMode)
Me.grvwGridPos.Appearance.EvenRow.Image = CType(resources.GetObject("grvwGridPos.Appearance.EvenRow.Image"), System.Drawing.Image)
Me.grvwGridPos.Appearance.EvenRow.Options.UseBackColor = True Me.grvwGridPos.Appearance.EvenRow.Options.UseBackColor = True
resources.ApplyResources(Me.grvwGridPos, "grvwGridPos")
Me.grvwGridPos.GridControl = Me.GridControlPos Me.grvwGridPos.GridControl = Me.GridControlPos
Me.grvwGridPos.Name = "grvwGridPos" Me.grvwGridPos.Name = "grvwGridPos"
Me.grvwGridPos.OptionsView.EnableAppearanceEvenRow = True Me.grvwGridPos.OptionsView.EnableAppearanceEvenRow = True
@@ -840,57 +665,52 @@ Partial Class frmConstructor_Main
' '
'BindingNavigatorPOS 'BindingNavigatorPOS
' '
resources.ApplyResources(Me.BindingNavigatorPOS, "BindingNavigatorPOS")
Me.BindingNavigatorPOS.AddNewItem = Me.BindingNavigatorAddNewItem Me.BindingNavigatorPOS.AddNewItem = Me.BindingNavigatorAddNewItem
Me.ToolTipController.SetAllowHtmlText(Me.BindingNavigatorPOS, CType(resources.GetObject("BindingNavigatorPOS.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.BindingNavigatorPOS.CountItem = Me.BindingNavigatorCountItem Me.BindingNavigatorPOS.CountItem = Me.BindingNavigatorCountItem
Me.BindingNavigatorPOS.CountItemFormat = "von {0} positions" Me.BindingNavigatorPOS.CountItemFormat = "von {0} positions"
Me.BindingNavigatorPOS.DeleteItem = Me.BindingNavigatorDeleteItem Me.BindingNavigatorPOS.DeleteItem = Me.BindingNavigatorDeleteItem
Me.BindingNavigatorPOS.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.BindingNavigatorPOS.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})
resources.ApplyResources(Me.BindingNavigatorPOS, "BindingNavigatorPOS")
Me.BindingNavigatorPOS.MoveFirstItem = Me.BindingNavigatorMoveFirstItem Me.BindingNavigatorPOS.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
Me.BindingNavigatorPOS.MoveLastItem = Me.BindingNavigatorMoveLastItem Me.BindingNavigatorPOS.MoveLastItem = Me.BindingNavigatorMoveLastItem
Me.BindingNavigatorPOS.MoveNextItem = Me.BindingNavigatorMoveNextItem Me.BindingNavigatorPOS.MoveNextItem = Me.BindingNavigatorMoveNextItem
Me.BindingNavigatorPOS.MovePreviousItem = Me.BindingNavigatorMovePreviousItem Me.BindingNavigatorPOS.MovePreviousItem = Me.BindingNavigatorMovePreviousItem
Me.BindingNavigatorPOS.Name = "BindingNavigatorPOS" Me.BindingNavigatorPOS.Name = "BindingNavigatorPOS"
Me.BindingNavigatorPOS.PositionItem = Me.BindingNavigatorPositionItem Me.BindingNavigatorPOS.PositionItem = Me.BindingNavigatorPositionItem
Me.ToolTipController.SetTitle(Me.BindingNavigatorPOS, resources.GetString("BindingNavigatorPOS.Title"))
Me.ToolTipController.SetToolTip(Me.BindingNavigatorPOS, resources.GetString("BindingNavigatorPOS.ToolTip"))
Me.ttToolTip.SetToolTip(Me.BindingNavigatorPOS, resources.GetString("BindingNavigatorPOS.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.BindingNavigatorPOS, CType(resources.GetObject("BindingNavigatorPOS.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'BindingNavigatorAddNewItem 'BindingNavigatorAddNewItem
' '
resources.ApplyResources(Me.BindingNavigatorAddNewItem, "BindingNavigatorAddNewItem")
Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.BindingNavigatorAddNewItem, "BindingNavigatorAddNewItem")
Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem" Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem"
' '
'BindingNavigatorCountItem 'BindingNavigatorCountItem
' '
resources.ApplyResources(Me.BindingNavigatorCountItem, "BindingNavigatorCountItem")
Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem" Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem"
resources.ApplyResources(Me.BindingNavigatorCountItem, "BindingNavigatorCountItem")
' '
'BindingNavigatorDeleteItem 'BindingNavigatorDeleteItem
' '
resources.ApplyResources(Me.BindingNavigatorDeleteItem, "BindingNavigatorDeleteItem")
Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.BindingNavigatorDeleteItem, "BindingNavigatorDeleteItem")
Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem" Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem"
' '
'BindingNavigatorMoveFirstItem 'BindingNavigatorMoveFirstItem
' '
resources.ApplyResources(Me.BindingNavigatorMoveFirstItem, "BindingNavigatorMoveFirstItem")
Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.BindingNavigatorMoveFirstItem, "BindingNavigatorMoveFirstItem")
Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem" Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem"
' '
'BindingNavigatorMovePreviousItem 'BindingNavigatorMovePreviousItem
' '
resources.ApplyResources(Me.BindingNavigatorMovePreviousItem, "BindingNavigatorMovePreviousItem")
Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.BindingNavigatorMovePreviousItem, "BindingNavigatorMovePreviousItem")
Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem" Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem"
' '
'BindingNavigatorSeparator 'BindingNavigatorSeparator
' '
resources.ApplyResources(Me.BindingNavigatorSeparator, "BindingNavigatorSeparator")
Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator" Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator"
resources.ApplyResources(Me.BindingNavigatorSeparator, "BindingNavigatorSeparator")
' '
'BindingNavigatorPositionItem 'BindingNavigatorPositionItem
' '
@@ -899,37 +719,32 @@ Partial Class frmConstructor_Main
' '
'BindingNavigatorSeparator1 'BindingNavigatorSeparator1
' '
resources.ApplyResources(Me.BindingNavigatorSeparator1, "BindingNavigatorSeparator1")
Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator1" Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator1"
resources.ApplyResources(Me.BindingNavigatorSeparator1, "BindingNavigatorSeparator1")
' '
'BindingNavigatorMoveNextItem 'BindingNavigatorMoveNextItem
' '
resources.ApplyResources(Me.BindingNavigatorMoveNextItem, "BindingNavigatorMoveNextItem")
Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.BindingNavigatorMoveNextItem, "BindingNavigatorMoveNextItem")
Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem" Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem"
' '
'BindingNavigatorMoveLastItem 'BindingNavigatorMoveLastItem
' '
resources.ApplyResources(Me.BindingNavigatorMoveLastItem, "BindingNavigatorMoveLastItem")
Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.BindingNavigatorMoveLastItem, "BindingNavigatorMoveLastItem")
Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem" Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem"
' '
'BindingNavigatorSeparator2 'BindingNavigatorSeparator2
' '
resources.ApplyResources(Me.BindingNavigatorSeparator2, "BindingNavigatorSeparator2")
Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator2" Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator2"
resources.ApplyResources(Me.BindingNavigatorSeparator2, "BindingNavigatorSeparator2")
' '
'ToolStripEdit 'ToolStripEdit
' '
resources.ApplyResources(Me.ToolStripEdit, "ToolStripEdit")
Me.ToolTipController.SetAllowHtmlText(Me.ToolStripEdit, CType(resources.GetObject("ToolStripEdit.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.ToolStripEdit.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden Me.ToolStripEdit.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
Me.ToolStripEdit.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsButtonAdd, Me.tsButtonSave, Me.tsButtonDelete, Me.tsButtonEdit, Me.ToolStripDropDownButton1, Me.tsButtonShowTaskOverview, Me.tsButtonShowWorkflowTasks, Me.tsbtnRedo, Me.tsButtonCancel, Me.tslblLocked, Me.tslblFileslocked}) Me.ToolStripEdit.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsButtonAdd, Me.tsButtonSave, Me.tsButtonDelete, Me.tsButtonEdit, Me.ToolStripDropDownButton1, Me.tsButtonShowTaskOverview, Me.tsButtonShowWorkflowTasks, Me.tsbtnRedo, Me.tsButtonCancel, Me.tslblLocked, Me.tslblFileslocked})
resources.ApplyResources(Me.ToolStripEdit, "ToolStripEdit")
Me.ToolStripEdit.Name = "ToolStripEdit" Me.ToolStripEdit.Name = "ToolStripEdit"
Me.ToolTipController.SetTitle(Me.ToolStripEdit, resources.GetString("ToolStripEdit.Title"))
Me.ToolTipController.SetToolTip(Me.ToolStripEdit, resources.GetString("ToolStripEdit.ToolTip"))
Me.ttToolTip.SetToolTip(Me.ToolStripEdit, resources.GetString("ToolStripEdit.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.ToolStripEdit, CType(resources.GetObject("ToolStripEdit.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'tsButtonAdd 'tsButtonAdd
' '
@@ -956,34 +771,34 @@ Partial Class frmConstructor_Main
' '
'ToolStripDropDownButton1 'ToolStripDropDownButton1
' '
resources.ApplyResources(Me.ToolStripDropDownButton1, "ToolStripDropDownButton1")
Me.ToolStripDropDownButton1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right Me.ToolStripDropDownButton1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.ToolStripDropDownButton1.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.WindreamsucheNeuLadenToolStripMenuItem, Me.ToolStripSeparator3, Me.WorkflowTasksNeuErstellenToolStripMenuItem, Me.OfficeVorlagenToolStripMenuItem, Me.VerknüpfungenAnzeigenToolStripMenuItem, Me.ToolStripSeparator4, Me.RecordKopierenToolStripMenuItem, Me.ZeigeRecordLogsToolStripMenuItem, Me.ToolStripSeparator5, Me.AnwendungscacheFreigebenToolStripMenuItem}) Me.ToolStripDropDownButton1.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.WindreamsucheNeuLadenToolStripMenuItem, Me.ToolStripSeparator3, Me.WorkflowTasksNeuErstellenToolStripMenuItem, Me.OfficeVorlagenToolStripMenuItem, Me.VerknüpfungenAnzeigenToolStripMenuItem, Me.ToolStripSeparator4, Me.RecordKopierenToolStripMenuItem, Me.ZeigeRecordLogsToolStripMenuItem, Me.ToolStripSeparator5, Me.AnwendungscacheFreigebenToolStripMenuItem})
Me.ToolStripDropDownButton1.Image = Global.DD_Record_Organiser.My.Resources.Resources.PropertyGridEditorPart_6041 Me.ToolStripDropDownButton1.Image = Global.DD_Record_Organiser.My.Resources.Resources.PropertyGridEditorPart_6041
resources.ApplyResources(Me.ToolStripDropDownButton1, "ToolStripDropDownButton1")
Me.ToolStripDropDownButton1.Name = "ToolStripDropDownButton1" Me.ToolStripDropDownButton1.Name = "ToolStripDropDownButton1"
' '
'WindreamsucheNeuLadenToolStripMenuItem 'WindreamsucheNeuLadenToolStripMenuItem
' '
resources.ApplyResources(Me.WindreamsucheNeuLadenToolStripMenuItem, "WindreamsucheNeuLadenToolStripMenuItem")
Me.WindreamsucheNeuLadenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.refresh_16xLG Me.WindreamsucheNeuLadenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.refresh_16xLG
Me.WindreamsucheNeuLadenToolStripMenuItem.Name = "WindreamsucheNeuLadenToolStripMenuItem" Me.WindreamsucheNeuLadenToolStripMenuItem.Name = "WindreamsucheNeuLadenToolStripMenuItem"
resources.ApplyResources(Me.WindreamsucheNeuLadenToolStripMenuItem, "WindreamsucheNeuLadenToolStripMenuItem")
' '
'ToolStripSeparator3 'ToolStripSeparator3
' '
resources.ApplyResources(Me.ToolStripSeparator3, "ToolStripSeparator3")
Me.ToolStripSeparator3.Name = "ToolStripSeparator3" Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
resources.ApplyResources(Me.ToolStripSeparator3, "ToolStripSeparator3")
' '
'WorkflowTasksNeuErstellenToolStripMenuItem 'WorkflowTasksNeuErstellenToolStripMenuItem
' '
resources.ApplyResources(Me.WorkflowTasksNeuErstellenToolStripMenuItem, "WorkflowTasksNeuErstellenToolStripMenuItem")
Me.WorkflowTasksNeuErstellenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.brick_go Me.WorkflowTasksNeuErstellenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.brick_go
Me.WorkflowTasksNeuErstellenToolStripMenuItem.Name = "WorkflowTasksNeuErstellenToolStripMenuItem" Me.WorkflowTasksNeuErstellenToolStripMenuItem.Name = "WorkflowTasksNeuErstellenToolStripMenuItem"
resources.ApplyResources(Me.WorkflowTasksNeuErstellenToolStripMenuItem, "WorkflowTasksNeuErstellenToolStripMenuItem")
' '
'OfficeVorlagenToolStripMenuItem 'OfficeVorlagenToolStripMenuItem
' '
resources.ApplyResources(Me.OfficeVorlagenToolStripMenuItem, "OfficeVorlagenToolStripMenuItem")
Me.OfficeVorlagenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.page_white_office1 Me.OfficeVorlagenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.page_white_office1
Me.OfficeVorlagenToolStripMenuItem.Name = "OfficeVorlagenToolStripMenuItem" Me.OfficeVorlagenToolStripMenuItem.Name = "OfficeVorlagenToolStripMenuItem"
resources.ApplyResources(Me.OfficeVorlagenToolStripMenuItem, "OfficeVorlagenToolStripMenuItem")
' '
'VerknüpfungenAnzeigenToolStripMenuItem 'VerknüpfungenAnzeigenToolStripMenuItem
' '
@@ -992,55 +807,55 @@ Partial Class frmConstructor_Main
' '
'ToolStripSeparator4 'ToolStripSeparator4
' '
resources.ApplyResources(Me.ToolStripSeparator4, "ToolStripSeparator4")
Me.ToolStripSeparator4.Name = "ToolStripSeparator4" Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
resources.ApplyResources(Me.ToolStripSeparator4, "ToolStripSeparator4")
' '
'RecordKopierenToolStripMenuItem 'RecordKopierenToolStripMenuItem
' '
resources.ApplyResources(Me.RecordKopierenToolStripMenuItem, "RecordKopierenToolStripMenuItem")
Me.RecordKopierenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.Copy_6524 Me.RecordKopierenToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.Copy_6524
Me.RecordKopierenToolStripMenuItem.Name = "RecordKopierenToolStripMenuItem" Me.RecordKopierenToolStripMenuItem.Name = "RecordKopierenToolStripMenuItem"
resources.ApplyResources(Me.RecordKopierenToolStripMenuItem, "RecordKopierenToolStripMenuItem")
' '
'ZeigeRecordLogsToolStripMenuItem 'ZeigeRecordLogsToolStripMenuItem
' '
resources.ApplyResources(Me.ZeigeRecordLogsToolStripMenuItem, "ZeigeRecordLogsToolStripMenuItem")
Me.ZeigeRecordLogsToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.eye Me.ZeigeRecordLogsToolStripMenuItem.Image = Global.DD_Record_Organiser.My.Resources.Resources.eye
Me.ZeigeRecordLogsToolStripMenuItem.Name = "ZeigeRecordLogsToolStripMenuItem" Me.ZeigeRecordLogsToolStripMenuItem.Name = "ZeigeRecordLogsToolStripMenuItem"
resources.ApplyResources(Me.ZeigeRecordLogsToolStripMenuItem, "ZeigeRecordLogsToolStripMenuItem")
' '
'ToolStripSeparator5 'ToolStripSeparator5
' '
resources.ApplyResources(Me.ToolStripSeparator5, "ToolStripSeparator5")
Me.ToolStripSeparator5.Name = "ToolStripSeparator5" Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
resources.ApplyResources(Me.ToolStripSeparator5, "ToolStripSeparator5")
' '
'AnwendungscacheFreigebenToolStripMenuItem 'AnwendungscacheFreigebenToolStripMenuItem
' '
resources.ApplyResources(Me.AnwendungscacheFreigebenToolStripMenuItem, "AnwendungscacheFreigebenToolStripMenuItem")
Me.AnwendungscacheFreigebenToolStripMenuItem.Name = "AnwendungscacheFreigebenToolStripMenuItem" Me.AnwendungscacheFreigebenToolStripMenuItem.Name = "AnwendungscacheFreigebenToolStripMenuItem"
resources.ApplyResources(Me.AnwendungscacheFreigebenToolStripMenuItem, "AnwendungscacheFreigebenToolStripMenuItem")
' '
'tsButtonShowTaskOverview 'tsButtonShowTaskOverview
' '
resources.ApplyResources(Me.tsButtonShowTaskOverview, "tsButtonShowTaskOverview")
Me.tsButtonShowTaskOverview.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right Me.tsButtonShowTaskOverview.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
resources.ApplyResources(Me.tsButtonShowTaskOverview, "tsButtonShowTaskOverview")
Me.tsButtonShowTaskOverview.Image = Global.DD_Record_Organiser.My.Resources.Resources.brick Me.tsButtonShowTaskOverview.Image = Global.DD_Record_Organiser.My.Resources.Resources.brick
Me.tsButtonShowTaskOverview.Name = "tsButtonShowTaskOverview" Me.tsButtonShowTaskOverview.Name = "tsButtonShowTaskOverview"
' '
'tsButtonShowWorkflowTasks 'tsButtonShowWorkflowTasks
' '
resources.ApplyResources(Me.tsButtonShowWorkflowTasks, "tsButtonShowWorkflowTasks")
Me.tsButtonShowWorkflowTasks.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right Me.tsButtonShowWorkflowTasks.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
resources.ApplyResources(Me.tsButtonShowWorkflowTasks, "tsButtonShowWorkflowTasks")
Me.tsButtonShowWorkflowTasks.Image = Global.DD_Record_Organiser.My.Resources.Resources.bricks Me.tsButtonShowWorkflowTasks.Image = Global.DD_Record_Organiser.My.Resources.Resources.bricks
Me.tsButtonShowWorkflowTasks.Name = "tsButtonShowWorkflowTasks" Me.tsButtonShowWorkflowTasks.Name = "tsButtonShowWorkflowTasks"
' '
'tsbtnRedo 'tsbtnRedo
' '
resources.ApplyResources(Me.tsbtnRedo, "tsbtnRedo")
Me.tsbtnRedo.Image = Global.DD_Record_Organiser.My.Resources.Resources.Arrow_RedoRetry_16xLG Me.tsbtnRedo.Image = Global.DD_Record_Organiser.My.Resources.Resources.Arrow_RedoRetry_16xLG
resources.ApplyResources(Me.tsbtnRedo, "tsbtnRedo")
Me.tsbtnRedo.Name = "tsbtnRedo" Me.tsbtnRedo.Name = "tsbtnRedo"
' '
'tsButtonCancel 'tsButtonCancel
' '
resources.ApplyResources(Me.tsButtonCancel, "tsButtonCancel")
Me.tsButtonCancel.Image = Global.DD_Record_Organiser.My.Resources.Resources.cancel Me.tsButtonCancel.Image = Global.DD_Record_Organiser.My.Resources.Resources.cancel
resources.ApplyResources(Me.tsButtonCancel, "tsButtonCancel")
Me.tsButtonCancel.Name = "tsButtonCancel" Me.tsButtonCancel.Name = "tsButtonCancel"
' '
'tslblLocked 'tslblLocked
@@ -1051,13 +866,12 @@ Partial Class frmConstructor_Main
' '
'tslblFileslocked 'tslblFileslocked
' '
resources.ApplyResources(Me.tslblFileslocked, "tslblFileslocked")
Me.tslblFileslocked.Image = Global.DD_Record_Organiser.My.Resources.Resources.lock Me.tslblFileslocked.Image = Global.DD_Record_Organiser.My.Resources.Resources.lock
Me.tslblFileslocked.Name = "tslblFileslocked" Me.tslblFileslocked.Name = "tslblFileslocked"
resources.ApplyResources(Me.tslblFileslocked, "tslblFileslocked")
' '
'NavPane 'NavPane
' '
resources.ApplyResources(Me.NavPane, "NavPane")
Me.NavPane.ButtonPadding = New System.Windows.Forms.Padding(12) Me.NavPane.ButtonPadding = New System.Windows.Forms.Padding(12)
Me.NavPane.Buttons.Add(Me.NavButtonHome) Me.NavPane.Buttons.Add(Me.NavButtonHome)
Me.NavPane.Buttons.Add(Me.NavButtonRefresh) Me.NavPane.Buttons.Add(Me.NavButtonRefresh)
@@ -1072,10 +886,10 @@ Partial Class frmConstructor_Main
' '
Me.NavPane.DefaultCategory.Tile.DropDownOptions.BeakColor = System.Drawing.Color.Empty Me.NavPane.DefaultCategory.Tile.DropDownOptions.BeakColor = System.Drawing.Color.Empty
Me.NavPane.DefaultCategory.Tile.ItemSize = DevExpress.XtraBars.Navigation.TileBarItemSize.[Default] Me.NavPane.DefaultCategory.Tile.ItemSize = DevExpress.XtraBars.Navigation.TileBarItemSize.[Default]
resources.ApplyResources(Me.NavPane, "NavPane")
Me.NavPane.Name = "NavPane" Me.NavPane.Name = "NavPane"
Me.NavPane.OptionsPrimaryDropDown.BackColor = System.Drawing.Color.Empty Me.NavPane.OptionsPrimaryDropDown.BackColor = System.Drawing.Color.Empty
Me.NavPane.OptionsSecondaryDropDown.BackColor = System.Drawing.Color.Empty Me.NavPane.OptionsSecondaryDropDown.BackColor = System.Drawing.Color.Empty
Me.ttToolTip.SetToolTip(Me.NavPane, resources.GetString("NavPane.ToolTip"))
' '
'NavButtonHome 'NavButtonHome
' '
@@ -1095,30 +909,25 @@ Partial Class frmConstructor_Main
' '
'StatusStrip_Main 'StatusStrip_Main
' '
resources.ApplyResources(Me.StatusStrip_Main, "StatusStrip_Main")
Me.ToolTipController.SetAllowHtmlText(Me.StatusStrip_Main, CType(resources.GetObject("StatusStrip_Main.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.StatusStrip_Main.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsslblStatus, Me.tsslblRecord, Me.tsslblWorkflowstate}) Me.StatusStrip_Main.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsslblStatus, Me.tsslblRecord, Me.tsslblWorkflowstate})
resources.ApplyResources(Me.StatusStrip_Main, "StatusStrip_Main")
Me.StatusStrip_Main.Name = "StatusStrip_Main" Me.StatusStrip_Main.Name = "StatusStrip_Main"
Me.ToolTipController.SetTitle(Me.StatusStrip_Main, resources.GetString("StatusStrip_Main.Title"))
Me.ToolTipController.SetToolTip(Me.StatusStrip_Main, resources.GetString("StatusStrip_Main.ToolTip"))
Me.ttToolTip.SetToolTip(Me.StatusStrip_Main, resources.GetString("StatusStrip_Main.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.StatusStrip_Main, CType(resources.GetObject("StatusStrip_Main.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'tsslblStatus 'tsslblStatus
' '
resources.ApplyResources(Me.tsslblStatus, "tsslblStatus")
Me.tsslblStatus.Name = "tsslblStatus" Me.tsslblStatus.Name = "tsslblStatus"
resources.ApplyResources(Me.tsslblStatus, "tsslblStatus")
' '
'tsslblRecord 'tsslblRecord
' '
resources.ApplyResources(Me.tsslblRecord, "tsslblRecord")
Me.tsslblRecord.Name = "tsslblRecord" Me.tsslblRecord.Name = "tsslblRecord"
resources.ApplyResources(Me.tsslblRecord, "tsslblRecord")
' '
'tsslblWorkflowstate 'tsslblWorkflowstate
' '
resources.ApplyResources(Me.tsslblWorkflowstate, "tsslblWorkflowstate")
Me.tsslblWorkflowstate.Image = Global.DD_Record_Organiser.My.Resources.Resources.bricks Me.tsslblWorkflowstate.Image = Global.DD_Record_Organiser.My.Resources.Resources.bricks
Me.tsslblWorkflowstate.Name = "tsslblWorkflowstate" Me.tsslblWorkflowstate.Name = "tsslblWorkflowstate"
resources.ApplyResources(Me.tsslblWorkflowstate, "tsslblWorkflowstate")
' '
'DD_ECMAdmin 'DD_ECMAdmin
' '
@@ -1131,13 +940,8 @@ Partial Class frmConstructor_Main
' '
'ContextMenuDetails 'ContextMenuDetails
' '
resources.ApplyResources(Me.ContextMenuDetails, "ContextMenuDetails")
Me.ToolTipController.SetAllowHtmlText(Me.ContextMenuDetails, CType(resources.GetObject("ContextMenuDetails.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.ContextMenuDetails.Name = "ContextMenuDetails" Me.ContextMenuDetails.Name = "ContextMenuDetails"
Me.ToolTipController.SetTitle(Me.ContextMenuDetails, resources.GetString("ContextMenuDetails.Title")) resources.ApplyResources(Me.ContextMenuDetails, "ContextMenuDetails")
Me.ToolTipController.SetToolTip(Me.ContextMenuDetails, resources.GetString("ContextMenuDetails.ToolTip"))
Me.ttToolTip.SetToolTip(Me.ContextMenuDetails, resources.GetString("ContextMenuDetails.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me.ContextMenuDetails, CType(resources.GetObject("ContextMenuDetails.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
' '
'DD_DMSDataSet 'DD_DMSDataSet
' '
@@ -1207,16 +1011,11 @@ Partial Class frmConstructor_Main
'frmConstructor_Main 'frmConstructor_Main
' '
resources.ApplyResources(Me, "$this") resources.ApplyResources(Me, "$this")
Me.ToolTipController.SetAllowHtmlText(Me, CType(resources.GetObject("$this.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Controls.Add(Me.SplitContainerMain) Me.Controls.Add(Me.SplitContainerMain)
Me.Controls.Add(Me.StatusStrip_Main) Me.Controls.Add(Me.StatusStrip_Main)
Me.Controls.Add(Me.NavPane) Me.Controls.Add(Me.NavPane)
Me.Name = "frmConstructor_Main" Me.Name = "frmConstructor_Main"
Me.ToolTipController.SetTitle(Me, resources.GetString("$this.Title"))
Me.ttToolTip.SetToolTip(Me, resources.GetString("$this.ToolTip"))
Me.ToolTipController.SetToolTip(Me, resources.GetString("$this.ToolTip1"))
Me.ToolTipController.SetToolTipIconType(Me, CType(resources.GetObject("$this.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
CType(Me.SplitContainerMain, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SplitContainerMain, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainerMain.ResumeLayout(False) Me.SplitContainerMain.ResumeLayout(False)
CType(Me.SplitContainerTop, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SplitContainerTop, System.ComponentModel.ISupportInitialize).EndInit()

File diff suppressed because it is too large Load Diff

View File

@@ -117,8 +117,11 @@ Public Class frmConstructor_Main
Private FOLLOW_UPisActive As Boolean = False Private FOLLOW_UPisActive As Boolean = False
Private DT_FU_Record As DataTable Private DT_FU_Record As DataTable
Private DT_FU_ENTITY As DataTable Private DT_FU_ENTITY As DataTable
Private gridGUID = 2
Private COL_ARRAY_RESULTLIST As List(Of String)
Private DT_WINDREAM_RESULTLIST_DEF As DataTable
Private DT_WINDREAM_RESULTLIST As DataTable Private DT_WINDREAM_RESULTLIST As DataTable
Private USER_RESULTLIST_CONFIG_GUID As Integer = 0
Private DT_TBPMO_FORM_VIEW As DataTable Private DT_TBPMO_FORM_VIEW As DataTable
@@ -240,12 +243,9 @@ Public Class frmConstructor_Main
'Die Standards ein/ausblenden 'Die Standards ein/ausblenden
End If End If
Load_Tree_View(CONSTRUCTORID) Load_Tree_View(CONSTRUCTORID)
Dim gridGUID = 2
If USER_LANGUAGE <> "de-DE" Then Dim sql_ResultList = "select * from TBPMO_WINDREAM_RESULTLIST_CONFIG"
gridGUID = 3 DT_WINDREAM_RESULTLIST_DEF = ClassDatabase.Return_Datatable(sql_ResultList, "GETRESULTLIST KONFIG")
End If
Dim sql_ResultList = "select * from TBPMO_WINDREAM_RESULTLIST_CONFIG where guid = " & gridGUID
DT_WINDREAM_RESULTLIST = ClassDatabase.Return_Datatable(sql_ResultList, "GET RESULTLIST KONFIG")
FORM_LOADED = True FORM_LOADED = True
Dim elapsed As Double Dim elapsed As Double
@@ -1088,49 +1088,76 @@ Public Class frmConstructor_Main
sw.Done() sw.Done()
End Sub End Sub
Sub Load_Tree_View_Data() Sub Load_Tree_View_Data()
Dim sw As New Stopwatch Try
sw.Start() Dim sw As New Stopwatch
Dim SelectedNode As TreeNode = TryCast(TreeViewMain.SelectedNode, TreeNode) sw.Start()
Dim SelectedNode As TreeNode = TryCast(TreeViewMain.SelectedNode, TreeNode)
If SelectedNode IsNot Nothing Then If SelectedNode IsNot Nothing Then
ENTITY_LOADED = False ENTITY_LOADED = False
ENTITY_ID = SelectedNode.Tag ENTITY_ID = SelectedNode.Tag
CURRENT_FORM_ID = ENTITY_ID CURRENT_FORM_ID = ENTITY_ID
Dim parentNode As TreeNode = TryCast(SelectedNode.Parent, TreeNode) Dim parentNode As TreeNode = TryCast(SelectedNode.Parent, TreeNode)
ACT_EBENE = 2 ACT_EBENE = 2
CURRENT_ACT_LEVEL = 2 CURRENT_ACT_LEVEL = 2
If parentNode IsNot Nothing Then If parentNode IsNot Nothing Then
Dim grandParentNode As TreeNode = TryCast(parentNode.Parent, TreeNode) Dim grandParentNode As TreeNode = TryCast(parentNode.Parent, TreeNode)
If grandParentNode IsNot Nothing Then If grandParentNode IsNot Nothing Then
ACT_EBENE = 3 ACT_EBENE = 3
CURRENT_ACT_LEVEL = 3 CURRENT_ACT_LEVEL = 3
End If
Else
ACT_EBENE = 1
CURRENT_ACT_LEVEL = 1
End If End If
Else
ACT_EBENE = 1 Dim result = (From form In DT_VWPMO_CONSTRUCTOR_FORMS.AsEnumerable()
CURRENT_ACT_LEVEL = 1 Select form
Where form.Item("FORM_ID") = ENTITY_ID).Single()
CONSTRUCTOR_DETAIL_ID = result.Item("GUID")
'Dim Sql = "SELECT GUID from VWPMO_CONSTRUCTOR_FORMS WHERE CONSTRUCT_ID = " & CONSTRUCTORID & " AND FORM_ID = " & ENTITY_ID & " AND SCREEN_ID = " & CURRENT_SCREEN_ID
'CONSTRUCTOR_DETAIL_ID = ClassDatabase.Execute_Scalar(Sql, True)
Dim sql_ResultList = "select * from TBPMO_USER_WINDREAM_RESULTLIST_CONFIG where USER_ID = " & USER_GUID & " AND CONSTRUCTOR_DETAIL_ID = " & CONSTRUCTOR_DETAIL_ID
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql_ResultList, "GET USER_RESULTLIST KONFIG")
If DT.Rows.Count = 1 Then
USER_RESULTLIST_CONFIG_GUID = DT.Rows(0).Item(0)
DT_WINDREAM_RESULTLIST = Nothing
DT_WINDREAM_RESULTLIST = DT
Else
USER_RESULTLIST_CONFIG_GUID = 0
If USER_LANGUAGE <> "de-DE" Then
gridGUID = 3
End If
Dim filteredDatatable = DT_WINDREAM_RESULTLIST_DEF.Copy()
For Each row As DataRow In filteredDatatable.Rows
If row.Item(0) <> gridGUID Then
row.Delete()
End If
Next
filteredDatatable.AcceptChanges()
If filteredDatatable.Rows.Count = 1 Then
DT_WINDREAM_RESULTLIST = Nothing
DT_WINDREAM_RESULTLIST = filteredDatatable
End If
End If
Dim elapsed As Double
elapsed = sw.Elapsed.TotalSeconds
If LogErrorsOnly = False Then ClassLogger.Add(" >> Load_Tree_View_Data1 took " & Format(elapsed, "0.000000000") & " seconds", False)
Get_RecordCounts_Nodes()
Load_Entity_Data(ACT_EBENE)
sw.Stop()
sw.Reset()
elapsed = elapsed - sw.Elapsed.TotalSeconds
If LogErrorsOnly = False Then ClassLogger.Add(" >> Load_Tree_View_Data2 took " & Format(elapsed, "0.000000000") & " seconds", False)
End If End If
Catch ex As Exception
Dim result = (From form In DT_VWPMO_CONSTRUCTOR_FORMS.AsEnumerable() MsgBox("Unexpected Error in Load_Tree_View_Data:" & vbNewLine & ex.Message, MsgBoxStyle.Exclamation)
Select form End Try
Where form.Item("FORM_ID") = ENTITY_ID).Single()
CONSTRUCTOR_DETAIL_ID = result.Item("GUID")
'Dim Sql = "SELECT GUID from VWPMO_CONSTRUCTOR_FORMS WHERE CONSTRUCT_ID = " & CONSTRUCTORID & " AND FORM_ID = " & ENTITY_ID & " AND SCREEN_ID = " & CURRENT_SCREEN_ID
'CONSTRUCTOR_DETAIL_ID = ClassDatabase.Execute_Scalar(Sql, True)
Dim elapsed As Double
elapsed = sw.Elapsed.TotalSeconds
If LogErrorsOnly = False Then ClassLogger.Add(" >> Load_Tree_View_Data1 took " & Format(elapsed, "0.000000000") & " seconds", False)
Get_RecordCounts_Nodes()
Load_Entity_Data(ACT_EBENE)
sw.Stop()
sw.Reset()
elapsed = elapsed - sw.Elapsed.TotalSeconds
If LogErrorsOnly = False Then ClassLogger.Add(" >> Load_Tree_View_Data2 took " & Format(elapsed, "0.000000000") & " seconds", False)
End If
End Sub End Sub
Sub Get_RecordCounts_Nodes() Sub Get_RecordCounts_Nodes()
@@ -3646,6 +3673,7 @@ Public Class frmConstructor_Main
End If End If
tslblWindreamView.Text = msg tslblWindreamView.Text = msg
Dim DTGrid As New DataTable Dim DTGrid As New DataTable
Dim ColArray As New List(Of String) Dim ColArray As New List(Of String)
Try Try
'Die Icon Colum erstellen und konfigurieren 'Die Icon Colum erstellen und konfigurieren
@@ -3660,9 +3688,8 @@ Public Class frmConstructor_Main
colPath.ColumnName = "FULLPATH" colPath.ColumnName = "FULLPATH"
colPath.Caption = "Fullpath" colPath.Caption = "Fullpath"
DTGrid.Columns.Add(colPath) DTGrid.Columns.Add(colPath)
'GridViewDoc_Search.Columns.
'TODO: colPath ausblenden
If Not DT_WINDREAM_RESULTLIST Is Nothing And DT_WINDREAM_RESULTLIST.Rows.Count = 1 Then If Not DT_WINDREAM_RESULTLIST Is Nothing And DT_WINDREAM_RESULTLIST.Rows.Count = 1 Then
Dim ColCount As Integer = 1 Dim ColCount As Integer = 1
For Each Column As DataColumn In DT_WINDREAM_RESULTLIST.Columns For Each Column As DataColumn In DT_WINDREAM_RESULTLIST.Columns
@@ -3700,6 +3727,8 @@ Public Class frmConstructor_Main
Catch ex As Exception Catch ex As Exception
MsgBox("Unexpected Error in Construct Datatable for GridResult: " & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Unexpected Error in Construct Datatable for GridResult: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try End Try
COL_ARRAY_RESULTLIST = ColArray
For Each row As DataRow In DT_FILE_RESULT.Rows For Each row As DataRow In DT_FILE_RESULT.Rows
Dim fullpath = "W:" & row.Item("FULL_FILENAME") Dim fullpath = "W:" & row.Item("FULL_FILENAME")
@@ -3752,7 +3781,6 @@ Public Class frmConstructor_Main
Else Else
rowvalue = row.Item(Colname) rowvalue = row.Item(Colname)
End If End If
If LogErrorsOnly = False Then ClassLogger.Add(" >> rowvalue : '" & rowvalue.ToString & "'", False) If LogErrorsOnly = False Then ClassLogger.Add(" >> rowvalue : '" & rowvalue.ToString & "'", False)
Catch ex As Exception Catch ex As Exception
ClassLogger.Add("Unexpected Error in GetVariableValue for Column '" & Colname & "- Error: " & ex.Message) ClassLogger.Add("Unexpected Error in GetVariableValue for Column '" & Colname & "- Error: " & ex.Message)
@@ -3765,7 +3793,6 @@ Public Class frmConstructor_Main
NewRow.Item(i) = rowvalue.ToString NewRow.Item(i) = rowvalue.ToString
i += 1 i += 1
Next Next
DTGrid.Rows.Add(NewRow) DTGrid.Rows.Add(NewRow)
' Catch ex As Exception ' Catch ex As Exception
' ClassLogger.Add("Unexpected Error in CreateRow for doc '" & filename & "- Error: " & ex.Message) ' ClassLogger.Add("Unexpected Error in CreateRow for doc '" & filename & "- Error: " & ex.Message)
@@ -3777,6 +3804,21 @@ Public Class frmConstructor_Main
GridViewDoc_Search.Columns.Item("ICON").MaxWidth = 24 GridViewDoc_Search.Columns.Item("ICON").MaxWidth = 24
GridViewDoc_Search.Columns.Item("ICON").MinWidth = 24 GridViewDoc_Search.Columns.Item("ICON").MinWidth = 24
GridViewDoc_Search.Columns.Item("FULLPATH").Visible = False GridViewDoc_Search.Columns.Item("FULLPATH").Visible = False
For Each col As DataColumn In DT_WINDREAM_RESULTLIST.Columns
If col.ColumnName.EndsWith("WIDTH") Or col.ColumnName.StartsWith("ADDED") Or col.ColumnName.StartsWith("CHANGED") Then
Continue For
End If
Dim rowvalue = DT_WINDREAM_RESULTLIST.Rows(0).Item(col.ColumnName)
If IsDBNull(rowvalue) Or IsNumeric(rowvalue) Then
Continue For
End If
Dim Width = DT_WINDREAM_RESULTLIST.Rows(0).Item(String.Format("{0}_WIDTH", col.ColumnName))
If Not IsNothing(Width) And Not IsDBNull(Width) Then
GridViewDoc_Search.Columns.Item(rowvalue). = Width
End If
Next
End If End If
Else Else
Dim msg = "Windream-Dokumente für Record: " & RECORD_ID & " - Keine Dateien gefunden" Dim msg = "Windream-Dokumente für Record: " & RECORD_ID & " - Keine Dateien gefunden"
@@ -5508,4 +5550,35 @@ Public Class frmConstructor_Main
MsgBox("Unexpected Error in MassChange Collector:" & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Unexpected Error in MassChange Collector:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try End Try
End Sub End Sub
Private Sub GridViewDoc_Search_ColumnWidthChanged(sender As Object, e As ColumnEventArgs) Handles GridViewDoc_Search.ColumnWidthChanged
Try
If USER_RESULTLIST_CONFIG_GUID = 0 Then
Dim insert = String.Format("INSERT INTO TBPMO_USER_WINDREAM_RESULTLIST_CONFIG (USER_ID,CONSTRUCTOR_DETAIL_ID,COLUMN1,COLUMN1_WIDTH,COLUMN2,COLUMN2_WIDTH,COLUMN3,COLUMN3_WIDTH,COLUMN4,COLUMN4_WIDTH,COLUMN5,COLUMN5_WIDTH,COLUMN6,COLUMN6_WIDTH,COLUMN7,COLUMN7_WIDTH,ADDED_WHO)" & _
" SELECT {0},{1},COLUMN1,COLUMN1_WIDTH,COLUMN2,COLUMN2_WIDTH,COLUMN3,COLUMN3_WIDTH,COLUMN4,COLUMN4_WIDTH,COLUMN5,COLUMN5_WIDTH,COLUMN6,COLUMN6_WIDTH,COLUMN7,COLUMN7_WIDTH,'{2}' FROM TBPMO_WINDREAM_RESULTLIST_CONFIG WHERE GUID = {3}", USER_GUID, CONSTRUCTOR_DETAIL_ID, Environment.UserName, gridGUID)
If ClassDatabase.Execute_non_Query(insert) = True Then
USER_RESULTLIST_CONFIG_GUID = ClassDatabase.Execute_Scalar("SELECT MAX GUID FROM TBPMO_USER_WINDREAM_RESULTLIST_CONFIG WHERE USER_ID = " & USER_GUID)
Else
Exit Sub
End If
End If
Console.WriteLine("Column changed - Column name: " & e.Column.Name)
Dim colNameGrid = e.Column.Name.Replace("col", "")
'Jetzt über die Column der Configtabelle auf den Inhalt schliessen
For Each col As DataColumn In DT_WINDREAM_RESULTLIST.Columns
Dim rowvalue = DT_WINDREAM_RESULTLIST.Rows(0).Item(col.ColumnName)
If IsDBNull(rowvalue) Or IsNumeric(rowvalue) Then
Continue For
End If
If rowvalue = colNameGrid Then
Dim update = String.Format("UPDATE TBPMO_USER_WINDREAM_RESULTLIST_CONFIG SET {0}_WIDTH = {1} WHERE GUID = {2}", col.ColumnName, e.Column.Width, USER_RESULTLIST_CONFIG_GUID)
ClassDatabase.Execute_non_Query(update)
Exit For
End If
Next
Catch ex As Exception
ClassLogger.Add(">> Unexpected Error in ColumnWidth-Change DocResult: " & ex.Message, False)
End Try
End Sub
End Class End Class