neu
This commit is contained in:
@@ -24,12 +24,15 @@ Partial Class usrCntlMessenger_ChatElement
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Me.pnl = New System.Windows.Forms.Panel()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.txtChatmessage = New VERAG_PROG_ALLGEMEIN.MyRichTextBox()
|
||||
Me.lblDel = New System.Windows.Forms.Label()
|
||||
Me.lblDateTime = New System.Windows.Forms.Label()
|
||||
Me.lblName = New System.Windows.Forms.Label()
|
||||
Me.lblNewMsg = New System.Windows.Forms.Label()
|
||||
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.txtChatmessage = New VERAG_PROG_ALLGEMEIN.MyRichTextBox()
|
||||
Me.pnl.SuspendLayout()
|
||||
Me.Panel1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
@@ -52,29 +55,26 @@ Partial Class usrCntlMessenger_ChatElement
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Panel1.BackColor = System.Drawing.Color.Azure
|
||||
Me.Panel1.Controls.Add(Me.lblDel)
|
||||
Me.Panel1.Controls.Add(Me.txtChatmessage)
|
||||
Me.Panel1.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Panel1.Name = "Panel1"
|
||||
Me.Panel1.Size = New System.Drawing.Size(375, 32)
|
||||
Me.Panel1.TabIndex = 2
|
||||
'
|
||||
'txtChatmessage
|
||||
'lblDel
|
||||
'
|
||||
Me.txtChatmessage.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.txtChatmessage.BackColor = System.Drawing.Color.Azure
|
||||
Me.txtChatmessage.BorderStyle = System.Windows.Forms.BorderStyle.None
|
||||
Me.txtChatmessage.Font = New System.Drawing.Font("Comic Sans MS", 12.0!)
|
||||
Me.txtChatmessage.Location = New System.Drawing.Point(4, 4)
|
||||
Me.txtChatmessage.MaxLineLength = -1
|
||||
Me.txtChatmessage.MaxLines_Warning = ""
|
||||
Me.txtChatmessage.MaxLines_Warning_Label = Nothing
|
||||
Me.txtChatmessage.Name = "txtChatmessage"
|
||||
Me.txtChatmessage.ReadOnly = True
|
||||
Me.txtChatmessage.Size = New System.Drawing.Size(368, 25)
|
||||
Me.txtChatmessage.TabIndex = 0
|
||||
Me.txtChatmessage.Text = "Hallo, wie gehts?"
|
||||
Me.lblDel.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lblDel.AutoSize = True
|
||||
Me.lblDel.BackColor = System.Drawing.Color.Red
|
||||
Me.lblDel.Font = New System.Drawing.Font("Arial Black", 7.0!, System.Drawing.FontStyle.Bold)
|
||||
Me.lblDel.ForeColor = System.Drawing.Color.White
|
||||
Me.lblDel.Location = New System.Drawing.Point(357, 0)
|
||||
Me.lblDel.Name = "lblDel"
|
||||
Me.lblDel.Size = New System.Drawing.Size(15, 14)
|
||||
Me.lblDel.TabIndex = 5
|
||||
Me.lblDel.Text = "X"
|
||||
Me.lblDel.Visible = False
|
||||
'
|
||||
'lblDateTime
|
||||
'
|
||||
@@ -114,6 +114,28 @@ Partial Class usrCntlMessenger_ChatElement
|
||||
Me.lblNewMsg.Text = "!"
|
||||
Me.lblNewMsg.Visible = False
|
||||
'
|
||||
'Timer1
|
||||
'
|
||||
Me.Timer1.Interval = 2000
|
||||
'
|
||||
'txtChatmessage
|
||||
'
|
||||
Me.txtChatmessage.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.txtChatmessage.BackColor = System.Drawing.Color.Azure
|
||||
Me.txtChatmessage.BorderStyle = System.Windows.Forms.BorderStyle.None
|
||||
Me.txtChatmessage.Font = New System.Drawing.Font("Comic Sans MS", 12.0!)
|
||||
Me.txtChatmessage.Location = New System.Drawing.Point(4, 4)
|
||||
Me.txtChatmessage.MaxLineLength = -1
|
||||
Me.txtChatmessage.MaxLines_Warning = ""
|
||||
Me.txtChatmessage.MaxLines_Warning_Label = Nothing
|
||||
Me.txtChatmessage.Name = "txtChatmessage"
|
||||
Me.txtChatmessage.ReadOnly = True
|
||||
Me.txtChatmessage.Size = New System.Drawing.Size(368, 25)
|
||||
Me.txtChatmessage.TabIndex = 0
|
||||
Me.txtChatmessage.Text = "Hallo, wie gehts?"
|
||||
'
|
||||
'usrCntlMessenger_ChatElement
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
@@ -125,6 +147,7 @@ Partial Class usrCntlMessenger_ChatElement
|
||||
Me.pnl.ResumeLayout(False)
|
||||
Me.pnl.PerformLayout()
|
||||
Me.Panel1.ResumeLayout(False)
|
||||
Me.Panel1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
@@ -135,4 +158,6 @@ Partial Class usrCntlMessenger_ChatElement
|
||||
Friend WithEvents Panel1 As Panel
|
||||
Friend WithEvents txtChatmessage As VERAG_PROG_ALLGEMEIN.MyRichTextBox
|
||||
Friend WithEvents lblNewMsg As Label
|
||||
Friend WithEvents lblDel As Label
|
||||
Friend WithEvents Timer1 As Timer
|
||||
End Class
|
||||
|
||||
Reference in New Issue
Block a user