ChatControl: Switch colors, less spacing, fix message box

Controls.ChatControl/ChatControl.Designer.vb

@@ -23,39 +23,39 @@ Partial Class ChatControl
     <System.Diagnostics.DebuggerStepThrough()>
     Private Sub InitializeComponent()
         Me.components = New System.ComponentModel.Container()
-        Dim ItemTemplate1 As DevExpress.XtraGrid.Views.Tile.ItemTemplate = New DevExpress.XtraGrid.Views.Tile.ItemTemplate()
-        Dim TableColumnDefinition1 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
-        Dim TableColumnDefinition2 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
-        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 TableRowDefinition1 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
-        Dim TableRowDefinition2 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
-        Dim TableSpan1 As DevExpress.XtraEditors.TableLayout.TableSpan = New DevExpress.XtraEditors.TableLayout.TableSpan()
-        Dim ItemTemplate2 As DevExpress.XtraGrid.Views.Tile.ItemTemplate = New DevExpress.XtraGrid.Views.Tile.ItemTemplate()
-        Dim TableColumnDefinition3 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
-        Dim TableColumnDefinition4 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
-        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 TableRowDefinition3 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
-        Dim TableRowDefinition4 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
-        Dim ItemTemplate3 As DevExpress.XtraGrid.Views.Tile.ItemTemplate = New DevExpress.XtraGrid.Views.Tile.ItemTemplate()
-        Dim TableColumnDefinition5 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
-        Dim TableColumnDefinition6 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
-        Dim TileViewItemElement7 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
-        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 TableRowDefinition5 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
-        Dim TableRowDefinition6 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
-        Dim TableRowDefinition7 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
-        Dim TableSpan2 As DevExpress.XtraEditors.TableLayout.TableSpan = New DevExpress.XtraEditors.TableLayout.TableSpan()
-        Dim TableSpan3 As DevExpress.XtraEditors.TableLayout.TableSpan = New DevExpress.XtraEditors.TableLayout.TableSpan()
-        Dim TableColumnDefinition7 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
-        Dim TableColumnDefinition8 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
-        Dim TableRowDefinition8 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
-        Dim TableRowDefinition9 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim ItemTemplate4 As DevExpress.XtraGrid.Views.Tile.ItemTemplate = New DevExpress.XtraGrid.Views.Tile.ItemTemplate()
+        Dim TableColumnDefinition9 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TableColumnDefinition10 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TileViewItemElement11 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement12 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement13 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TableRowDefinition10 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TableRowDefinition11 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TableSpan4 As DevExpress.XtraEditors.TableLayout.TableSpan = New DevExpress.XtraEditors.TableLayout.TableSpan()
+        Dim ItemTemplate5 As DevExpress.XtraGrid.Views.Tile.ItemTemplate = New DevExpress.XtraGrid.Views.Tile.ItemTemplate()
+        Dim TableColumnDefinition11 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TableColumnDefinition12 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TileViewItemElement14 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement15 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement16 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TableRowDefinition12 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TableRowDefinition13 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim ItemTemplate6 As DevExpress.XtraGrid.Views.Tile.ItemTemplate = New DevExpress.XtraGrid.Views.Tile.ItemTemplate()
+        Dim TableColumnDefinition13 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TableColumnDefinition14 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TileViewItemElement17 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement18 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement19 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement20 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TableRowDefinition14 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TableRowDefinition15 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TableRowDefinition16 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TableSpan5 As DevExpress.XtraEditors.TableLayout.TableSpan = New DevExpress.XtraEditors.TableLayout.TableSpan()
+        Dim TableSpan6 As DevExpress.XtraEditors.TableLayout.TableSpan = New DevExpress.XtraEditors.TableLayout.TableSpan()
+        Dim TableColumnDefinition15 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TableColumnDefinition16 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TableRowDefinition17 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TableRowDefinition18 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
         Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(ChatControl))
         Me.columnUsername = New DevExpress.XtraGrid.Columns.TileViewColumn()
         Me.columnMessage = New DevExpress.XtraGrid.Columns.TileViewColumn()
