jj_11_11

2015-11-11 15:31:28 +01:00
parent a720bd1edc
commit 04e906a63f
8 changed files with 1548 additions and 54 deletions
--- a/app/DD-Record-Organiser/XtraForm2.Designer.vb
+++ b/app/DD-Record-Organiser/XtraForm2.Designer.vb
@@ -20,16 +20,16 @@ Partial Class frmConstructor_Main
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
-        Dim GridLevelNode3 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
-        Dim GridLevelNode4 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
-        Dim TileViewItemElement8 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
-        Dim TileViewItemElement9 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
-        Dim TileViewItemElement10 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
-        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmConstructor_Main))
+        Dim GridLevelNode1 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
+        Dim GridLevelNode2 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
        Dim TileViewItemElement1 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
        Dim TileViewItemElement2 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
        Dim TileViewItemElement3 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
-        Dim TileViewItemElement11 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmConstructor_Main))
+        Dim TileViewItemElement4 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement5 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement6 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement7 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
        Me.grvwCarousel = New DevExpress.XtraGrid.Views.Layout.LayoutView()
        Me.GridControlSelection = New DevExpress.XtraGrid.GridControl()
        Me.ContextMenu_GridControlSelection = New System.Windows.Forms.ContextMenuStrip(Me.components)
@@ -113,15 +113,15 @@ Partial Class frmConstructor_Main
        '
        Me.GridControlSelection.ContextMenuStrip = Me.ContextMenu_GridControlSelection
        Me.GridControlSelection.Dock = System.Windows.Forms.DockStyle.Fill
-        GridLevelNode3.LevelTemplate = Me.grvwCarousel
-        GridLevelNode3.RelationName = "Level1"
-        GridLevelNode4.LevelTemplate = Me.grvwTiles
-        GridLevelNode4.RelationName = "Level2"
-        Me.GridControlSelection.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode3, GridLevelNode4})
+        GridLevelNode1.LevelTemplate = Me.grvwCarousel
+        GridLevelNode1.RelationName = "Level1"
+        GridLevelNode2.LevelTemplate = Me.grvwTiles
+        GridLevelNode2.RelationName = "Level2"
+        Me.GridControlSelection.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode1, GridLevelNode2})
        Me.GridControlSelection.Location = New System.Drawing.Point(0, 0)
        Me.GridControlSelection.MainView = Me.grvwGrid
        Me.GridControlSelection.Name = "GridControlSelection"
-        Me.GridControlSelection.Size = New System.Drawing.Size(1157, 272)
+        Me.GridControlSelection.Size = New System.Drawing.Size(1150, 272)
        Me.GridControlSelection.TabIndex = 2
        Me.GridControlSelection.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.grvwTiles, Me.grvwGrid, Me.grvwCarousel})
        '
@@ -172,15 +172,15 @@ Partial Class frmConstructor_Main
        Me.grvwTiles.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.TileViewColumn1, Me.TileViewColumn2, Me.TileViewColumn3})
        Me.grvwTiles.GridControl = Me.GridControlSelection
        Me.grvwTiles.Name = "grvwTiles"
-        TileViewItemElement8.Column = Me.TileViewColumn1
-        TileViewItemElement8.Text = "element1"
-        TileViewItemElement9.Column = Me.TileViewColumn2
-        TileViewItemElement9.Text = "element2"
-        TileViewItemElement10.Column = Me.TileViewColumn3
-        TileViewItemElement10.Text = "element3"
-        Me.grvwTiles.TileTemplate.Add(TileViewItemElement8)
-        Me.grvwTiles.TileTemplate.Add(TileViewItemElement9)
-        Me.grvwTiles.TileTemplate.Add(TileViewItemElement10)
+        TileViewItemElement1.Column = Me.TileViewColumn1
+        TileViewItemElement1.Text = "element1"
+        TileViewItemElement2.Column = Me.TileViewColumn2
+        TileViewItemElement2.Text = "element2"
+        TileViewItemElement3.Column = Me.TileViewColumn3
+        TileViewItemElement3.Text = "element3"
+        Me.grvwTiles.TileTemplate.Add(TileViewItemElement1)
+        Me.grvwTiles.TileTemplate.Add(TileViewItemElement2)
+        Me.grvwTiles.TileTemplate.Add(TileViewItemElement3)
        '
        'TileViewColumn1
        '
@@ -326,7 +326,7 @@ Partial Class frmConstructor_Main
        Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0)
        Me.XtraTabControl1.Name = "XtraTabControl1"
        Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage3
-        Me.XtraTabControl1.Size = New System.Drawing.Size(1050, 320)
+        Me.XtraTabControl1.Size = New System.Drawing.Size(1050, 313)
        Me.XtraTabControl1.TabIndex = 0
        Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage3, Me.XtraTabPage2})
        '
@@ -336,7 +336,7 @@ Partial Class frmConstructor_Main
        Me.XtraTabPage3.Appearance.PageClient.Options.UseBackColor = True
        Me.XtraTabPage3.Controls.Add(Me.GridControl1)
        Me.XtraTabPage3.Name = "XtraTabPage3"
-        Me.XtraTabPage3.Size = New System.Drawing.Size(1044, 292)
+        Me.XtraTabPage3.Size = New System.Drawing.Size(1048, 288)
        Me.XtraTabPage3.Text = "XtraTabPage3"
        '
        'GridControl1
