_ Partial Class ChatControl Inherits System.Windows.Forms.UserControl 'UserControl1 überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Wird vom Windows Form-Designer benötigt. Private components As System.ComponentModel.IContainer 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. 'Das Bearbeiten ist mit dem Windows Form-Designer möglich. 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim ItemTemplate3 As DevExpress.XtraGrid.Views.Tile.ItemTemplate = New DevExpress.XtraGrid.Views.Tile.ItemTemplate() 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 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 TableRowDefinition7 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition() Dim TableRowDefinition8 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 TileViewItemElement10 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 TileViewItemElement12 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement() Dim TableRowDefinition9 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition() Dim TableRowDefinition10 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition() 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 TableRowDefinition11 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition() Dim TableRowDefinition12 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition() Me.columnUsername = New DevExpress.XtraGrid.Columns.TileViewColumn() Me.columnMessage = New DevExpress.XtraGrid.Columns.TileViewColumn() Me.columnDate = New DevExpress.XtraGrid.Columns.TileViewColumn() Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl() Me.GridChat = New DevExpress.XtraGrid.GridControl() Me.ChatView = New DevExpress.XtraGrid.Views.Tile.TileView() Me.txtMessage = New DevExpress.XtraEditors.MemoEdit() Me.ChatSource = New System.Windows.Forms.BindingSource(Me.components) CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SplitContainerControl1.SuspendLayout() CType(Me.GridChat, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.ChatView, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.txtMessage.Properties, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.ChatSource, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'columnUsername ' Me.columnUsername.FieldName = "USERNAME" Me.columnUsername.Name = "columnUsername" Me.columnUsername.Visible = True Me.columnUsername.VisibleIndex = 1 ' 'columnMessage ' Me.columnMessage.FieldName = "MESSAGE" Me.columnMessage.Name = "columnMessage" Me.columnMessage.Visible = True Me.columnMessage.VisibleIndex = 0 ' 'columnDate ' Me.columnDate.FieldName = "DATE" Me.columnDate.Name = "columnDate" Me.columnDate.Visible = True Me.columnDate.VisibleIndex = 2 ' 'SplitContainerControl1 ' Me.SplitContainerControl1.Dock = System.Windows.Forms.DockStyle.Fill Me.SplitContainerControl1.FixedPanel = DevExpress.XtraEditors.SplitFixedPanel.Panel2 Me.SplitContainerControl1.Horizontal = False Me.SplitContainerControl1.IsSplitterFixed = True Me.SplitContainerControl1.Location = New System.Drawing.Point(0, 0) Me.SplitContainerControl1.Name = "SplitContainerControl1" Me.SplitContainerControl1.Panel1.Controls.Add(Me.GridChat) Me.SplitContainerControl1.Panel1.Text = "Panel1" Me.SplitContainerControl1.Panel2.Controls.Add(Me.txtMessage) Me.SplitContainerControl1.Panel2.Text = "Panel2" Me.SplitContainerControl1.Size = New System.Drawing.Size(317, 314) Me.SplitContainerControl1.SplitterPosition = 50 Me.SplitContainerControl1.TabIndex = 0 ' 'GridChat ' Me.GridChat.Dock = System.Windows.Forms.DockStyle.Fill Me.GridChat.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.GridChat.Location = New System.Drawing.Point(0, 0) Me.GridChat.MainView = Me.ChatView Me.GridChat.Name = "GridChat" Me.GridChat.Size = New System.Drawing.Size(317, 254) Me.GridChat.TabIndex = 0 Me.GridChat.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ChatView}) ' 'ChatView ' Me.ChatView.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.columnMessage, Me.columnUsername, Me.columnDate}) Me.ChatView.GridControl = Me.GridChat Me.ChatView.Name = "ChatView" Me.ChatView.OptionsTiles.GroupTextPadding = New System.Windows.Forms.Padding(0) Me.ChatView.OptionsTiles.IndentBetweenGroups = 0 Me.ChatView.OptionsTiles.IndentBetweenItems = 0 Me.ChatView.OptionsTiles.ItemPadding = New System.Windows.Forms.Padding(0) Me.ChatView.OptionsTiles.ItemSize = New System.Drawing.Size(374, 64) Me.ChatView.OptionsTiles.LayoutMode = DevExpress.XtraGrid.Views.Tile.TileViewLayoutMode.List Me.ChatView.OptionsTiles.Orientation = System.Windows.Forms.Orientation.Vertical Me.ChatView.OptionsTiles.RowCount = 0 Me.ChatView.OptionsTiles.ScrollMode = DevExpress.XtraEditors.TileControlScrollMode.ScrollButtons TableColumnDefinition7.Length.Value = 250.0R TableColumnDefinition8.Length.Value = 100.0R ItemTemplate3.Columns.Add(TableColumnDefinition7) ItemTemplate3.Columns.Add(TableColumnDefinition8) TileViewItemElement7.Column = Me.columnUsername TileViewItemElement7.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter TileViewItemElement7.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside 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 = 1 TileViewItemElement8.Text = "columnMessage" TileViewItemElement8.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft 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.Text = "columnDate" TileViewItemElement9.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight TileViewItemElement9.TextLocation = New System.Drawing.Point(-10, 0) ItemTemplate3.Elements.Add(TileViewItemElement7) ItemTemplate3.Elements.Add(TileViewItemElement8) ItemTemplate3.Elements.Add(TileViewItemElement9) ItemTemplate3.Name = "ChatLeft" TableRowDefinition7.Length.Value = 24.0R TableRowDefinition8.Length.Value = 24.0R ItemTemplate3.Rows.Add(TableRowDefinition7) ItemTemplate3.Rows.Add(TableRowDefinition8) TableColumnDefinition9.Length.Value = 100.0R TableColumnDefinition10.Length.Value = 250.0R ItemTemplate4.Columns.Add(TableColumnDefinition9) ItemTemplate4.Columns.Add(TableColumnDefinition10) TileViewItemElement10.Column = Me.columnUsername TileViewItemElement10.ColumnIndex = 1 TileViewItemElement10.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter TileViewItemElement10.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside TileViewItemElement10.Text = "columnUsername" TileViewItemElement10.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight TileViewItemElement10.TextLocation = New System.Drawing.Point(-10, 0) TileViewItemElement11.Column = Me.columnMessage TileViewItemElement11.ColumnIndex = 1 TileViewItemElement11.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter TileViewItemElement11.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside TileViewItemElement11.RowIndex = 1 TileViewItemElement11.Text = "columnMessage" TileViewItemElement11.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight TileViewItemElement11.TextLocation = New System.Drawing.Point(-10, 0) TileViewItemElement12.Column = Me.columnDate TileViewItemElement12.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter TileViewItemElement12.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside TileViewItemElement12.Text = "columnDate" TileViewItemElement12.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft TileViewItemElement12.TextLocation = New System.Drawing.Point(10, 0) ItemTemplate4.Elements.Add(TileViewItemElement10) ItemTemplate4.Elements.Add(TileViewItemElement11) ItemTemplate4.Elements.Add(TileViewItemElement12) ItemTemplate4.Name = "ChatRight" TableRowDefinition9.Length.Value = 24.0R TableRowDefinition10.Length.Value = 24.0R ItemTemplate4.Rows.Add(TableRowDefinition9) ItemTemplate4.Rows.Add(TableRowDefinition10) Me.ChatView.Templates.Add(ItemTemplate3) Me.ChatView.Templates.Add(ItemTemplate4) Me.ChatView.TileColumns.Add(TableColumnDefinition11) Me.ChatView.TileColumns.Add(TableColumnDefinition12) Me.ChatView.TileRows.Add(TableRowDefinition11) Me.ChatView.TileRows.Add(TableRowDefinition12) ' 'txtMessage ' Me.txtMessage.Dock = System.Windows.Forms.DockStyle.Fill Me.txtMessage.Location = New System.Drawing.Point(0, 0) Me.txtMessage.Name = "txtMessage" Me.txtMessage.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.txtMessage.Properties.Appearance.Options.UseFont = True Me.txtMessage.Size = New System.Drawing.Size(317, 50) Me.txtMessage.TabIndex = 1 ' 'ChatControl ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.Controls.Add(Me.SplitContainerControl1) Me.Name = "ChatControl" Me.Size = New System.Drawing.Size(317, 314) CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).EndInit() Me.SplitContainerControl1.ResumeLayout(False) CType(Me.GridChat, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.ChatView, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.txtMessage.Properties, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.ChatSource, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub Friend WithEvents SplitContainerControl1 As DevExpress.XtraEditors.SplitContainerControl Friend WithEvents GridChat As DevExpress.XtraGrid.GridControl Friend WithEvents ChatView As DevExpress.XtraGrid.Views.Tile.TileView Friend WithEvents txtMessage As DevExpress.XtraEditors.MemoEdit Friend WithEvents columnMessage As DevExpress.XtraGrid.Columns.TileViewColumn Friend WithEvents columnUsername As DevExpress.XtraGrid.Columns.TileViewColumn Friend WithEvents columnDate As DevExpress.XtraGrid.Columns.TileViewColumn Friend WithEvents ChatSource As BindingSource End Class