@@ -151,7 +151,7 @@ Partial Class ChatControl
         Me.GridChatOld.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.GridChatOld.Name = "GridChatOld"
         Me.GridChatOld.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemHyperLinkEdit1, Me.RepositoryItemHypertextLabel1})
-        Me.GridChatOld.Size = New System.Drawing.Size(422, 213)
+        Me.GridChatOld.Size = New System.Drawing.Size(421, 213)
         Me.GridChatOld.TabIndex = 0
         Me.GridChatOld.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ChatViewOld})
         '
@@ -174,145 +174,145 @@ Partial Class ChatControl
         Me.ChatViewOld.OptionsTiles.Padding = New System.Windows.Forms.Padding(5)
         Me.ChatViewOld.OptionsTiles.RowCount = 0
         Me.ChatViewOld.OptionsTiles.ScrollMode = DevExpress.XtraEditors.TileControlScrollMode.ScrollBar
-        TableColumnDefinition1.Length.Value = 250.0R
-        TableColumnDefinition2.Length.Value = 100.0R
-        ItemTemplate1.Columns.Add(TableColumnDefinition1)
-        ItemTemplate1.Columns.Add(TableColumnDefinition2)
-        TileViewItemElement1.Column = Me.columnUsername
-        TileViewItemElement1.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
-        TileViewItemElement1.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
-        TileViewItemElement1.Text = "columnUsername"
-        TileViewItemElement1.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
-        TileViewItemElement1.TextLocation = New System.Drawing.Point(10, 0)
-        TileViewItemElement2.Column = Me.columnMessage
-        TileViewItemElement2.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
-        TileViewItemElement2.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
-        TileViewItemElement2.RowIndex = 1
-        TileViewItemElement2.StretchHorizontal = True
-        TileViewItemElement2.StretchVertical = True
-        TileViewItemElement2.Text = "columnMessage"
-        TileViewItemElement2.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.TopLeft
-        TileViewItemElement2.TextLocation = New System.Drawing.Point(10, 0)
-        TileViewItemElement3.Column = Me.columnDate
-        TileViewItemElement3.ColumnIndex = 1
-        TileViewItemElement3.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
-        TileViewItemElement3.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
-        TileViewItemElement3.Text = "columnDate"
-        TileViewItemElement3.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
-        TileViewItemElement3.TextLocation = New System.Drawing.Point(-10, 0)
-        ItemTemplate1.Elements.Add(TileViewItemElement1)
-        ItemTemplate1.Elements.Add(TileViewItemElement2)
-        ItemTemplate1.Elements.Add(TileViewItemElement3)
-        ItemTemplate1.Name = "ChatLeft"
-        TableRowDefinition1.Length.Value = 19.0R
-        TableRowDefinition2.Length.Value = 45.0R
-        ItemTemplate1.Rows.Add(TableRowDefinition1)
-        ItemTemplate1.Rows.Add(TableRowDefinition2)
-        TableSpan1.ColumnSpan = 2
-        TableSpan1.RowIndex = 1
-        ItemTemplate1.Spans.Add(TableSpan1)
-        TableColumnDefinition3.Length.Value = 100.0R
-        TableColumnDefinition4.Length.Value = 250.0R
-        ItemTemplate2.Columns.Add(TableColumnDefinition3)
-        ItemTemplate2.Columns.Add(TableColumnDefinition4)
-        TileViewItemElement4.Column = Me.columnUsername
-        TileViewItemElement4.ColumnIndex = 1
-        TileViewItemElement4.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
-        TileViewItemElement4.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
-        TileViewItemElement4.Text = "columnUsername"
-        TileViewItemElement4.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
-        TileViewItemElement4.TextLocation = New System.Drawing.Point(-10, 0)
-        TileViewItemElement5.Column = Me.columnMessage
-        TileViewItemElement5.ColumnIndex = 1
-        TileViewItemElement5.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
-        TileViewItemElement5.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
-        TileViewItemElement5.MaxWidth = 350
-        TileViewItemElement5.RowIndex = 1
-        TileViewItemElement5.Text = "columnMessage"
-        TileViewItemElement5.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
-        TileViewItemElement5.TextLocation = New System.Drawing.Point(-10, 0)
-        TileViewItemElement6.Column = Me.columnDate
-        TileViewItemElement6.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
-        TileViewItemElement6.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
-        TileViewItemElement6.Text = "columnDate"
-        TileViewItemElement6.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
-        TileViewItemElement6.TextLocation = New System.Drawing.Point(10, 0)
-        ItemTemplate2.Elements.Add(TileViewItemElement4)
-        ItemTemplate2.Elements.Add(TileViewItemElement5)
-        ItemTemplate2.Elements.Add(TileViewItemElement6)
-        ItemTemplate2.Name = "ChatRight"
-        TableRowDefinition3.Length.Value = 19.0R
-        TableRowDefinition4.Length.Value = 45.0R
-        ItemTemplate2.Rows.Add(TableRowDefinition3)
-        ItemTemplate2.Rows.Add(TableRowDefinition4)
-        TableColumnDefinition5.Length.Value = 250.0R
-        TableColumnDefinition6.Length.Value = 100.0R
-        ItemTemplate3.Columns.Add(TableColumnDefinition5)
-        ItemTemplate3.Columns.Add(TableColumnDefinition6)
-        TileViewItemElement7.Column = Me.columnUsername
-        TileViewItemElement7.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
-        TileViewItemElement7.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
-        TileViewItemElement7.RowIndex = 1
-        TileViewItemElement7.Text = "columnUsername"
-        TileViewItemElement7.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
-        TileViewItemElement7.TextLocation = New System.Drawing.Point(10, 0)
-        TileViewItemElement8.Column = Me.columnMessage
-        TileViewItemElement8.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
-        TileViewItemElement8.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
-        TileViewItemElement8.RowIndex = 2
-        TileViewItemElement8.StretchHorizontal = True
-        TileViewItemElement8.StretchVertical = True
-        TileViewItemElement8.Text = "columnMessage"
-        TileViewItemElement8.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.TopLeft
-        TileViewItemElement8.TextLocation = New System.Drawing.Point(10, 0)
-        TileViewItemElement9.Column = Me.columnDate
-        TileViewItemElement9.ColumnIndex = 1
-        TileViewItemElement9.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
-        TileViewItemElement9.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
-        TileViewItemElement9.RowIndex = 1
-        TileViewItemElement9.Text = "columnDate"
-        TileViewItemElement9.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
-        TileViewItemElement9.TextLocation = New System.Drawing.Point(-10, 0)
-        TileViewItemElement10.Appearance.Normal.BackColor = System.Drawing.Color.PaleGreen
-        TileViewItemElement10.Appearance.Normal.Options.UseBackColor = True
-        TileViewItemElement10.Column = Me.columnTO_USER
-        TileViewItemElement10.Height = 19
-        TileViewItemElement10.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
-        TileViewItemElement10.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
-        TileViewItemElement10.StretchHorizontal = True
-        TileViewItemElement10.Text = "columnTO_USER"
-        TileViewItemElement10.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
-        TileViewItemElement10.TextLocation = New System.Drawing.Point(10, 0)
-        ItemTemplate3.Elements.Add(TileViewItemElement7)
-        ItemTemplate3.Elements.Add(TileViewItemElement8)
-        ItemTemplate3.Elements.Add(TileViewItemElement9)
-        ItemTemplate3.Elements.Add(TileViewItemElement10)
-        ItemTemplate3.Name = "ChatTo"
-        TableRowDefinition5.Length.Value = 17.0R
-        TableRowDefinition6.Length.Value = 19.0R
-        TableRowDefinition7.Length.Value = 54.0R
-        ItemTemplate3.Rows.Add(TableRowDefinition5)
-        ItemTemplate3.Rows.Add(TableRowDefinition6)
-        ItemTemplate3.Rows.Add(TableRowDefinition7)
-        TableSpan2.ColumnSpan = 2
-        TableSpan3.ColumnSpan = 2
-        TableSpan3.RowIndex = 2
-        ItemTemplate3.Spans.Add(TableSpan2)
-        ItemTemplate3.Spans.Add(TableSpan3)
-        Me.ChatViewOld.Templates.Add(ItemTemplate1)
-        Me.ChatViewOld.Templates.Add(ItemTemplate2)
-        Me.ChatViewOld.Templates.Add(ItemTemplate3)
-        Me.ChatViewOld.TileColumns.Add(TableColumnDefinition7)
-        Me.ChatViewOld.TileColumns.Add(TableColumnDefinition8)
-        Me.ChatViewOld.TileRows.Add(TableRowDefinition8)
-        Me.ChatViewOld.TileRows.Add(TableRowDefinition9)
+        TableColumnDefinition9.Length.Value = 250.0R
+        TableColumnDefinition10.Length.Value = 100.0R
+        ItemTemplate4.Columns.Add(TableColumnDefinition9)
+        ItemTemplate4.Columns.Add(TableColumnDefinition10)
+        TileViewItemElement11.Column = Me.columnUsername
+        TileViewItemElement11.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement11.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement11.Text = "columnUsername"
+        TileViewItemElement11.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
+        TileViewItemElement11.TextLocation = New System.Drawing.Point(10, 0)
+        TileViewItemElement12.Column = Me.columnMessage
+        TileViewItemElement12.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement12.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement12.RowIndex = 1
+        TileViewItemElement12.StretchHorizontal = True
+        TileViewItemElement12.StretchVertical = True
+        TileViewItemElement12.Text = "columnMessage"
+        TileViewItemElement12.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.TopLeft
+        TileViewItemElement12.TextLocation = New System.Drawing.Point(10, 0)
+        TileViewItemElement13.Column = Me.columnDate
+        TileViewItemElement13.ColumnIndex = 1
+        TileViewItemElement13.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement13.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement13.Text = "columnDate"
+        TileViewItemElement13.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
+        TileViewItemElement13.TextLocation = New System.Drawing.Point(-10, 0)
+        ItemTemplate4.Elements.Add(TileViewItemElement11)
+        ItemTemplate4.Elements.Add(TileViewItemElement12)
+        ItemTemplate4.Elements.Add(TileViewItemElement13)
+        ItemTemplate4.Name = "ChatLeft"
+        TableRowDefinition10.Length.Value = 19.0R
+        TableRowDefinition11.Length.Value = 45.0R
+        ItemTemplate4.Rows.Add(TableRowDefinition10)
+        ItemTemplate4.Rows.Add(TableRowDefinition11)
+        TableSpan4.ColumnSpan = 2
+        TableSpan4.RowIndex = 1
+        ItemTemplate4.Spans.Add(TableSpan4)
+        TableColumnDefinition11.Length.Value = 100.0R
+        TableColumnDefinition12.Length.Value = 250.0R
+        ItemTemplate5.Columns.Add(TableColumnDefinition11)
+        ItemTemplate5.Columns.Add(TableColumnDefinition12)
+        TileViewItemElement14.Column = Me.columnUsername
+        TileViewItemElement14.ColumnIndex = 1
+        TileViewItemElement14.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement14.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement14.Text = "columnUsername"
+        TileViewItemElement14.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
+        TileViewItemElement14.TextLocation = New System.Drawing.Point(-10, 0)
+        TileViewItemElement15.Column = Me.columnMessage
+        TileViewItemElement15.ColumnIndex = 1
+        TileViewItemElement15.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement15.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement15.MaxWidth = 350
+        TileViewItemElement15.RowIndex = 1
+        TileViewItemElement15.Text = "columnMessage"
+        TileViewItemElement15.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
+        TileViewItemElement15.TextLocation = New System.Drawing.Point(-10, 0)
+        TileViewItemElement16.Column = Me.columnDate
+        TileViewItemElement16.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement16.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement16.Text = "columnDate"
+        TileViewItemElement16.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
+        TileViewItemElement16.TextLocation = New System.Drawing.Point(10, 0)
+        ItemTemplate5.Elements.Add(TileViewItemElement14)
+        ItemTemplate5.Elements.Add(TileViewItemElement15)
+        ItemTemplate5.Elements.Add(TileViewItemElement16)
+        ItemTemplate5.Name = "ChatRight"
+        TableRowDefinition12.Length.Value = 19.0R
+        TableRowDefinition13.Length.Value = 45.0R
+        ItemTemplate5.Rows.Add(TableRowDefinition12)
+        ItemTemplate5.Rows.Add(TableRowDefinition13)
+        TableColumnDefinition13.Length.Value = 250.0R
+        TableColumnDefinition14.Length.Value = 100.0R
+        ItemTemplate6.Columns.Add(TableColumnDefinition13)
+        ItemTemplate6.Columns.Add(TableColumnDefinition14)
+        TileViewItemElement17.Column = Me.columnUsername
+        TileViewItemElement17.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement17.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement17.RowIndex = 1
+        TileViewItemElement17.Text = "columnUsername"
+        TileViewItemElement17.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
+        TileViewItemElement17.TextLocation = New System.Drawing.Point(10, 0)
+        TileViewItemElement18.Column = Me.columnMessage
+        TileViewItemElement18.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement18.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement18.RowIndex = 2
+        TileViewItemElement18.StretchHorizontal = True
+        TileViewItemElement18.StretchVertical = True
+        TileViewItemElement18.Text = "columnMessage"
+        TileViewItemElement18.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.TopLeft
+        TileViewItemElement18.TextLocation = New System.Drawing.Point(10, 0)
+        TileViewItemElement19.Column = Me.columnDate
+        TileViewItemElement19.ColumnIndex = 1
+        TileViewItemElement19.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement19.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement19.RowIndex = 1
+        TileViewItemElement19.Text = "columnDate"
+        TileViewItemElement19.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
+        TileViewItemElement19.TextLocation = New System.Drawing.Point(-10, 0)
+        TileViewItemElement20.Appearance.Normal.BackColor = System.Drawing.Color.PaleGreen
+        TileViewItemElement20.Appearance.Normal.Options.UseBackColor = True
+        TileViewItemElement20.Column = Me.columnTO_USER
+        TileViewItemElement20.Height = 19
+        TileViewItemElement20.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement20.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement20.StretchHorizontal = True
+        TileViewItemElement20.Text = "columnTO_USER"
+        TileViewItemElement20.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
+        TileViewItemElement20.TextLocation = New System.Drawing.Point(10, 0)
+        ItemTemplate6.Elements.Add(TileViewItemElement17)
+        ItemTemplate6.Elements.Add(TileViewItemElement18)
+        ItemTemplate6.Elements.Add(TileViewItemElement19)
+        ItemTemplate6.Elements.Add(TileViewItemElement20)
+        ItemTemplate6.Name = "ChatTo"
+        TableRowDefinition14.Length.Value = 17.0R
+        TableRowDefinition15.Length.Value = 19.0R
+        TableRowDefinition16.Length.Value = 54.0R
+        ItemTemplate6.Rows.Add(TableRowDefinition14)
+        ItemTemplate6.Rows.Add(TableRowDefinition15)
+        ItemTemplate6.Rows.Add(TableRowDefinition16)
+        TableSpan5.ColumnSpan = 2
+        TableSpan6.ColumnSpan = 2
+        TableSpan6.RowIndex = 2
+        ItemTemplate6.Spans.Add(TableSpan5)
+        ItemTemplate6.Spans.Add(TableSpan6)
+        Me.ChatViewOld.Templates.Add(ItemTemplate4)
+        Me.ChatViewOld.Templates.Add(ItemTemplate5)
+        Me.ChatViewOld.Templates.Add(ItemTemplate6)
+        Me.ChatViewOld.TileColumns.Add(TableColumnDefinition15)
+        Me.ChatViewOld.TileColumns.Add(TableColumnDefinition16)
+        Me.ChatViewOld.TileRows.Add(TableRowDefinition17)
+        Me.ChatViewOld.TileRows.Add(TableRowDefinition18)
         '
         'btnSendMessage
         '
         Me.btnSendMessage.Dock = System.Windows.Forms.DockStyle.Right
         Me.btnSendMessage.ImageOptions.Image = CType(resources.GetObject("btnSendMessage.ImageOptions.Image"), System.Drawing.Image)
         Me.btnSendMessage.ImageOptions.Location = DevExpress.XtraEditors.ImageLocation.MiddleCenter
