Dakosy, Chat, Feiertage, Formulare (AMBAR)

This commit is contained in:
2022-11-08 08:51:59 +01:00
parent 24b9746817
commit 1496d88118
17 changed files with 1233 additions and 1015 deletions

View File

@@ -24,6 +24,7 @@ Partial Class frmMessenger
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
@@ -32,13 +33,15 @@ Partial Class frmMessenger
Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMessenger))
Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Me.SplitContainer = New System.Windows.Forms.SplitContainer()
Me.SplitContainer2 = New System.Windows.Forms.SplitContainer()
Me.dgvChats = New VERAG_PROG_ALLGEMEIN.MyDatagridview()
Me.dgvChats = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.Panel6 = New System.Windows.Forms.Panel()
Me.cbxInaktiveChats = New System.Windows.Forms.CheckBox()
Me.DGVSonstige = New VERAG_PROG_ALLGEMEIN.MyDatagridview()
Me.DGVSonstige = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.Panel5 = New System.Windows.Forms.Panel()
Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.PictureBox2 = New System.Windows.Forms.PictureBox()
@@ -49,34 +52,50 @@ Partial Class frmMessenger
Me.Panel2 = New System.Windows.Forms.Panel()
Me.CheckBox1 = New System.Windows.Forms.CheckBox()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.FlowLayoutPanel1 = New System.Windows.Forms.FlowLayoutPanel()
Me.UsrCntlChat_Art_Btn_MACHAT = New VERAG_PROG_ALLGEMEIN.usrCntlChat_Art_Btn()
Me.UsrCntlChat_Art_Btn_LKWCHAT = New VERAG_PROG_ALLGEMEIN.usrCntlChat_Art_Btn()
Me.UsrCntlChat_Art_Btn_SNDCHAT = New VERAG_PROG_ALLGEMEIN.usrCntlChat_Art_Btn()
Me.MyTextBox1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
Me.lbl = New System.Windows.Forms.Label()
Me.Button2 = New System.Windows.Forms.Button()
Me.Button1 = New System.Windows.Forms.Button()
Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
Me.MyFlowLayoutPanel1 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel()
Me.MyFlowLayoutPanel1 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
Me.UsrCntlMessenger_ChatElement1 = New VERAG_PROG_ALLGEMEIN.usrCntlMessenger_ChatElement()
Me.UsrCntlMessenger_ChatAnhang1 = New VERAG_PROG_ALLGEMEIN.usrCntlMessenger_ChatAnhang()
Me.UsrCntlMessenger_ChatElement2 = New VERAG_PROG_ALLGEMEIN.usrCntlMessenger_ChatElement()
Me.UsrCntlMessenger_ChatElement3 = New VERAG_PROG_ALLGEMEIN.usrCntlMessenger_ChatElement()
Me.Panel3 = New System.Windows.Forms.Panel()
Me.btnTeilnehmer = New System.Windows.Forms.Button()
Me.Panel4 = New System.Windows.Forms.Panel()
Me.lblChatName = New System.Windows.Forms.Label()
Me.lblOnlineOffline = New System.Windows.Forms.Label()
Me.pnl = New System.Windows.Forms.Panel()
Me.Button6 = New System.Windows.Forms.Button()
Me.Button4 = New System.Windows.Forms.Button()
Me.pic = New System.Windows.Forms.PictureBox()
Me.SplitContainer3 = New System.Windows.Forms.SplitContainer()
Me.pnlTeilnehmer = New System.Windows.Forms.Panel()
Me.Label4 = New System.Windows.Forms.Label()
Me.dgvChatMembers = New System.Windows.Forms.DataGridView()
Me.clmnMaId = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.clmnName = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.clmnFirma = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.Panel8 = New System.Windows.Forms.Panel()
Me.Label2 = New System.Windows.Forms.Label()
Me.Panel9 = New System.Windows.Forms.Panel()
Me.Button7 = New System.Windows.Forms.Button()
Me.Button5 = New System.Windows.Forms.Button()
Me.FlowLayoutPanel = New System.Windows.Forms.FlowLayoutPanel()
Me.Button6 = New System.Windows.Forms.Button()
Me.pic = New System.Windows.Forms.PictureBox()
Me.Button3 = New System.Windows.Forms.Button()
Me.btn = New System.Windows.Forms.Button()
Me.rtbChatMessage = New System.Windows.Forms.RichTextBox()
Me.TimerNEW_MESSAGE = New System.Windows.Forms.Timer()
Me.Timer_REFRESH = New System.Windows.Forms.Timer()
Me.cntxt = New System.Windows.Forms.ContextMenuStrip()
Me.TimerNEW_MESSAGE = New System.Windows.Forms.Timer(Me.components)
Me.Timer_REFRESH = New System.Windows.Forms.Timer(Me.components)
Me.cntxt = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ChatDeaktivierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn3 = New System.Windows.Forms.DataGridViewTextBoxColumn()
CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainer.Panel1.SuspendLayout()
Me.SplitContainer.Panel2.SuspendLayout()
@@ -92,6 +111,7 @@ Partial Class frmMessenger
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Panel2.SuspendLayout()
Me.Panel1.SuspendLayout()
Me.FlowLayoutPanel1.SuspendLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainer1.Panel1.SuspendLayout()
@@ -100,6 +120,14 @@ Partial Class frmMessenger
Me.MyFlowLayoutPanel1.SuspendLayout()
Me.Panel3.SuspendLayout()
Me.pnl.SuspendLayout()
CType(Me.SplitContainer3, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainer3.Panel1.SuspendLayout()
Me.SplitContainer3.Panel2.SuspendLayout()
Me.SplitContainer3.SuspendLayout()
Me.pnlTeilnehmer.SuspendLayout()
CType(Me.dgvChatMembers, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Panel8.SuspendLayout()
Me.Panel9.SuspendLayout()
CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
Me.cntxt.SuspendLayout()
Me.SuspendLayout()
@@ -107,6 +135,7 @@ Partial Class frmMessenger
'SplitContainer
'
Me.SplitContainer.Dock = System.Windows.Forms.DockStyle.Fill
Me.SplitContainer.FixedPanel = System.Windows.Forms.FixedPanel.Panel1
Me.SplitContainer.Location = New System.Drawing.Point(0, 0)
Me.SplitContainer.Name = "SplitContainer"
'
@@ -120,14 +149,14 @@ Partial Class frmMessenger
'SplitContainer.Panel2
'
Me.SplitContainer.Panel2.Controls.Add(Me.SplitContainer1)
Me.SplitContainer.Size = New System.Drawing.Size(821, 1052)
Me.SplitContainer.SplitterDistance = 274
Me.SplitContainer.Size = New System.Drawing.Size(912, 922)
Me.SplitContainer.SplitterDistance = 275
Me.SplitContainer.TabIndex = 0
'
'SplitContainer2
'
Me.SplitContainer2.Dock = System.Windows.Forms.DockStyle.Fill
Me.SplitContainer2.Location = New System.Drawing.Point(0, 63)
Me.SplitContainer2.Location = New System.Drawing.Point(0, 105)
Me.SplitContainer2.Margin = New System.Windows.Forms.Padding(2)
Me.SplitContainer2.Name = "SplitContainer2"
Me.SplitContainer2.Orientation = System.Windows.Forms.Orientation.Horizontal
@@ -142,7 +171,7 @@ Partial Class frmMessenger
Me.SplitContainer2.Panel2.Controls.Add(Me.DGVSonstige)
Me.SplitContainer2.Panel2.Controls.Add(Me.Panel5)
Me.SplitContainer2.Panel2Collapsed = True
Me.SplitContainer2.Size = New System.Drawing.Size(274, 966)
Me.SplitContainer2.Size = New System.Drawing.Size(275, 794)
Me.SplitContainer2.SplitterDistance = 590
Me.SplitContainer2.SplitterWidth = 3
Me.SplitContainer2.TabIndex = 8
@@ -191,16 +220,16 @@ Partial Class frmMessenger
Me.dgvChats.RowsDefaultCellStyle = DataGridViewCellStyle4
Me.dgvChats.RowTemplate.Height = 30
Me.dgvChats.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
Me.dgvChats.Size = New System.Drawing.Size(274, 945)
Me.dgvChats.Size = New System.Drawing.Size(275, 773)
Me.dgvChats.TabIndex = 0
'
'Panel6
'
Me.Panel6.Controls.Add(Me.cbxInaktiveChats)
Me.Panel6.Dock = System.Windows.Forms.DockStyle.Bottom
Me.Panel6.Location = New System.Drawing.Point(0, 945)
Me.Panel6.Location = New System.Drawing.Point(0, 773)
Me.Panel6.Name = "Panel6"
Me.Panel6.Size = New System.Drawing.Size(274, 21)
Me.Panel6.Size = New System.Drawing.Size(275, 21)
Me.Panel6.TabIndex = 7
'
'cbxInaktiveChats
@@ -361,9 +390,9 @@ Partial Class frmMessenger
'
Me.Panel2.Controls.Add(Me.CheckBox1)
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Bottom
Me.Panel2.Location = New System.Drawing.Point(0, 1029)
Me.Panel2.Location = New System.Drawing.Point(0, 899)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(274, 23)
Me.Panel2.Size = New System.Drawing.Size(275, 23)
Me.Panel2.TabIndex = 6
'
'CheckBox1
@@ -380,6 +409,7 @@ Partial Class frmMessenger
'Panel1
'
Me.Panel1.BackColor = System.Drawing.Color.White
Me.Panel1.Controls.Add(Me.FlowLayoutPanel1)
Me.Panel1.Controls.Add(Me.MyTextBox1)
Me.Panel1.Controls.Add(Me.PictureBox1)
Me.Panel1.Controls.Add(Me.lbl)
@@ -388,9 +418,50 @@ Partial Class frmMessenger
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
Me.Panel1.Location = New System.Drawing.Point(0, 0)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(274, 63)
Me.Panel1.Size = New System.Drawing.Size(275, 105)
Me.Panel1.TabIndex = 1
'
'FlowLayoutPanel1
'
Me.FlowLayoutPanel1.Controls.Add(Me.UsrCntlChat_Art_Btn_MACHAT)
Me.FlowLayoutPanel1.Controls.Add(Me.UsrCntlChat_Art_Btn_LKWCHAT)
Me.FlowLayoutPanel1.Controls.Add(Me.UsrCntlChat_Art_Btn_SNDCHAT)
Me.FlowLayoutPanel1.Location = New System.Drawing.Point(0, 74)
Me.FlowLayoutPanel1.Margin = New System.Windows.Forms.Padding(1)
Me.FlowLayoutPanel1.Name = "FlowLayoutPanel1"
Me.FlowLayoutPanel1.Size = New System.Drawing.Size(275, 30)
Me.FlowLayoutPanel1.TabIndex = 10
'
'UsrCntlChat_Art_Btn_MACHAT
'
Me.UsrCntlChat_Art_Btn_MACHAT._aktiv = True
Me.UsrCntlChat_Art_Btn_MACHAT._name = "Allgemein"
Me.UsrCntlChat_Art_Btn_MACHAT.Location = New System.Drawing.Point(0, 0)
Me.UsrCntlChat_Art_Btn_MACHAT.Margin = New System.Windows.Forms.Padding(0)
Me.UsrCntlChat_Art_Btn_MACHAT.Name = "UsrCntlChat_Art_Btn_MACHAT"
Me.UsrCntlChat_Art_Btn_MACHAT.Size = New System.Drawing.Size(90, 29)
Me.UsrCntlChat_Art_Btn_MACHAT.TabIndex = 8
'
'UsrCntlChat_Art_Btn_LKWCHAT
'
Me.UsrCntlChat_Art_Btn_LKWCHAT._aktiv = False
Me.UsrCntlChat_Art_Btn_LKWCHAT._name = "LKW"
Me.UsrCntlChat_Art_Btn_LKWCHAT.Location = New System.Drawing.Point(90, 0)
Me.UsrCntlChat_Art_Btn_LKWCHAT.Margin = New System.Windows.Forms.Padding(0)
Me.UsrCntlChat_Art_Btn_LKWCHAT.Name = "UsrCntlChat_Art_Btn_LKWCHAT"
Me.UsrCntlChat_Art_Btn_LKWCHAT.Size = New System.Drawing.Size(90, 29)
Me.UsrCntlChat_Art_Btn_LKWCHAT.TabIndex = 9
'
'UsrCntlChat_Art_Btn_SNDCHAT
'
Me.UsrCntlChat_Art_Btn_SNDCHAT._aktiv = False
Me.UsrCntlChat_Art_Btn_SNDCHAT._name = "Sendung"
Me.UsrCntlChat_Art_Btn_SNDCHAT.Location = New System.Drawing.Point(180, 0)
Me.UsrCntlChat_Art_Btn_SNDCHAT.Margin = New System.Windows.Forms.Padding(0)
Me.UsrCntlChat_Art_Btn_SNDCHAT.Name = "UsrCntlChat_Art_Btn_SNDCHAT"
Me.UsrCntlChat_Art_Btn_SNDCHAT.Size = New System.Drawing.Size(90, 29)
Me.UsrCntlChat_Art_Btn_SNDCHAT.TabIndex = 10
'
'MyTextBox1
'
Me.MyTextBox1._DateTimeOnly = False
@@ -463,6 +534,7 @@ Partial Class frmMessenger
'SplitContainer1
'
Me.SplitContainer1.Dock = System.Windows.Forms.DockStyle.Fill
Me.SplitContainer1.FixedPanel = System.Windows.Forms.FixedPanel.Panel2
Me.SplitContainer1.Location = New System.Drawing.Point(0, 0)
Me.SplitContainer1.Name = "SplitContainer1"
Me.SplitContainer1.Orientation = System.Windows.Forms.Orientation.Horizontal
@@ -475,8 +547,8 @@ Partial Class frmMessenger
'SplitContainer1.Panel2
'
Me.SplitContainer1.Panel2.Controls.Add(Me.pnl)
Me.SplitContainer1.Size = New System.Drawing.Size(543, 1052)
Me.SplitContainer1.SplitterDistance = 728
Me.SplitContainer1.Size = New System.Drawing.Size(633, 922)
Me.SplitContainer1.SplitterDistance = 600
Me.SplitContainer1.TabIndex = 0
'
'MyFlowLayoutPanel1
@@ -484,13 +556,10 @@ Partial Class frmMessenger
Me.MyFlowLayoutPanel1.AutoScroll = True
Me.MyFlowLayoutPanel1.BackColor = System.Drawing.Color.White
Me.MyFlowLayoutPanel1.Controls.Add(Me.UsrCntlMessenger_ChatElement1)
Me.MyFlowLayoutPanel1.Controls.Add(Me.UsrCntlMessenger_ChatAnhang1)
Me.MyFlowLayoutPanel1.Controls.Add(Me.UsrCntlMessenger_ChatElement2)
Me.MyFlowLayoutPanel1.Controls.Add(Me.UsrCntlMessenger_ChatElement3)
Me.MyFlowLayoutPanel1.Dock = System.Windows.Forms.DockStyle.Fill
Me.MyFlowLayoutPanel1.Location = New System.Drawing.Point(0, 44)
Me.MyFlowLayoutPanel1.Name = "MyFlowLayoutPanel1"
Me.MyFlowLayoutPanel1.Size = New System.Drawing.Size(543, 684)
Me.MyFlowLayoutPanel1.Size = New System.Drawing.Size(633, 556)
Me.MyFlowLayoutPanel1.TabIndex = 0
'
'UsrCntlMessenger_ChatElement1
@@ -502,38 +571,7 @@ Partial Class frmMessenger
Me.UsrCntlMessenger_ChatElement1.Name = "UsrCntlMessenger_ChatElement1"
Me.UsrCntlMessenger_ChatElement1.Size = New System.Drawing.Size(378, 48)
Me.UsrCntlMessenger_ChatElement1.TabIndex = 4
'
'UsrCntlMessenger_ChatAnhang1
'
Me.UsrCntlMessenger_ChatAnhang1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.UsrCntlMessenger_ChatAnhang1.BackColor = System.Drawing.Color.White
Me.UsrCntlMessenger_ChatAnhang1.BG_COLOR = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
Me.UsrCntlMessenger_ChatAnhang1.CHAT_MSG = Nothing
Me.UsrCntlMessenger_ChatAnhang1.Location = New System.Drawing.Point(4, 63)
Me.UsrCntlMessenger_ChatAnhang1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
Me.UsrCntlMessenger_ChatAnhang1.Name = "UsrCntlMessenger_ChatAnhang1"
Me.UsrCntlMessenger_ChatAnhang1.Size = New System.Drawing.Size(378, 72)
Me.UsrCntlMessenger_ChatAnhang1.TabIndex = 3
'
'UsrCntlMessenger_ChatElement2
'
Me.UsrCntlMessenger_ChatElement2.BackColor = System.Drawing.Color.White
Me.UsrCntlMessenger_ChatElement2.CHAT_MSG = Nothing
Me.UsrCntlMessenger_ChatElement2.Location = New System.Drawing.Point(4, 145)
Me.UsrCntlMessenger_ChatElement2.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
Me.UsrCntlMessenger_ChatElement2.Name = "UsrCntlMessenger_ChatElement2"
Me.UsrCntlMessenger_ChatElement2.Size = New System.Drawing.Size(378, 48)
Me.UsrCntlMessenger_ChatElement2.TabIndex = 5
'
'UsrCntlMessenger_ChatElement3
'
Me.UsrCntlMessenger_ChatElement3.BackColor = System.Drawing.Color.White
Me.UsrCntlMessenger_ChatElement3.CHAT_MSG = Nothing
Me.UsrCntlMessenger_ChatElement3.Location = New System.Drawing.Point(4, 203)
Me.UsrCntlMessenger_ChatElement3.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
Me.UsrCntlMessenger_ChatElement3.Name = "UsrCntlMessenger_ChatElement3"
Me.UsrCntlMessenger_ChatElement3.Size = New System.Drawing.Size(378, 48)
Me.UsrCntlMessenger_ChatElement3.TabIndex = 6
Me.UsrCntlMessenger_ChatElement1.Visible = False
'
'Panel3
'
@@ -545,7 +583,7 @@ Partial Class frmMessenger
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Top
Me.Panel3.Location = New System.Drawing.Point(0, 0)
Me.Panel3.Name = "Panel3"
Me.Panel3.Size = New System.Drawing.Size(543, 44)
Me.Panel3.Size = New System.Drawing.Size(633, 44)
Me.Panel3.TabIndex = 9
'
'btnTeilnehmer
@@ -556,7 +594,7 @@ Partial Class frmMessenger
Me.btnTeilnehmer.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.btnTeilnehmer.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnTeilnehmer.ForeColor = System.Drawing.Color.White
Me.btnTeilnehmer.Location = New System.Drawing.Point(487, 4)
Me.btnTeilnehmer.Location = New System.Drawing.Point(577, 4)
Me.btnTeilnehmer.Name = "btnTeilnehmer"
Me.btnTeilnehmer.Size = New System.Drawing.Size(49, 33)
Me.btnTeilnehmer.TabIndex = 8
@@ -569,7 +607,7 @@ Partial Class frmMessenger
Me.Panel4.BackColor = System.Drawing.Color.Black
Me.Panel4.Location = New System.Drawing.Point(4, 43)
Me.Panel4.Name = "Panel4"
Me.Panel4.Size = New System.Drawing.Size(468, 1)
Me.Panel4.Size = New System.Drawing.Size(629, 1)
Me.Panel4.TabIndex = 6
'
'lblChatName
@@ -588,7 +626,7 @@ Partial Class frmMessenger
Me.lblOnlineOffline.BackColor = System.Drawing.Color.MediumSeaGreen
Me.lblOnlineOffline.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
Me.lblOnlineOffline.ForeColor = System.Drawing.Color.White
Me.lblOnlineOffline.Location = New System.Drawing.Point(375, 4)
Me.lblOnlineOffline.Location = New System.Drawing.Point(465, 4)
Me.lblOnlineOffline.Name = "lblOnlineOffline"
Me.lblOnlineOffline.Size = New System.Drawing.Size(106, 33)
Me.lblOnlineOffline.TabIndex = 5
@@ -599,19 +637,212 @@ Partial Class frmMessenger
'pnl
'
Me.pnl.BackColor = System.Drawing.Color.White
Me.pnl.Controls.Add(Me.Button6)
Me.pnl.Controls.Add(Me.Button4)
Me.pnl.Controls.Add(Me.SplitContainer3)
Me.pnl.Controls.Add(Me.Button6)
Me.pnl.Controls.Add(Me.pic)
Me.pnl.Controls.Add(Me.FlowLayoutPanel)
Me.pnl.Controls.Add(Me.Button3)
Me.pnl.Controls.Add(Me.btn)
Me.pnl.Controls.Add(Me.rtbChatMessage)
Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill
Me.pnl.Location = New System.Drawing.Point(0, 0)
Me.pnl.Name = "pnl"
Me.pnl.Size = New System.Drawing.Size(543, 320)
Me.pnl.Size = New System.Drawing.Size(633, 318)
Me.pnl.TabIndex = 0
'
'Button4
'
Me.Button4.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Button4.BackColor = System.Drawing.Color.SteelBlue
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button4.ForeColor = System.Drawing.Color.White
Me.Button4.Location = New System.Drawing.Point(526, 90)
Me.Button4.Name = "Button4"
Me.Button4.Size = New System.Drawing.Size(104, 25)
Me.Button4.TabIndex = 8
Me.Button4.Text = "Chat History"
Me.Button4.UseVisualStyleBackColor = False
'
'SplitContainer3
'
Me.SplitContainer3.Dock = System.Windows.Forms.DockStyle.Bottom
Me.SplitContainer3.FixedPanel = System.Windows.Forms.FixedPanel.Panel1
Me.SplitContainer3.Location = New System.Drawing.Point(0, 119)
Me.SplitContainer3.Name = "SplitContainer3"
'
'SplitContainer3.Panel1
'
Me.SplitContainer3.Panel1.Controls.Add(Me.pnlTeilnehmer)
Me.SplitContainer3.Panel1MinSize = 220
'
'SplitContainer3.Panel2
'
Me.SplitContainer3.Panel2.Controls.Add(Me.FlowLayoutPanel)
Me.SplitContainer3.Panel2MinSize = 200
Me.SplitContainer3.Size = New System.Drawing.Size(633, 199)
Me.SplitContainer3.SplitterDistance = 220
Me.SplitContainer3.TabIndex = 12
'
'pnlTeilnehmer
'
Me.pnlTeilnehmer.BackColor = System.Drawing.SystemColors.Control
Me.pnlTeilnehmer.Controls.Add(Me.Label4)
Me.pnlTeilnehmer.Controls.Add(Me.dgvChatMembers)
Me.pnlTeilnehmer.Controls.Add(Me.Panel8)
Me.pnlTeilnehmer.Controls.Add(Me.Panel9)
Me.pnlTeilnehmer.Dock = System.Windows.Forms.DockStyle.Fill
Me.pnlTeilnehmer.Location = New System.Drawing.Point(0, 0)
Me.pnlTeilnehmer.Name = "pnlTeilnehmer"
Me.pnlTeilnehmer.Size = New System.Drawing.Size(220, 199)
Me.pnlTeilnehmer.TabIndex = 10
'
'Label4
'
Me.Label4.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Label4.BackColor = System.Drawing.Color.MediumSeaGreen
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
Me.Label4.ForeColor = System.Drawing.Color.White
Me.Label4.Location = New System.Drawing.Point(131, 3)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(87, 24)
Me.Label4.TabIndex = 5
Me.Label4.Text = "BEARBEITEN"
Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
Me.Label4.Visible = False
'
'dgvChatMembers
'
Me.dgvChatMembers.AllowUserToAddRows = False
Me.dgvChatMembers.AllowUserToDeleteRows = False
Me.dgvChatMembers.AllowUserToResizeColumns = False
Me.dgvChatMembers.AllowUserToResizeRows = False
Me.dgvChatMembers.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle9.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle9.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle9.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle9.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle9.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvChatMembers.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle9
Me.dgvChatMembers.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvChatMembers.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnMaId, Me.clmnName, Me.clmnFirma})
DataGridViewCellStyle10.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle10.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle10.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle10.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle10.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvChatMembers.DefaultCellStyle = DataGridViewCellStyle10
Me.dgvChatMembers.Dock = System.Windows.Forms.DockStyle.Fill
Me.dgvChatMembers.Location = New System.Drawing.Point(0, 23)
Me.dgvChatMembers.Name = "dgvChatMembers"
Me.dgvChatMembers.ReadOnly = True
DataGridViewCellStyle11.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle11.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle11.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle11.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle11.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle11.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvChatMembers.RowHeadersDefaultCellStyle = DataGridViewCellStyle11
Me.dgvChatMembers.RowHeadersVisible = False
Me.dgvChatMembers.RowHeadersWidth = 62
Me.dgvChatMembers.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
Me.dgvChatMembers.Size = New System.Drawing.Size(220, 146)
Me.dgvChatMembers.TabIndex = 8
'
'clmnMaId
'
Me.clmnMaId.HeaderText = "Column1"
Me.clmnMaId.MinimumWidth = 8
Me.clmnMaId.Name = "clmnMaId"
Me.clmnMaId.ReadOnly = True
Me.clmnMaId.Visible = False
Me.clmnMaId.Width = 150
'
'clmnName
'
Me.clmnName.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
Me.clmnName.HeaderText = "Name"
Me.clmnName.MinimumWidth = 8
Me.clmnName.Name = "clmnName"
Me.clmnName.ReadOnly = True
'
'clmnFirma
'
Me.clmnFirma.HeaderText = "Firma"
Me.clmnFirma.MinimumWidth = 8
Me.clmnFirma.Name = "clmnFirma"
Me.clmnFirma.ReadOnly = True
Me.clmnFirma.Width = 85
'
'Panel8
'
Me.Panel8.BackColor = System.Drawing.SystemColors.Control
Me.Panel8.Controls.Add(Me.Label2)
Me.Panel8.Dock = System.Windows.Forms.DockStyle.Top
Me.Panel8.Location = New System.Drawing.Point(0, 0)
Me.Panel8.Name = "Panel8"
Me.Panel8.Size = New System.Drawing.Size(220, 23)
Me.Panel8.TabIndex = 11
'
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold)
Me.Label2.Location = New System.Drawing.Point(7, 3)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(94, 17)
Me.Label2.TabIndex = 4
Me.Label2.Text = "Teilnehmer:"
'
'Panel9
'
Me.Panel9.BackColor = System.Drawing.SystemColors.Control
Me.Panel9.Controls.Add(Me.Button7)
Me.Panel9.Controls.Add(Me.Button5)
Me.Panel9.Dock = System.Windows.Forms.DockStyle.Bottom
Me.Panel9.Location = New System.Drawing.Point(0, 169)
Me.Panel9.Name = "Panel9"
Me.Panel9.Size = New System.Drawing.Size(220, 30)
Me.Panel9.TabIndex = 10
'
'Button7
'
Me.Button7.BackColor = System.Drawing.Color.MediumSeaGreen
Me.Button7.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button7.ForeColor = System.Drawing.Color.White
Me.Button7.Location = New System.Drawing.Point(151, 2)
Me.Button7.Name = "Button7"
Me.Button7.Size = New System.Drawing.Size(69, 26)
Me.Button7.TabIndex = 8
Me.Button7.Text = "+ NEU"
Me.Button7.UseVisualStyleBackColor = False
'
'Button5
'
Me.Button5.BackColor = System.Drawing.Color.Red
Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button5.ForeColor = System.Drawing.Color.White
Me.Button5.Location = New System.Drawing.Point(90, 2)
Me.Button5.Name = "Button5"
Me.Button5.Size = New System.Drawing.Size(58, 26)
Me.Button5.TabIndex = 9
Me.Button5.Text = "- ENTF"
Me.Button5.UseVisualStyleBackColor = False
'
'FlowLayoutPanel
'
Me.FlowLayoutPanel.AutoScroll = True
Me.FlowLayoutPanel.BackColor = System.Drawing.Color.White
Me.FlowLayoutPanel.Dock = System.Windows.Forms.DockStyle.Fill
Me.FlowLayoutPanel.Location = New System.Drawing.Point(0, 0)
Me.FlowLayoutPanel.Name = "FlowLayoutPanel"
Me.FlowLayoutPanel.Size = New System.Drawing.Size(409, 199)
Me.FlowLayoutPanel.TabIndex = 6
'
'Button6
'
Me.Button6.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
@@ -620,55 +851,31 @@ Partial Class frmMessenger
Me.Button6.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.Button6.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button6.ForeColor = System.Drawing.Color.White
Me.Button6.Location = New System.Drawing.Point(501, 44)
Me.Button6.Location = New System.Drawing.Point(591, 44)
Me.Button6.Name = "Button6"
Me.Button6.Padding = New System.Windows.Forms.Padding(3)
Me.Button6.Size = New System.Drawing.Size(39, 41)
Me.Button6.TabIndex = 9
Me.Button6.UseVisualStyleBackColor = False
'
'Button4
'
Me.Button4.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Button4.BackColor = System.Drawing.Color.SteelBlue
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button4.ForeColor = System.Drawing.Color.White
Me.Button4.Location = New System.Drawing.Point(436, 90)
Me.Button4.Name = "Button4"
Me.Button4.Size = New System.Drawing.Size(104, 25)
Me.Button4.TabIndex = 8
Me.Button4.Text = "Chat History"
Me.Button4.UseVisualStyleBackColor = False
'
'pic
'
Me.pic.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.pic.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.pic.Location = New System.Drawing.Point(-56, 299)
Me.pic.Location = New System.Drawing.Point(34, 522)
Me.pic.Name = "pic"
Me.pic.Size = New System.Drawing.Size(592, 20)
Me.pic.TabIndex = 7
Me.pic.TabStop = False
Me.pic.WaitOnLoad = True
'
'FlowLayoutPanel
'
Me.FlowLayoutPanel.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.FlowLayoutPanel.AutoScroll = True
Me.FlowLayoutPanel.Location = New System.Drawing.Point(4, 121)
Me.FlowLayoutPanel.Name = "FlowLayoutPanel"
Me.FlowLayoutPanel.Size = New System.Drawing.Size(535, 176)
Me.FlowLayoutPanel.TabIndex = 6
'
'Button3
'
Me.Button3.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Button3.BackColor = System.Drawing.Color.SteelBlue
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button3.ForeColor = System.Drawing.Color.White
Me.Button3.Location = New System.Drawing.Point(436, 44)
Me.Button3.Location = New System.Drawing.Point(526, 44)
Me.Button3.Name = "Button3"
Me.Button3.Size = New System.Drawing.Size(65, 41)
Me.Button3.TabIndex = 2
@@ -681,7 +888,7 @@ Partial Class frmMessenger
Me.btn.BackColor = System.Drawing.Color.SteelBlue
Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btn.ForeColor = System.Drawing.Color.White
Me.btn.Location = New System.Drawing.Point(436, 4)
Me.btn.Location = New System.Drawing.Point(526, 4)
Me.btn.Name = "btn"
Me.btn.Size = New System.Drawing.Size(103, 40)
Me.btn.TabIndex = 1
@@ -695,7 +902,7 @@ Partial Class frmMessenger
Me.rtbChatMessage.Font = New System.Drawing.Font("Comic Sans MS", 11.0!)
Me.rtbChatMessage.Location = New System.Drawing.Point(3, 3)
Me.rtbChatMessage.Name = "rtbChatMessage"
Me.rtbChatMessage.Size = New System.Drawing.Size(427, 112)
Me.rtbChatMessage.Size = New System.Drawing.Size(517, 112)
Me.rtbChatMessage.TabIndex = 0
Me.rtbChatMessage.Text = ""
'
@@ -720,13 +927,37 @@ Partial Class frmMessenger
Me.ChatDeaktivierenToolStripMenuItem.Size = New System.Drawing.Size(166, 22)
Me.ChatDeaktivierenToolStripMenuItem.Text = "Chat deaktivieren"
'
'DataGridViewTextBoxColumn1
'
Me.DataGridViewTextBoxColumn1.HeaderText = "Column1"
Me.DataGridViewTextBoxColumn1.MinimumWidth = 8
Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
Me.DataGridViewTextBoxColumn1.ReadOnly = True
Me.DataGridViewTextBoxColumn1.Visible = False
Me.DataGridViewTextBoxColumn1.Width = 150
'
'DataGridViewTextBoxColumn2
'
Me.DataGridViewTextBoxColumn2.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
Me.DataGridViewTextBoxColumn2.HeaderText = "Name"
Me.DataGridViewTextBoxColumn2.MinimumWidth = 8
Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
Me.DataGridViewTextBoxColumn2.ReadOnly = True
'
'DataGridViewTextBoxColumn3
'
Me.DataGridViewTextBoxColumn3.HeaderText = "Firma"
Me.DataGridViewTextBoxColumn3.MinimumWidth = 8
Me.DataGridViewTextBoxColumn3.Name = "DataGridViewTextBoxColumn3"
Me.DataGridViewTextBoxColumn3.ReadOnly = True
Me.DataGridViewTextBoxColumn3.Width = 150
'
'frmMessenger
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(821, 1052)
Me.ClientSize = New System.Drawing.Size(912, 922)
Me.Controls.Add(Me.SplitContainer)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmMessenger"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Messenger"
@@ -749,6 +980,7 @@ Partial Class frmMessenger
Me.Panel2.PerformLayout()
Me.Panel1.ResumeLayout(False)
Me.Panel1.PerformLayout()
Me.FlowLayoutPanel1.ResumeLayout(False)
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainer1.Panel1.ResumeLayout(False)
Me.SplitContainer1.Panel2.ResumeLayout(False)
@@ -758,6 +990,15 @@ Partial Class frmMessenger
Me.Panel3.ResumeLayout(False)
Me.Panel3.PerformLayout()
Me.pnl.ResumeLayout(False)
Me.SplitContainer3.Panel1.ResumeLayout(False)
Me.SplitContainer3.Panel2.ResumeLayout(False)
CType(Me.SplitContainer3, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainer3.ResumeLayout(False)
Me.pnlTeilnehmer.ResumeLayout(False)
CType(Me.dgvChatMembers, System.ComponentModel.ISupportInitialize).EndInit()
Me.Panel8.ResumeLayout(False)
Me.Panel8.PerformLayout()
Me.Panel9.ResumeLayout(False)
CType(Me.pic, System.ComponentModel.ISupportInitialize).EndInit()
Me.cntxt.ResumeLayout(False)
Me.ResumeLayout(False)
@@ -774,11 +1015,8 @@ Partial Class frmMessenger
Friend WithEvents lbl As Label
Friend WithEvents Button2 As Button
Friend WithEvents Button1 As Button
Friend WithEvents UsrCntlMessenger_ChatAnhang1 As usrCntlMessenger_ChatAnhang
Friend WithEvents UsrCntlMessenger_ChatElement1 As usrCntlMessenger_ChatElement
Friend WithEvents Button3 As Button
Friend WithEvents UsrCntlMessenger_ChatElement2 As usrCntlMessenger_ChatElement
Friend WithEvents UsrCntlMessenger_ChatElement3 As usrCntlMessenger_ChatElement
Friend WithEvents btnTEST As Button
Friend WithEvents TimerNEW_MESSAGE As Timer
Friend WithEvents Timer_REFRESH As Timer
@@ -803,9 +1041,28 @@ Partial Class frmMessenger
Friend WithEvents Button8 As Button
Friend WithEvents Button9 As Button
Friend WithEvents DGVSonstige As MyDatagridview
Friend WithEvents Panel2 As Panel
Friend WithEvents Panel1 As Panel
Friend WithEvents Panel6 As Panel
Friend WithEvents CheckBox1 As CheckBox
Friend WithEvents Button6 As Button
Friend WithEvents pnlTeilnehmer As Panel
Friend WithEvents Label2 As Label
Friend WithEvents Panel8 As Panel
Friend WithEvents Label4 As Label
Friend WithEvents dgvChatMembers As DataGridView
Friend WithEvents SplitContainer3 As SplitContainer
Friend WithEvents DataGridViewTextBoxColumn1 As DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn2 As DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn3 As DataGridViewTextBoxColumn
Friend WithEvents clmnMaId As DataGridViewTextBoxColumn
Friend WithEvents clmnName As DataGridViewTextBoxColumn
Friend WithEvents clmnFirma As DataGridViewTextBoxColumn
Friend WithEvents Panel9 As Panel
Friend WithEvents Panel2 As Panel
Friend WithEvents Panel1 As Panel
Friend WithEvents Button5 As Button
Friend WithEvents Button7 As Button
Friend WithEvents FlowLayoutPanel1 As FlowLayoutPanel
Friend WithEvents UsrCntlChat_Art_Btn_MACHAT As usrCntlChat_Art_Btn
Friend WithEvents UsrCntlChat_Art_Btn_LKWCHAT As usrCntlChat_Art_Btn
Friend WithEvents UsrCntlChat_Art_Btn_SNDCHAT As usrCntlChat_Art_Btn
End Class