20200108

2020-01-08 14:52:43 +01:00
parent bea8632eb5
commit f4c1a74870
136 changed files with 11561 additions and 1072 deletions
--- a/VERAG_PROG_ALLGEMEIN/Messenger/frmMessenger_NeuerChat.Designer.vb
+++ b/VERAG_PROG_ALLGEMEIN/Messenger/frmMessenger_NeuerChat.Designer.vb
@@ -0,0 +1,217 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmMessenger_NeuerChat
+    Inherits System.Windows.Forms.Form
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    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.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMessenger_NeuerChat))
+        Me.MyTextBox1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.dgvMitarbeiter = New System.Windows.Forms.DataGridView()
+        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.btn = New System.Windows.Forms.Button()
+        Me.lbl = New System.Windows.Forms.Label()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        CType(Me.dgvMitarbeiter, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.dgvChatMembers, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'MyTextBox1
+        '
+        Me.MyTextBox1._DateTimeOnly = False
+        Me.MyTextBox1._numbersOnly = False
+        Me.MyTextBox1._numbersOnlyKommastellen = ""
+        Me.MyTextBox1._Prozent = False
+        Me.MyTextBox1._ShortDateNew = False
+        Me.MyTextBox1._ShortDateOnly = False
+        Me.MyTextBox1._TimeOnly = False
+        Me.MyTextBox1._value = ""
+        Me.MyTextBox1._Waehrung = False
+        Me.MyTextBox1._WaehrungZeichen = True
+        Me.MyTextBox1.ForeColor = System.Drawing.Color.Black
+        Me.MyTextBox1.Location = New System.Drawing.Point(13, 23)
+        Me.MyTextBox1.MaxLineLength = -1
+        Me.MyTextBox1.MaxLines_Warning = ""
+        Me.MyTextBox1.MaxLines_Warning_Label = Nothing
+        Me.MyTextBox1.Name = "MyTextBox1"
+        Me.MyTextBox1.Size = New System.Drawing.Size(228, 20)
+        Me.MyTextBox1.TabIndex = 0
+        '
+        'dgvMitarbeiter
+        '
+        Me.dgvMitarbeiter.AllowUserToAddRows = False
+        Me.dgvMitarbeiter.AllowUserToDeleteRows = False
+        Me.dgvMitarbeiter.AllowUserToResizeColumns = False
+        Me.dgvMitarbeiter.AllowUserToResizeRows = False
+        Me.dgvMitarbeiter.BackgroundColor = System.Drawing.Color.White
+        Me.dgvMitarbeiter.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvMitarbeiter.Location = New System.Drawing.Point(13, 46)
+        Me.dgvMitarbeiter.MultiSelect = False
+        Me.dgvMitarbeiter.Name = "dgvMitarbeiter"
+        Me.dgvMitarbeiter.RowHeadersVisible = False
+        Me.dgvMitarbeiter.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
+        Me.dgvMitarbeiter.Size = New System.Drawing.Size(304, 393)
+        Me.dgvMitarbeiter.TabIndex = 1
+        '
+        'dgvChatMembers
+        '
+        Me.dgvChatMembers.AllowUserToAddRows = False
+        Me.dgvChatMembers.BackgroundColor = System.Drawing.Color.White
+        Me.dgvChatMembers.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvChatMembers.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnMaId, Me.clmnName, Me.clmnFirma})
+        Me.dgvChatMembers.Location = New System.Drawing.Point(323, 62)
+        Me.dgvChatMembers.Name = "dgvChatMembers"
+        Me.dgvChatMembers.RowHeadersVisible = False
+        Me.dgvChatMembers.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
+        Me.dgvChatMembers.Size = New System.Drawing.Size(327, 323)
+        Me.dgvChatMembers.TabIndex = 2
+        '
+        'clmnMaId
+        '
+        Me.clmnMaId.HeaderText = "Column1"
+        Me.clmnMaId.Name = "clmnMaId"
+        Me.clmnMaId.Visible = False
+        '
+        'clmnName
+        '
+        Me.clmnName.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.clmnName.HeaderText = "Name"
+        Me.clmnName.Name = "clmnName"
+        '
+        'clmnFirma
+        '
+        Me.clmnFirma.HeaderText = "Firma"
+        Me.clmnFirma.Name = "clmnFirma"
+        '
+        'btn
+        '
+        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(323, 392)
+        Me.btn.Name = "btn"
+        Me.btn.Size = New System.Drawing.Size(327, 47)
+        Me.btn.TabIndex = 3
+        Me.btn.Text = "Chat eröffnen"
+        Me.btn.UseVisualStyleBackColor = False
+        '
+        'lbl
+        '
+        Me.lbl.AutoSize = True
+        Me.lbl.Location = New System.Drawing.Point(320, 46)
+        Me.lbl.Name = "lbl"
+        Me.lbl.Size = New System.Drawing.Size(117, 13)
+        Me.lbl.TabIndex = 4
+        Me.lbl.Text = "Eingeladene Mitglieder:"
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Location = New System.Drawing.Point(10, 7)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(41, 13)
+        Me.Label1.TabIndex = 5
+        Me.Label1.Text = "Suche:"
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Location = New System.Drawing.Point(320, 7)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(58, 13)
+        Me.Label2.TabIndex = 7
+        Me.Label2.Text = "Chatname:"
+        '
+        'MyTextBox2
+        '
+        Me.MyTextBox2._DateTimeOnly = False
+        Me.MyTextBox2._numbersOnly = False
+        Me.MyTextBox2._numbersOnlyKommastellen = ""
+        Me.MyTextBox2._Prozent = False
+        Me.MyTextBox2._ShortDateNew = False
+        Me.MyTextBox2._ShortDateOnly = False
+        Me.MyTextBox2._TimeOnly = False
+        Me.MyTextBox2._value = ""
+        Me.MyTextBox2._Waehrung = False
+        Me.MyTextBox2._WaehrungZeichen = True
+        Me.MyTextBox2.ForeColor = System.Drawing.Color.Black
+        Me.MyTextBox2.Location = New System.Drawing.Point(323, 23)
+        Me.MyTextBox2.MaxLineLength = -1
+        Me.MyTextBox2.MaxLines_Warning = ""
+        Me.MyTextBox2.MaxLines_Warning_Label = Nothing
+        Me.MyTextBox2.Name = "MyTextBox2"
+        Me.MyTextBox2.Size = New System.Drawing.Size(327, 20)
+        Me.MyTextBox2.TabIndex = 6
+        '
+        'MyComboBox1
+        '
+        Me.MyComboBox1._allowedValuesFreiText = Nothing
+        Me.MyComboBox1._allowFreiText = False
+        Me.MyComboBox1._value = ""
+        Me.MyComboBox1.FormattingEnabled = True
+        Me.MyComboBox1.Location = New System.Drawing.Point(240, 23)
+        Me.MyComboBox1.Name = "MyComboBox1"
+        Me.MyComboBox1.Size = New System.Drawing.Size(77, 21)
+        Me.MyComboBox1.TabIndex = 8
+        '
+        'frmMessenger_NeuerChat
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.BackColor = System.Drawing.Color.White
+        Me.ClientSize = New System.Drawing.Size(662, 451)
+        Me.Controls.Add(Me.MyComboBox1)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.MyTextBox2)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.lbl)
+        Me.Controls.Add(Me.btn)
+        Me.Controls.Add(Me.dgvChatMembers)
+        Me.Controls.Add(Me.dgvMitarbeiter)
+        Me.Controls.Add(Me.MyTextBox1)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.Name = "frmMessenger_NeuerChat"
+        Me.Text = "Neuer Chat"
+        CType(Me.dgvMitarbeiter, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.dgvChatMembers, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents MyTextBox1 As MyTextBox
+    Friend WithEvents dgvMitarbeiter As Windows.Forms.DataGridView
+    Friend WithEvents dgvChatMembers As Windows.Forms.DataGridView
+    Friend WithEvents btn As Windows.Forms.Button
+    Friend WithEvents lbl As Windows.Forms.Label
+    Friend WithEvents Label1 As Windows.Forms.Label
+    Friend WithEvents Label2 As Windows.Forms.Label
+    Friend WithEvents MyTextBox2 As MyTextBox
+    Friend WithEvents clmnMaId As Windows.Forms.DataGridViewTextBoxColumn
+    Friend WithEvents clmnName As Windows.Forms.DataGridViewTextBoxColumn
+    Friend WithEvents clmnFirma As Windows.Forms.DataGridViewTextBoxColumn
+    Friend WithEvents MyComboBox1 As MyComboBox
+End Class