-        Me.btnSendMessage.Location = New System.Drawing.Point(373, 0)
+        Me.btnSendMessage.Location = New System.Drawing.Point(372, 0)
         Me.btnSendMessage.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.btnSendMessage.Name = "btnSendMessage"
         Me.btnSendMessage.PaintStyle = DevExpress.XtraEditors.Controls.PaintStyles.Light
@@ -323,14 +323,14 @@ Partial Class ChatControl
         'pnlMessage
         '
         Me.pnlMessage.BackColor = System.Drawing.Color.DimGray
-        Me.pnlMessage.Controls.Add(Me.ListBoxUserMention)
         Me.pnlMessage.Controls.Add(Me.RichTextBox1)
         Me.pnlMessage.Controls.Add(Me.btnSendMessage)
+        Me.pnlMessage.Controls.Add(Me.ListBoxUserMention)
         Me.pnlMessage.Dock = System.Windows.Forms.DockStyle.Bottom
         Me.pnlMessage.Location = New System.Drawing.Point(0, 485)
         Me.pnlMessage.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.pnlMessage.Name = "pnlMessage"
-        Me.pnlMessage.Size = New System.Drawing.Size(422, 102)
+        Me.pnlMessage.Size = New System.Drawing.Size(421, 102)
         Me.pnlMessage.TabIndex = 3
         '
         'ListBoxUserMention