@@ -345,7 +345,7 @@ Partial Class frmConstructor_Main
        Me.GridControl1.Location = New System.Drawing.Point(0, 0)
        Me.GridControl1.MainView = Me.TileView1
        Me.GridControl1.Name = "GridControl1"
-        Me.GridControl1.Size = New System.Drawing.Size(1044, 292)
+        Me.GridControl1.Size = New System.Drawing.Size(1048, 288)
        Me.GridControl1.TabIndex = 0
        Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.TileView1})
        '
@@ -403,29 +403,29 @@ Partial Class frmConstructor_Main
        Me.TileView2.OptionsTiles.ItemSize = New System.Drawing.Size(280, 160)
        Me.TileView2.OptionsTiles.RowCount = 2
        Me.TileView2.SortInfo.AddRange(New DevExpress.XtraGrid.Columns.GridColumnSortInfo() {New DevExpress.XtraGrid.Columns.GridColumnSortInfo(Me.colAktenzustand, DevExpress.Data.ColumnSortOrder.Ascending)})
-        TileViewItemElement1.Appearance.Normal.Font = New System.Drawing.Font("Segoe UI", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        TileViewItemElement1.Appearance.Normal.ForeColor = System.Drawing.Color.DodgerBlue
-        TileViewItemElement1.Appearance.Normal.Options.UseFont = True
-        TileViewItemElement1.Appearance.Normal.Options.UseForeColor = True
-        TileViewItemElement1.Column = Me.colAktenzeichen
-        TileViewItemElement1.Text = "colAktenzeichen"
-        TileViewItemElement1.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.Manual
-        TileViewItemElement1.TextLocation = New System.Drawing.Point(120, 0)
-        TileViewItemElement2.Column = Me.TileViewColumn5
-        TileViewItemElement2.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
-        TileViewItemElement2.ImageBorder = DevExpress.XtraEditors.TileItemElementImageBorderMode.None
-        TileViewItemElement2.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
-        TileViewItemElement2.Text = "TileViewColumn5"
-        TileViewItemElement3.Column = Me.colTagderEintragungimRegister
-        TileViewItemElement3.Text = "colTagderEintragungimRegister"
-        TileViewItemElement3.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.Manual
-        TileViewItemElement3.TextLocation = New System.Drawing.Point(120, 20)
-        TileViewItemElement11.Column = Me.colAktenzustand
-        TileViewItemElement11.Text = "colAktenzustand"
-        Me.TileView2.TileTemplate.Add(TileViewItemElement1)
-        Me.TileView2.TileTemplate.Add(TileViewItemElement2)
-        Me.TileView2.TileTemplate.Add(TileViewItemElement3)
-        Me.TileView2.TileTemplate.Add(TileViewItemElement11)
+        TileViewItemElement4.Appearance.Normal.Font = New System.Drawing.Font("Segoe UI", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        TileViewItemElement4.Appearance.Normal.ForeColor = System.Drawing.Color.DodgerBlue
+        TileViewItemElement4.Appearance.Normal.Options.UseFont = True
+        TileViewItemElement4.Appearance.Normal.Options.UseForeColor = True
+        TileViewItemElement4.Column = Me.colAktenzeichen
+        TileViewItemElement4.Text = "colAktenzeichen"
+        TileViewItemElement4.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.Manual
+        TileViewItemElement4.TextLocation = New System.Drawing.Point(120, 0)
+        TileViewItemElement5.Column = Me.TileViewColumn5
+        TileViewItemElement5.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
+        TileViewItemElement5.ImageBorder = DevExpress.XtraEditors.TileItemElementImageBorderMode.None
+        TileViewItemElement5.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement5.Text = "TileViewColumn5"
+        TileViewItemElement6.Column = Me.colTagderEintragungimRegister
+        TileViewItemElement6.Text = "colTagderEintragungimRegister"
+        TileViewItemElement6.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.Manual
+        TileViewItemElement6.TextLocation = New System.Drawing.Point(120, 20)
+        TileViewItemElement7.Column = Me.colAktenzustand
+        TileViewItemElement7.Text = "colAktenzustand"
+        Me.TileView2.TileTemplate.Add(TileViewItemElement4)
+        Me.TileView2.TileTemplate.Add(TileViewItemElement5)
+        Me.TileView2.TileTemplate.Add(TileViewItemElement6)
+        Me.TileView2.TileTemplate.Add(TileViewItemElement7)
        Me.TileView2.ViewCaption = "dfsdfsdf"
        '
        'TileViewColumn4
@@ -473,7 +473,7 @@ Partial Class frmConstructor_Main
        Me.SplitContainer_Bottom.Panel1.Controls.Add(Me.XtraTabControl1)
        Me.SplitContainer_Bottom.Panel1.Text = "Panel1"
        Me.SplitContainer_Bottom.Panel2.Text = "Panel2"
-        Me.SplitContainer_Bottom.Size = New System.Drawing.Size(1460, 320)
+        Me.SplitContainer_Bottom.Size = New System.Drawing.Size(1460, 313)
        Me.SplitContainer_Bottom.SplitterPosition = 1050
        Me.SplitContainer_Bottom.TabIndex = 0
        Me.SplitContainer_Bottom.Text = "SplitContainerControl1"