Nachrichten verbessert, Bugs beseitigt, ...

This commit is contained in:
ms
2019-11-07 09:47:16 +01:00
parent 2197c92cba
commit 0b0d0f9538
10 changed files with 137 additions and 80 deletions

View File

@@ -25,18 +25,19 @@ Partial Class uscntr_TSSitzungen
Me.components = New System.ComponentModel.Container()
Me.dgvTSSitzungen = New System.Windows.Forms.DataGridView()
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.VerbindenMitTeamVToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.NachrichtSendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.UpdateToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
Me.Panel1 = New System.Windows.Forms.Panel()
Me.lblAnzahl = New System.Windows.Forms.Label()
Me.cmdNachricht = New System.Windows.Forms.Button()
Me.chkAutoUpdate = New System.Windows.Forms.CheckBox()
Me.CmdUpdate = New System.Windows.Forms.Button()
Me.Panel2 = New System.Windows.Forms.Panel()
Me.TextBox1 = New System.Windows.Forms.TextBox()
Me.Label1 = New System.Windows.Forms.Label()
Me.btnReset = New System.Windows.Forms.Button()
Me.lblAnzahl = New System.Windows.Forms.Label()
Me.Label1 = New System.Windows.Forms.Label()
Me.TextBox1 = New System.Windows.Forms.TextBox()
CType(Me.dgvTSSitzungen, System.ComponentModel.ISupportInitialize).BeginInit()
Me.ContextMenuStrip1.SuspendLayout()
Me.Panel1.SuspendLayout()
@@ -48,6 +49,7 @@ Partial Class uscntr_TSSitzungen
Me.dgvTSSitzungen.AllowUserToAddRows = False
Me.dgvTSSitzungen.AllowUserToDeleteRows = False
Me.dgvTSSitzungen.AllowUserToResizeRows = False
Me.dgvTSSitzungen.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
Me.dgvTSSitzungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvTSSitzungen.ContextMenuStrip = Me.ContextMenuStrip1
Me.dgvTSSitzungen.Dock = System.Windows.Forms.DockStyle.Fill
@@ -62,20 +64,26 @@ Partial Class uscntr_TSSitzungen
'
'ContextMenuStrip1
'
Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NachrichtSendenToolStripMenuItem, Me.UpdateToolStripMenuItem})
Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.VerbindenMitTeamVToolStripMenuItem, Me.NachrichtSendenToolStripMenuItem, Me.UpdateToolStripMenuItem})
Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
Me.ContextMenuStrip1.Size = New System.Drawing.Size(168, 48)
Me.ContextMenuStrip1.Size = New System.Drawing.Size(190, 70)
'
'VerbindenMitTeamVToolStripMenuItem
'
Me.VerbindenMitTeamVToolStripMenuItem.Name = "VerbindenMitTeamVToolStripMenuItem"
Me.VerbindenMitTeamVToolStripMenuItem.Size = New System.Drawing.Size(189, 22)
Me.VerbindenMitTeamVToolStripMenuItem.Text = "Verbinden mit TeamV."
'
'NachrichtSendenToolStripMenuItem
'
Me.NachrichtSendenToolStripMenuItem.Name = "NachrichtSendenToolStripMenuItem"
Me.NachrichtSendenToolStripMenuItem.Size = New System.Drawing.Size(167, 22)
Me.NachrichtSendenToolStripMenuItem.Size = New System.Drawing.Size(189, 22)
Me.NachrichtSendenToolStripMenuItem.Text = "Nachricht senden"
'
'UpdateToolStripMenuItem
'
Me.UpdateToolStripMenuItem.Name = "UpdateToolStripMenuItem"
Me.UpdateToolStripMenuItem.Size = New System.Drawing.Size(167, 22)
Me.UpdateToolStripMenuItem.Size = New System.Drawing.Size(189, 22)
Me.UpdateToolStripMenuItem.Text = "Update"
'
'Timer1
@@ -95,6 +103,17 @@ Partial Class uscntr_TSSitzungen
Me.Panel1.Size = New System.Drawing.Size(365, 67)
Me.Panel1.TabIndex = 2
'
'lblAnzahl
'
Me.lblAnzahl.AutoSize = True
Me.lblAnzahl.Font = New System.Drawing.Font("Microsoft Sans Serif", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblAnzahl.ForeColor = System.Drawing.SystemColors.WindowFrame
Me.lblAnzahl.Location = New System.Drawing.Point(9, 11)
Me.lblAnzahl.Name = "lblAnzahl"
Me.lblAnzahl.Size = New System.Drawing.Size(43, 12)
Me.lblAnzahl.TabIndex = 13
Me.lblAnzahl.Text = "lblAnzahl"
'
'cmdNachricht
'
Me.cmdNachricht.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
@@ -114,6 +133,8 @@ Partial Class uscntr_TSSitzungen
'chkAutoUpdate
'
Me.chkAutoUpdate.AutoSize = True
Me.chkAutoUpdate.Checked = True
Me.chkAutoUpdate.CheckState = System.Windows.Forms.CheckState.Checked
Me.chkAutoUpdate.Location = New System.Drawing.Point(220, 11)
Me.chkAutoUpdate.Name = "chkAutoUpdate"
Me.chkAutoUpdate.Size = New System.Drawing.Size(127, 17)
@@ -149,25 +170,6 @@ Partial Class uscntr_TSSitzungen
Me.Panel2.Size = New System.Drawing.Size(365, 36)
Me.Panel2.TabIndex = 3
'
'TextBox1
'
Me.TextBox1.Location = New System.Drawing.Point(103, 8)
Me.TextBox1.Margin = New System.Windows.Forms.Padding(8)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size(157, 20)
Me.TextBox1.TabIndex = 0
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(8, 12)
Me.Label1.Margin = New System.Windows.Forms.Padding(8)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(93, 13)
Me.Label1.TabIndex = 1
Me.Label1.Text = "TSUser Suche:"
'
'btnReset
'
Me.btnReset.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
@@ -183,16 +185,24 @@ Partial Class uscntr_TSSitzungen
Me.btnReset.Text = "Reset"
Me.btnReset.UseVisualStyleBackColor = False
'
'lblAnzahl
'Label1
'
Me.lblAnzahl.AutoSize = True
Me.lblAnzahl.Font = New System.Drawing.Font("Microsoft Sans Serif", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblAnzahl.ForeColor = System.Drawing.SystemColors.WindowFrame
Me.lblAnzahl.Location = New System.Drawing.Point(9, 11)
Me.lblAnzahl.Name = "lblAnzahl"
Me.lblAnzahl.Size = New System.Drawing.Size(43, 12)
Me.lblAnzahl.TabIndex = 13
Me.lblAnzahl.Text = "lblAnzahl"
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(8, 12)
Me.Label1.Margin = New System.Windows.Forms.Padding(8)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(93, 13)
Me.Label1.TabIndex = 1
Me.Label1.Text = "TSUser Suche:"
'
'TextBox1
'
Me.TextBox1.Location = New System.Drawing.Point(103, 8)
Me.TextBox1.Margin = New System.Windows.Forms.Padding(8)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size(157, 20)
Me.TextBox1.TabIndex = 0
'
'uscntr_TSSitzungen
'
@@ -230,4 +240,5 @@ Partial Class uscntr_TSSitzungen
Friend WithEvents TextBox1 As TextBox
Friend WithEvents btnReset As Button
Friend WithEvents lblAnzahl As Label
Friend WithEvents VerbindenMitTeamVToolStripMenuItem As ToolStripMenuItem
End Class