@@ -340,7 +340,7 @@ Partial Class ChatControl
         Me.ListBoxUserMention.ForeColor = System.Drawing.Color.Blue
         Me.ListBoxUserMention.FormattingEnabled = True
         Me.ListBoxUserMention.ItemHeight = 16
-        Me.ListBoxUserMention.Location = New System.Drawing.Point(191, 22)
+        Me.ListBoxUserMention.Location = New System.Drawing.Point(176, 17)
         Me.ListBoxUserMention.Name = "ListBoxUserMention"
         Me.ListBoxUserMention.Size = New System.Drawing.Size(129, 80)
         Me.ListBoxUserMention.TabIndex = 4
@@ -349,10 +349,11 @@ Partial Class ChatControl
         'RichTextBox1
         '
         Me.RichTextBox1.AutoWordSelection = True
-        Me.RichTextBox1.Location = New System.Drawing.Point(10, 6)
+        Me.RichTextBox1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.RichTextBox1.Location = New System.Drawing.Point(0, 0)
         Me.RichTextBox1.Name = "RichTextBox1"
         Me.RichTextBox1.ShowSelectionMargin = True
-        Me.RichTextBox1.Size = New System.Drawing.Size(353, 91)
+        Me.RichTextBox1.Size = New System.Drawing.Size(372, 102)
         Me.RichTextBox1.TabIndex = 3
         Me.RichTextBox1.Text = ""
         '
