MS

2023-04-13 17:11:20 +02:00
parent aa7c68a4ce
commit 2db575d944
20 changed files with 584 additions and 4214 deletions
--- a/app/DD-Record-Organizer/frmNodeNavigation.Designer.vb
+++ b/app/DD-Record-Organizer/frmNodeNavigation.Designer.vb
@@ -24,7 +24,7 @@ Partial Class frmNodeNavigation
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmNodeNavigation))
-        Dim GridLevelNode1 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
+        Dim GridLevelNode2 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
        Me.bbtnitmRecEdit = New DevExpress.XtraBars.BarButtonItem()
        Me.bsiInfo = New DevExpress.XtraBars.BarStaticItem()
@@ -38,7 +38,7 @@ Partial Class frmNodeNavigation
        Me.BarStaticItemLocked = New DevExpress.XtraBars.BarStaticItem()
        Me.bsitmtInfoDoc = New DevExpress.XtraBars.BarStaticItem()
        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
-        Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
+        Me.bbtnitmReloadView = New DevExpress.XtraBars.BarButtonItem()
        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
        Me.RibbonPageGroupRecord = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonPageGroupDocResult = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@@ -77,6 +77,8 @@ Partial Class frmNodeNavigation
        Me.tsmiFileDelete = New System.Windows.Forms.ToolStripMenuItem()
        Me.TimerFileHandle = New System.Windows.Forms.Timer(Me.components)
        Me.TimerClearResultfiles = New System.Windows.Forms.Timer(Me.components)
+        Me.cmsTreeView = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.UnterknotenNeuOrdnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.SplitContainerMain, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.SplitContainerMain.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -94,12 +96,13 @@ Partial Class frmNodeNavigation
        CType(Me.GridViewDoc_Search, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.cmsResultFilesBasic.SuspendLayout()
        Me.cmsResultFileDetail.SuspendLayout()
+        Me.cmsTreeView.SuspendLayout()
        Me.SuspendLayout()
        '
        'RibbonControl1
        '
        Me.RibbonControl1.ExpandCollapseItem.Id = 0
-        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtnitmRecEdit, Me.bsiInfo, Me.bbtnitmRecSave, Me.bsiDocID, Me.bsitmRecordID, Me.bbtnitmDocResultExport, Me.bbtnitmDocResultLayoutSave, Me.bbtnitmDocResultLayoutReset, Me.bbtnitmDocResultRefresh, Me.BarStaticItemLocked, Me.bsitmtInfoDoc, Me.BarButtonItem1, Me.BarButtonItem2})
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtnitmRecEdit, Me.bsiInfo, Me.bbtnitmRecSave, Me.bsiDocID, Me.bsitmRecordID, Me.bbtnitmDocResultExport, Me.bbtnitmDocResultLayoutSave, Me.bbtnitmDocResultLayoutReset, Me.bbtnitmDocResultRefresh, Me.BarStaticItemLocked, Me.bsitmtInfoDoc, Me.BarButtonItem1, Me.bbtnitmReloadView})
        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
        Me.RibbonControl1.MaxItemId = 16
        Me.RibbonControl1.Name = "RibbonControl1"
@@ -201,12 +204,12 @@ Partial Class frmNodeNavigation
        Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
        Me.BarButtonItem1.Name = "BarButtonItem1"
        '
-        'BarButtonItem2
+        'bbtnitmReloadView
        '
