Mitarbeiter, etc.

2026-05-20 16:39:47 +02:00
parent 514f4f93e3
commit 6e91ef81b3
9 changed files with 790 additions and 407 deletions
--- a/UID/Dienstplan/usrcntlSessions.Designer.vb
+++ b/UID/Dienstplan/usrcntlSessions.Designer.vb
@@ -0,0 +1,331 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class usrcntlSessions
+    Inherits System.Windows.Forms.UserControl
+
+    'UserControl ü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()
+        Me.components = New System.ComponentModel.Container()
+        Me.txtSessDatVon = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.txtSessDatBis = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.btnAddDay = New System.Windows.Forms.Button()
+        Me.btnReduceDay = New System.Windows.Forms.Button()
+        Me.btnToday = New System.Windows.Forms.Button()
+        Me.Label73 = New System.Windows.Forms.Label()
+        Me.btnJahr = New System.Windows.Forms.Button()
+        Me.btnBisJahr = New System.Windows.Forms.Button()
+        Me.btnVonJahr = New System.Windows.Forms.Button()
+        Me.btnMonat = New System.Windows.Forms.Button()
+        Me.btnBisMonat = New System.Windows.Forms.Button()
+        Me.btnVonMonat = New System.Windows.Forms.Button()
+        Me.DateTimePicker2 = New System.Windows.Forms.DateTimePicker()
+        Me.Label74 = New System.Windows.Forms.Label()
+        Me.DateTimePicker1 = New System.Windows.Forms.DateTimePicker()
+        Me.dgvSessions = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        CType(Me.dgvSessions, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'txtSessDatVon
+        '
+        Me.txtSessDatVon._DateTimeOnly = False
+        Me.txtSessDatVon._numbersOnly = False
+        Me.txtSessDatVon._numbersOnlyKommastellen = ""
+        Me.txtSessDatVon._numbersOnlyTrennzeichen = True
+        Me.txtSessDatVon._Prozent = False
+        Me.txtSessDatVon._ShortDateNew = True
+        Me.txtSessDatVon._ShortDateOnly = False
+        Me.txtSessDatVon._TimeOnly = False
+        Me.txtSessDatVon._TimeOnly_Seconds = False
+        Me.txtSessDatVon._value = ""
+        Me.txtSessDatVon._Waehrung = False
+        Me.txtSessDatVon._WaehrungZeichen = True
+        Me.txtSessDatVon.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtSessDatVon.ForeColor = System.Drawing.Color.Black
+        Me.txtSessDatVon.Location = New System.Drawing.Point(43, 12)
+        Me.txtSessDatVon.MaxLength = 10
+        Me.txtSessDatVon.MaxLineLength = -1
+        Me.txtSessDatVon.MaxLines_Warning = ""
+        Me.txtSessDatVon.MaxLines_Warning_Label = Nothing
+        Me.txtSessDatVon.Name = "txtSessDatVon"
+        Me.txtSessDatVon.Size = New System.Drawing.Size(61, 20)
+        Me.txtSessDatVon.TabIndex = 175
+        '
+        'txtSessDatBis
+        '
+        Me.txtSessDatBis._DateTimeOnly = False
+        Me.txtSessDatBis._numbersOnly = False
+        Me.txtSessDatBis._numbersOnlyKommastellen = ""
+        Me.txtSessDatBis._numbersOnlyTrennzeichen = True
+        Me.txtSessDatBis._Prozent = False
+        Me.txtSessDatBis._ShortDateNew = True
+        Me.txtSessDatBis._ShortDateOnly = False
+        Me.txtSessDatBis._TimeOnly = False
+        Me.txtSessDatBis._TimeOnly_Seconds = False
+        Me.txtSessDatBis._value = ""
+        Me.txtSessDatBis._Waehrung = False
+        Me.txtSessDatBis._WaehrungZeichen = True
+        Me.txtSessDatBis.Enabled = False
+        Me.txtSessDatBis.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtSessDatBis.ForeColor = System.Drawing.Color.Black
+        Me.txtSessDatBis.Location = New System.Drawing.Point(175, 13)
+        Me.txtSessDatBis.MaxLength = 10
+        Me.txtSessDatBis.MaxLineLength = -1
+        Me.txtSessDatBis.MaxLines_Warning = ""
+        Me.txtSessDatBis.MaxLines_Warning_Label = Nothing
+        Me.txtSessDatBis.Name = "txtSessDatBis"
+        Me.txtSessDatBis.Size = New System.Drawing.Size(61, 20)
+        Me.txtSessDatBis.TabIndex = 177
+        '
+        'btnAddDay
+        '
+        Me.btnAddDay.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnAddDay.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.btnAddDay.ForeColor = System.Drawing.Color.Black
+        Me.btnAddDay.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnAddDay.Location = New System.Drawing.Point(399, 10)
+        Me.btnAddDay.Margin = New System.Windows.Forms.Padding(0)
+        Me.btnAddDay.Name = "btnAddDay"
+        Me.btnAddDay.Size = New System.Drawing.Size(34, 23)
+        Me.btnAddDay.TabIndex = 182
+        Me.btnAddDay.Text = ">>"
+        Me.btnAddDay.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnAddDay.UseVisualStyleBackColor = True
+        '
+        'btnReduceDay
+        '
+        Me.btnReduceDay.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnReduceDay.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.btnReduceDay.ForeColor = System.Drawing.Color.Black
+        Me.btnReduceDay.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnReduceDay.Location = New System.Drawing.Point(280, 10)
+        Me.btnReduceDay.Margin = New System.Windows.Forms.Padding(0)
+        Me.btnReduceDay.Name = "btnReduceDay"
+        Me.btnReduceDay.Size = New System.Drawing.Size(34, 23)
+        Me.btnReduceDay.TabIndex = 180
+        Me.btnReduceDay.Text = "<<"
+        Me.btnReduceDay.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnReduceDay.UseVisualStyleBackColor = True
+        '
+        'btnToday
+        '
+        Me.btnToday.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnToday.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.btnToday.ForeColor = System.Drawing.Color.Black
+        Me.btnToday.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnToday.Location = New System.Drawing.Point(313, 10)
+        Me.btnToday.Margin = New System.Windows.Forms.Padding(0)
+        Me.btnToday.Name = "btnToday"
+        Me.btnToday.Size = New System.Drawing.Size(87, 23)
+        Me.btnToday.TabIndex = 181
+        Me.btnToday.Text = "Heute"
+        Me.btnToday.UseVisualStyleBackColor = True
+        '
+        'Label73
+        '
+        Me.Label73.AutoSize = True
+        Me.Label73.Location = New System.Drawing.Point(146, 16)
+        Me.Label73.Name = "Label73"
+        Me.Label73.Size = New System.Drawing.Size(23, 13)
+        Me.Label73.TabIndex = 179
+        Me.Label73.Text = "bis:"
+        '
+        'btnJahr
+        '
+        Me.btnJahr.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnJahr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.btnJahr.ForeColor = System.Drawing.Color.Black
+        Me.btnJahr.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnJahr.Location = New System.Drawing.Point(625, 10)
+        Me.btnJahr.Margin = New System.Windows.Forms.Padding(0)
+        Me.btnJahr.Name = "btnJahr"
+        Me.btnJahr.Size = New System.Drawing.Size(87, 23)
+        Me.btnJahr.TabIndex = 188
+        Me.btnJahr.Text = "2016"
+        Me.btnJahr.UseVisualStyleBackColor = True
+        '
+        'btnBisJahr
+        '
+        Me.btnBisJahr.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnBisJahr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.btnBisJahr.ForeColor = System.Drawing.Color.Black
+        Me.btnBisJahr.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnBisJahr.Location = New System.Drawing.Point(711, 10)
+        Me.btnBisJahr.Margin = New System.Windows.Forms.Padding(0)
+        Me.btnBisJahr.Name = "btnBisJahr"
+        Me.btnBisJahr.Size = New System.Drawing.Size(34, 23)
+        Me.btnBisJahr.TabIndex = 189
+        Me.btnBisJahr.Text = ">>"
+        Me.btnBisJahr.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnBisJahr.UseVisualStyleBackColor = True
+        '
+        'btnVonJahr
+        '
+        Me.btnVonJahr.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnVonJahr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.btnVonJahr.ForeColor = System.Drawing.Color.Black
+        Me.btnVonJahr.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnVonJahr.Location = New System.Drawing.Point(592, 10)
+        Me.btnVonJahr.Margin = New System.Windows.Forms.Padding(0)
+        Me.btnVonJahr.Name = "btnVonJahr"
+        Me.btnVonJahr.Size = New System.Drawing.Size(34, 23)
+        Me.btnVonJahr.TabIndex = 187
+        Me.btnVonJahr.Text = "<<"
+        Me.btnVonJahr.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnVonJahr.UseVisualStyleBackColor = True
+        '
+        'btnMonat
+        '
+        Me.btnMonat.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnMonat.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.btnMonat.ForeColor = System.Drawing.Color.Black
+        Me.btnMonat.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnMonat.Location = New System.Drawing.Point(469, 10)
+        Me.btnMonat.Margin = New System.Windows.Forms.Padding(0)
+        Me.btnMonat.Name = "btnMonat"
+        Me.btnMonat.Size = New System.Drawing.Size(87, 23)
+        Me.btnMonat.TabIndex = 185
+        Me.btnMonat.Text = "September"
+        Me.btnMonat.UseVisualStyleBackColor = True
+        '
+        'btnBisMonat
+        '
+        Me.btnBisMonat.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnBisMonat.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.btnBisMonat.ForeColor = System.Drawing.Color.Black
+        Me.btnBisMonat.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnBisMonat.Location = New System.Drawing.Point(555, 10)
+        Me.btnBisMonat.Margin = New System.Windows.Forms.Padding(0)
+        Me.btnBisMonat.Name = "btnBisMonat"
+        Me.btnBisMonat.Size = New System.Drawing.Size(34, 23)
+        Me.btnBisMonat.TabIndex = 186
+        Me.btnBisMonat.Text = ">>"
+        Me.btnBisMonat.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnBisMonat.UseVisualStyleBackColor = True
+        '
+        'btnVonMonat
+        '
+        Me.btnVonMonat.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnVonMonat.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.btnVonMonat.ForeColor = System.Drawing.Color.Black
+        Me.btnVonMonat.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnVonMonat.Location = New System.Drawing.Point(436, 10)
+        Me.btnVonMonat.Margin = New System.Windows.Forms.Padding(0)
+        Me.btnVonMonat.Name = "btnVonMonat"
+        Me.btnVonMonat.Size = New System.Drawing.Size(34, 23)
+        Me.btnVonMonat.TabIndex = 184
+        Me.btnVonMonat.Text = "<<"
+        Me.btnVonMonat.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnVonMonat.UseVisualStyleBackColor = True
+        '
+        'DateTimePicker2
+        '
+        Me.DateTimePicker2.CustomFormat = "''"
+        Me.DateTimePicker2.Format = System.Windows.Forms.DateTimePickerFormat.Custom
+        Me.DateTimePicker2.Location = New System.Drawing.Point(175, 13)
+        Me.DateTimePicker2.Margin = New System.Windows.Forms.Padding(0)
+        Me.DateTimePicker2.Name = "DateTimePicker2"
+        Me.DateTimePicker2.RightToLeft = System.Windows.Forms.RightToLeft.No
+        Me.DateTimePicker2.Size = New System.Drawing.Size(95, 20)
+        Me.DateTimePicker2.TabIndex = 178
+        '
+        'Label74
+        '
+        Me.Label74.AutoSize = True
+        Me.Label74.Location = New System.Drawing.Point(14, 16)
+        Me.Label74.Name = "Label74"
+        Me.Label74.Size = New System.Drawing.Size(28, 13)
+        Me.Label74.TabIndex = 183
+        Me.Label74.Text = "von:"
+        '
+        'DateTimePicker1
+        '
+        Me.DateTimePicker1.CustomFormat = "''"
+        Me.DateTimePicker1.Format = System.Windows.Forms.DateTimePickerFormat.Custom
+        Me.DateTimePicker1.Location = New System.Drawing.Point(43, 12)
+        Me.DateTimePicker1.Margin = New System.Windows.Forms.Padding(0)
+        Me.DateTimePicker1.Name = "DateTimePicker1"
+        Me.DateTimePicker1.RightToLeft = System.Windows.Forms.RightToLeft.No
+        Me.DateTimePicker1.Size = New System.Drawing.Size(95, 20)
+        Me.DateTimePicker1.TabIndex = 176
+        '
+        'dgvSessions
+        '
+        Me.dgvSessions.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvSessions.AllowUserToAddRows = False
+        Me.dgvSessions.AllowUserToDeleteRows = False
+        Me.dgvSessions.AllowUserToResizeColumns = False
+        Me.dgvSessions.AllowUserToResizeRows = False
+        Me.dgvSessions.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.dgvSessions.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvSessions.Location = New System.Drawing.Point(3, 39)
+        Me.dgvSessions.Name = "dgvSessions"
+        Me.dgvSessions.RowHeadersVisible = False
+        Me.dgvSessions.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
+        Me.dgvSessions.ShowEditingIcon = False
+        Me.dgvSessions.Size = New System.Drawing.Size(744, 706)
+        Me.dgvSessions.TabIndex = 174
+        '
+        'usrcntlSessions
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.Controls.Add(Me.txtSessDatVon)
+        Me.Controls.Add(Me.txtSessDatBis)
+        Me.Controls.Add(Me.btnAddDay)
+        Me.Controls.Add(Me.btnReduceDay)
+        Me.Controls.Add(Me.btnToday)
+        Me.Controls.Add(Me.Label73)
+        Me.Controls.Add(Me.btnJahr)
+        Me.Controls.Add(Me.btnBisJahr)
+        Me.Controls.Add(Me.btnVonJahr)
+        Me.Controls.Add(Me.btnMonat)
+        Me.Controls.Add(Me.btnBisMonat)
+        Me.Controls.Add(Me.btnVonMonat)
+        Me.Controls.Add(Me.DateTimePicker2)
+        Me.Controls.Add(Me.Label74)
+        Me.Controls.Add(Me.DateTimePicker1)
+        Me.Controls.Add(Me.dgvSessions)
+        Me.MinimumSize = New System.Drawing.Size(767, 767)
+        Me.Name = "usrcntlSessions"
+        Me.Size = New System.Drawing.Size(767, 767)
+        CType(Me.dgvSessions, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents txtSessDatVon As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Friend WithEvents txtSessDatBis As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Friend WithEvents btnAddDay As Button
+    Friend WithEvents btnReduceDay As Button
+    Friend WithEvents btnToday As Button
+    Friend WithEvents Label73 As Label
+    Friend WithEvents btnJahr As Button
+    Friend WithEvents btnBisJahr As Button
+    Friend WithEvents btnVonJahr As Button
+    Friend WithEvents btnMonat As Button
+    Friend WithEvents btnBisMonat As Button
+    Friend WithEvents btnVonMonat As Button
+    Friend WithEvents DateTimePicker2 As DateTimePicker
+    Friend WithEvents Label74 As Label
+    Friend WithEvents DateTimePicker1 As DateTimePicker
+    Friend WithEvents dgvSessions As VERAG_PROG_ALLGEMEIN.MyDatagridview
+End Class