@@ -361,7 +362,7 @@ Partial Class ChatControl
         Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsmitmTitle, Me.tsmenitmHamburger, Me.TeilnehmerToolStripMenuItem})
         Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
         Me.MenuStrip1.Name = "MenuStrip1"
-        Me.MenuStrip1.Size = New System.Drawing.Size(422, 25)
+        Me.MenuStrip1.Size = New System.Drawing.Size(421, 25)
         Me.MenuStrip1.TabIndex = 4
         Me.MenuStrip1.Text = "MenuStrip1"
         '
@@ -404,11 +405,13 @@ Partial Class ChatControl
         '
         'GridChat
         '
+        Me.GridChat.BackgroundImage = Global.DigitalData.Controls.ChatControl.My.Resources.Resources.crop_php
+        Me.GridChat.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
         Me.GridChat.Dock = System.Windows.Forms.DockStyle.Fill
         Me.GridChat.Location = New System.Drawing.Point(0, 238)
         Me.GridChat.MainView = Me.ChatView
         Me.GridChat.Name = "GridChat"
-        Me.GridChat.Size = New System.Drawing.Size(422, 247)
+        Me.GridChat.Size = New System.Drawing.Size(421, 247)
         Me.GridChat.TabIndex = 5
         Me.GridChat.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ChatView})
         '
