This commit is contained in:
SchreiberM
2015-11-12 08:37:21 +01:00
parent 1f67eee867
commit 5af4fd3719
7 changed files with 68 additions and 78 deletions

View File

@@ -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,11 +113,11 @@ 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"
@@ -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
'
@@ -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