-        Me.BarButtonItem2.Caption = "Sicht neu laden"
-        Me.BarButtonItem2.Id = 14
-        Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
-        Me.BarButtonItem2.Name = "BarButtonItem2"
+        Me.bbtnitmReloadView.Caption = "Sicht neu laden"
+        Me.bbtnitmReloadView.Id = 14
+        Me.bbtnitmReloadView.ImageOptions.SvgImage = CType(resources.GetObject("bbtnitmReloadView.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.bbtnitmReloadView.Name = "bbtnitmReloadView"
        '
        'RibbonPage1
        '
@@ -236,7 +239,7 @@ Partial Class frmNodeNavigation
        '
        'RibbonPageGroup1
        '
-        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.bbtnitmReloadView)
        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
        Me.RibbonPageGroup1.Text = "Funktionen"
        '
@@ -282,6 +285,7 @@ Partial Class frmNodeNavigation
        Me.TreeListDevexpress.Appearance.FocusedRow.BackColor = System.Drawing.Color.Aqua
        Me.TreeListDevexpress.Appearance.FocusedRow.Options.UseBackColor = True
        Me.TreeListDevexpress.Caption = "Instandhaltung View"
+        Me.TreeListDevexpress.ContextMenuStrip = Me.cmsTreeView
        Me.TreeListDevexpress.Dock = System.Windows.Forms.DockStyle.Fill
        Me.TreeListDevexpress.Location = New System.Drawing.Point(0, 0)
        Me.TreeListDevexpress.Name = "TreeListDevexpress"
@@ -299,6 +303,7 @@ Partial Class frmNodeNavigation
        Me.TreeListDevexpress.OptionsFind.ShowCloseButton = False
        Me.TreeListDevexpress.OptionsFind.ShowFindButton = False
        Me.TreeListDevexpress.OptionsLayout.AddNewColumns = False
+        Me.TreeListDevexpress.OptionsMenu.ShowExpandCollapseItems = False
        Me.TreeListDevexpress.OptionsSelection.EnableAppearanceFocusedCell = False
        Me.TreeListDevexpress.OptionsView.ShowColumns = False
        Me.TreeListDevexpress.OptionsView.ShowFirstLines = False
@@ -316,6 +321,7 @@ Partial Class frmNodeNavigation
        '
        'SplitContainer1
        '
+        Me.SplitContainer1.AllowDrop = True
        Me.SplitContainer1.Dock = System.Windows.Forms.DockStyle.Fill
        Me.SplitContainer1.Location = New System.Drawing.Point(0, 0)
        Me.SplitContainer1.Name = "SplitContainer1"
@@ -344,11 +350,10 @@ Partial Class frmNodeNavigation
        'GridControlDocSearch
        '
        Me.GridControlDocSearch.AllowDrop = True
-        Me.GridControlDocSearch.BackgroundImage = CType(resources.GetObject("GridControlDocSearch.BackgroundImage"), System.Drawing.Image)
-        Me.GridControlDocSearch.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.GridControlDocSearch.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
        Me.GridControlDocSearch.Dock = System.Windows.Forms.DockStyle.Fill
-        GridLevelNode1.RelationName = "Level1"
-        Me.GridControlDocSearch.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode1})
+        GridLevelNode2.RelationName = "Level1"
+        Me.GridControlDocSearch.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode2})
        Me.GridControlDocSearch.Location = New System.Drawing.Point(0, 0)
        Me.GridControlDocSearch.MainView = Me.GridViewDoc_Search
        Me.GridControlDocSearch.Name = "GridControlDocSearch"
@@ -489,13 +494,13 @@ Partial Class frmNodeNavigation
        'tsmiFileRenameFilename
        '
        Me.tsmiFileRenameFilename.Name = "tsmiFileRenameFilename"
-        Me.tsmiFileRenameFilename.Size = New System.Drawing.Size(180, 22)
+        Me.tsmiFileRenameFilename.Size = New System.Drawing.Size(142, 22)
        Me.tsmiFileRenameFilename.Text = "Dateiname"
        '
        'tsmiFileRenameDisplayname
        '
        Me.tsmiFileRenameDisplayname.Name = "tsmiFileRenameDisplayname"
-        Me.tsmiFileRenameDisplayname.Size = New System.Drawing.Size(180, 22)
+        Me.tsmiFileRenameDisplayname.Size = New System.Drawing.Size(142, 22)
        Me.tsmiFileRenameDisplayname.Text = "Displayname"
        '
        'tsmiFileVersion
@@ -532,6 +537,19 @@ Partial Class frmNodeNavigation
        '
        Me.TimerClearResultfiles.Interval = 3000
        '
+        'cmsTreeView
+        '
+        Me.cmsTreeView.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.UnterknotenNeuOrdnenToolStripMenuItem})
+        Me.cmsTreeView.Name = "cmsTreeView"
+        Me.cmsTreeView.Size = New System.Drawing.Size(205, 26)
+        '
+        'UnterknotenNeuOrdnenToolStripMenuItem
+        '
+        Me.UnterknotenNeuOrdnenToolStripMenuItem.Image = CType(resources.GetObject("UnterknotenNeuOrdnenToolStripMenuItem.Image"), System.Drawing.Image)
+        Me.UnterknotenNeuOrdnenToolStripMenuItem.Name = "UnterknotenNeuOrdnenToolStripMenuItem"
+        Me.UnterknotenNeuOrdnenToolStripMenuItem.Size = New System.Drawing.Size(204, 22)
+        Me.UnterknotenNeuOrdnenToolStripMenuItem.Text = "Unterknoten neu ordnen"
+        '
        'frmNodeNavigation
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -562,6 +580,7 @@ Partial Class frmNodeNavigation
        CType(Me.GridViewDoc_Search, System.ComponentModel.ISupportInitialize).EndInit()
        Me.cmsResultFilesBasic.ResumeLayout(False)
        Me.cmsResultFileDetail.ResumeLayout(False)
+        Me.cmsTreeView.ResumeLayout(False)
        Me.ResumeLayout(False)
        Me.PerformLayout()

@@ -614,9 +633,11 @@ Partial Class frmNodeNavigation
    Friend WithEvents tsmiFileVersion As ToolStripMenuItem
    Friend WithEvents ToolStripSeparator4 As ToolStripSeparator
    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
-    Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents bbtnitmReloadView As DevExpress.XtraBars.BarButtonItem
    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
    Friend WithEvents tsmiFileDelete As ToolStripMenuItem
    Friend WithEvents TimerFileHandle As Timer
    Friend WithEvents TimerClearResultfiles As Timer
+    Friend WithEvents cmsTreeView As ContextMenuStrip
+    Friend WithEvents UnterknotenNeuOrdnenToolStripMenuItem As ToolStripMenuItem
 End Class