Gesamtsicherheiten und Essensbestellungen

2022-11-30 14:10:00 +01:00
parent b73bb67349
commit 72693343d8
6 changed files with 134 additions and 79 deletions
--- a/Aviso/frmEssensbestellungen.Designer.vb
+++ b/Aviso/frmEssensbestellungen.Designer.vb
@@ -23,9 +23,9 @@ Partial Class frmEssensbestellungen
    <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()
+        Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Me.lblWochenkarte = New System.Windows.Forms.Label()
        Me.btnSave = New System.Windows.Forms.Button()
        Me.lblDatum = New System.Windows.Forms.Label()
@@ -78,6 +78,8 @@ Partial Class frmEssensbestellungen
        Me.txtAnzahlMenu = New System.Windows.Forms.Label()
        Me.dgvBestellungen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
        Me.cbxMenu = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.txtAbteilung = New System.Windows.Forms.Label()
        Me.MyPanel1.SuspendLayout()
        Me.Dienstag.SuspendLayout()
        CType(Me.pbDienstag, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -95,7 +97,7 @@ Partial Class frmEssensbestellungen
        'lblWochenkarte
        '
        Me.lblWochenkarte.AutoSize = True
-        Me.lblWochenkarte.Location = New System.Drawing.Point(12, 14)
+        Me.lblWochenkarte.Location = New System.Drawing.Point(18, 14)
        Me.lblWochenkarte.Name = "lblWochenkarte"
        Me.lblWochenkarte.Size = New System.Drawing.Size(34, 13)
        Me.lblWochenkarte.TabIndex = 1
@@ -103,6 +105,7 @@ Partial Class frmEssensbestellungen
        '
        'btnSave
        '
+        Me.btnSave.Anchor = System.Windows.Forms.AnchorStyles.Bottom
        Me.btnSave.Location = New System.Drawing.Point(305, 484)
        Me.btnSave.Name = "btnSave"
        Me.btnSave.Size = New System.Drawing.Size(75, 23)
@@ -140,7 +143,7 @@ Partial Class frmEssensbestellungen
        'lblBestellungen
        '
        Me.lblBestellungen.AutoSize = True
-        Me.lblBestellungen.Location = New System.Drawing.Point(9, 335)
+        Me.lblBestellungen.Location = New System.Drawing.Point(15, 335)
        Me.lblBestellungen.Name = "lblBestellungen"
        Me.lblBestellungen.Size = New System.Drawing.Size(100, 13)
        Me.lblBestellungen.TabIndex = 20
@@ -162,13 +165,14 @@ Partial Class frmEssensbestellungen
        Me.cbxGebauede._value = ""
        Me.cbxGebauede.DropDownWidth = 150
        Me.cbxGebauede.FormattingEnabled = True
-        Me.cbxGebauede.Location = New System.Drawing.Point(580, 24)
+        Me.cbxGebauede.Location = New System.Drawing.Point(584, 24)
        Me.cbxGebauede.Name = "cbxGebauede"
        Me.cbxGebauede.Size = New System.Drawing.Size(95, 21)
        Me.cbxGebauede.TabIndex = 21
        '
        'MyPanel1
        '
+        Me.MyPanel1.Controls.Add(Me.Button1)
        Me.MyPanel1.Controls.Add(Me.txtPreis)
        Me.MyPanel1.Controls.Add(Me.Label2)
        Me.MyPanel1.Controls.Add(Me.Dienstag)
@@ -655,35 +659,37 @@ Partial Class frmEssensbestellungen
        Me.dgvBestellungen.AllowUserToAddRows = False
        Me.dgvBestellungen.AllowUserToDeleteRows = False
        Me.dgvBestellungen.AllowUserToOrderColumns = True
+        Me.dgvBestellungen.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.dgvBestellungen.BackgroundColor = System.Drawing.Color.White
-        DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Control
-        DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvBestellungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle1
+        DataGridViewCellStyle10.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle10.BackColor = System.Drawing.SystemColors.Control
+        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.WindowText
+        DataGridViewCellStyle10.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle10.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvBestellungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle10
        Me.dgvBestellungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Window
-        DataGridViewCellStyle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.ControlText
-        DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.dgvBestellungen.DefaultCellStyle = DataGridViewCellStyle2
-        Me.dgvBestellungen.Location = New System.Drawing.Point(12, 351)
+        DataGridViewCellStyle11.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle11.BackColor = System.Drawing.SystemColors.Window
+        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.ControlText
+        DataGridViewCellStyle11.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle11.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle11.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.dgvBestellungen.DefaultCellStyle = DataGridViewCellStyle11
+        Me.dgvBestellungen.Location = New System.Drawing.Point(16, 351)
        Me.dgvBestellungen.Name = "dgvBestellungen"
        Me.dgvBestellungen.ReadOnly = True
-        DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Control
-        DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvBestellungen.RowHeadersDefaultCellStyle = DataGridViewCellStyle3
+        DataGridViewCellStyle12.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle12.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle12.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle12.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle12.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvBestellungen.RowHeadersDefaultCellStyle = DataGridViewCellStyle12
        Me.dgvBestellungen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
        Me.dgvBestellungen.ShowEditingIcon = False
        Me.dgvBestellungen.Size = New System.Drawing.Size(663, 127)
@@ -696,16 +702,36 @@ Partial Class frmEssensbestellungen
        Me.cbxMenu._value = ""
        Me.cbxMenu.DropDownWidth = 200
        Me.cbxMenu.FormattingEnabled = True
-        Me.cbxMenu.Location = New System.Drawing.Point(12, 30)
+        Me.cbxMenu.Location = New System.Drawing.Point(15, 30)
        Me.cbxMenu.Name = "cbxMenu"
-        Me.cbxMenu.Size = New System.Drawing.Size(95, 21)
+        Me.cbxMenu.Size = New System.Drawing.Size(136, 21)
        Me.cbxMenu.TabIndex = 0
        '
+        'Button1
+        '
+        Me.Button1.Image = Global.AVISO.My.Resources.Resources.pdf1
+        Me.Button1.Location = New System.Drawing.Point(590, 147)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(61, 57)
+        Me.Button1.TabIndex = 20
+        Me.Button1.UseVisualStyleBackColor = True
+        Me.Button1.Visible = False
+        '
+        'txtAbteilung
+        '
+        Me.txtAbteilung.AutoSize = True
+        Me.txtAbteilung.Location = New System.Drawing.Point(581, 9)
+        Me.txtAbteilung.Name = "txtAbteilung"
+        Me.txtAbteilung.Size = New System.Drawing.Size(29, 13)
+        Me.txtAbteilung.TabIndex = 23
+        Me.txtAbteilung.Text = "EDV"
+        '
        'frmEssensbestellungen
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(687, 518)
+        Me.Controls.Add(Me.txtAbteilung)
        Me.Controls.Add(Me.lblBestellungBis)
        Me.Controls.Add(Me.cbxGebauede)
        Me.Controls.Add(Me.lblBestellungen)
@@ -794,4 +820,6 @@ Partial Class frmEssensbestellungen
    Friend WithEvents Label2 As Label
    Friend WithEvents cbxGebauede As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents lblBestellungBis As Label
+    Friend WithEvents Button1 As Button
+    Friend WithEvents txtAbteilung As Label
 End Class