@@ -429,7 +432,7 @@ Partial Class ChatControl
         Me.ChatView.OptionsView.ShowVerticalLines = DevExpress.Utils.DefaultBoolean.[False]
         Me.ChatView.PreviewFieldName = "MESSAGE_TEXT"
         Me.ChatView.RowHeight = 25
-        Me.ChatView.RowSeparatorHeight = 25
+        Me.ChatView.RowSeparatorHeight = 5
         '
         'columnFromUser
         '
@@ -472,7 +475,7 @@ Partial Class ChatControl
         Me.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.Name = "ChatControl"
-        Me.Size = New System.Drawing.Size(422, 587)
+        Me.Size = New System.Drawing.Size(421, 587)
         CType(Me.RepositoryItemHypertextLabel1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.RepositoryItemHyperLinkEdit1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.GridChatOld, System.ComponentModel.ISupportInitialize).EndInit()

Controls.ChatControl/ChatControl.vb

@@ -433,12 +433,12 @@ Public Class ChatControl
 
         ' Eigene Nachrichten
         If oIsOwnMessage Then
-            e.Appearance.BackColor = Color.PaleTurquoise
+            e.Appearance.BackColor = Color.White
         End If
 
         ' Andere Nachrichten
         If Not oIsOwnMessage Then
-            e.Appearance.BackColor = Color.White
+            e.Appearance.BackColor = Color.PaleTurquoise
         End If
     End Sub
 
@@ -451,28 +451,19 @@ Public Class ChatControl
 
         ' Eigene Nachrichten
         If oIsOwnMessage Then
-            ' Benutzername
-            If e.Column.FieldName = IdentificationColumn Then
-                e.Appearance.ForeColor = Color.Purple
-            End If
-
-            e.Appearance.BackColor = Color.PaleTurquoise
+            e.Appearance.BackColor = Color.White
         End If
 
         ' Andere Nachrichten
         If Not oIsOwnMessage Then
-            If e.Column.FieldName = IdentificationColumn Then
-                e.Appearance.ForeColor = Color.Red
-            End If
-
             If Not (IsNothing(oToUser) Or IsDBNull(oToUser)) Then
                 If oToUser = Username Or oToUser = ConversationIdentification Then
                     e.Appearance.BackColor = Color.LightSalmon
                 Else
-                    e.Appearance.BackColor = Color.White
+                    e.Appearance.BackColor = Color.PaleTurquoise
                 End If
             Else
-                e.Appearance.BackColor = Color.White
+                e.Appearance.BackColor = Color.PaleTurquoise
             End If
         End If
     End Sub