Sendungsdet DAKOSY Art

2026-05-27 09:55:19 +02:00
parent 51376bd80e
commit a5320bb2d9
2 changed files with 44 additions and 7 deletions
--- a/Aviso/frmSendungsdetailsNEU.Designer.vb
+++ b/Aviso/frmSendungsdetailsNEU.Designer.vb
@@ -37,7 +37,11 @@ Partial Class frmSendungsdetailsNEU
        Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Dim DataGridViewCellStyle13 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle15 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Dim DataGridViewCellStyle14 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle16 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle18 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle17 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Me.pnl = New System.Windows.Forms.Panel()
        Me.Panel4 = New System.Windows.Forms.Panel()
        Me.TabControl1 = New System.Windows.Forms.TabControl()
@@ -1038,7 +1042,7 @@ Partial Class frmSendungsdetailsNEU
        Me.ToolStripMenuItem8.Font = New System.Drawing.Font("Segoe UI", 9.0!)
        Me.ToolStripMenuItem8.Image = Global.AVISO.My.Resources.Resources.plus
        Me.ToolStripMenuItem8.Name = "ToolStripMenuItem8"
-        Me.ToolStripMenuItem8.Size = New System.Drawing.Size(102, 30)
+        Me.ToolStripMenuItem8.Size = New System.Drawing.Size(188, 30)
        Me.ToolStripMenuItem8.Text = "T1"
        '
        'ToolStripMenuItem9
@@ -1046,7 +1050,7 @@ Partial Class frmSendungsdetailsNEU
        Me.ToolStripMenuItem9.Font = New System.Drawing.Font("Segoe UI", 9.0!)
        Me.ToolStripMenuItem9.Image = Global.AVISO.My.Resources.Resources.plus
        Me.ToolStripMenuItem9.Name = "ToolStripMenuItem9"
-        Me.ToolStripMenuItem9.Size = New System.Drawing.Size(102, 30)
+        Me.ToolStripMenuItem9.Size = New System.Drawing.Size(188, 30)
        Me.ToolStripMenuItem9.Text = "T2"
        '
        'ToolStripMenuItem10
@@ -1054,7 +1058,7 @@ Partial Class frmSendungsdetailsNEU
        Me.ToolStripMenuItem10.Enabled = False
        Me.ToolStripMenuItem10.Image = Global.AVISO.My.Resources.Resources.plus
        Me.ToolStripMenuItem10.Name = "ToolStripMenuItem10"
-        Me.ToolStripMenuItem10.Size = New System.Drawing.Size(102, 30)
+        Me.ToolStripMenuItem10.Size = New System.Drawing.Size(188, 30)
        Me.ToolStripMenuItem10.Text = "Ü-T"
        Me.ToolStripMenuItem10.Visible = False
        '
@@ -2729,8 +2733,24 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvAbrechnung.AllowUserToResizeColumns = False
        Me.dgvAbrechnung.AllowUserToResizeRows = False
        Me.dgvAbrechnung.BackgroundColor = System.Drawing.Color.White
+        DataGridViewCellStyle13.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle13.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle13.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle13.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle13.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle13.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvAbrechnung.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle13
        Me.dgvAbrechnung.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
        Me.dgvAbrechnung.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnAbrId, Me.clmnAbrFirma, Me.clmnAbrLeistungsNr, Me.clmnAbrLeistung, Me.clmnAbrPreis})
+        DataGridViewCellStyle15.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle15.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle15.ForeColor = System.Drawing.SystemColors.ControlText
+        DataGridViewCellStyle15.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle15.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle15.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.dgvAbrechnung.DefaultCellStyle = DataGridViewCellStyle15
        Me.dgvAbrechnung.Location = New System.Drawing.Point(6, 35)
        Me.dgvAbrechnung.MultiSelect = False
        Me.dgvAbrechnung.Name = "dgvAbrechnung"
@@ -2776,8 +2796,8 @@ Partial Class frmSendungsdetailsNEU
        '
        'clmnAbrPreis
        '
-        DataGridViewCellStyle13.Format = "C2"
-        Me.clmnAbrPreis.DefaultCellStyle = DataGridViewCellStyle13
+        DataGridViewCellStyle14.Format = "C2"
+        Me.clmnAbrPreis.DefaultCellStyle = DataGridViewCellStyle14
        Me.clmnAbrPreis.HeaderText = "Preis"
        Me.clmnAbrPreis.MaxInputLength = 15
        Me.clmnAbrPreis.MinimumWidth = 6
@@ -2985,8 +3005,24 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvVorkosten.AllowUserToResizeColumns = False
        Me.dgvVorkosten.AllowUserToResizeRows = False
        Me.dgvVorkosten.BackgroundColor = System.Drawing.Color.White
+        DataGridViewCellStyle16.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle16.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle16.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle16.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle16.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle16.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvVorkosten.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle16
        Me.dgvVorkosten.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
        Me.dgvVorkosten.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnVK_id, Me.clmnFirma, Me.clmnLeistung, Me.clmnPreis})
+        DataGridViewCellStyle18.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle18.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle18.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle18.ForeColor = System.Drawing.SystemColors.ControlText
+        DataGridViewCellStyle18.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle18.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle18.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.dgvVorkosten.DefaultCellStyle = DataGridViewCellStyle18
        Me.dgvVorkosten.Location = New System.Drawing.Point(3, 4)
        Me.dgvVorkosten.MultiSelect = False
        Me.dgvVorkosten.Name = "dgvVorkosten"
@@ -3028,8 +3064,8 @@ Partial Class frmSendungsdetailsNEU
        'clmnPreis
        '
        Me.clmnPreis.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
-        DataGridViewCellStyle14.Format = "C2"
-        Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle14
+        DataGridViewCellStyle17.Format = "C2"
+        Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle17
        Me.clmnPreis.HeaderText = "Preis"
        Me.clmnPreis.MaxInputLength = 15
        Me.clmnPreis.MinimumWidth = 6
--- a/Aviso/frmSendungsdetailsNEU.vb
+++ b/Aviso/frmSendungsdetailsNEU.vb
@@ -8230,4 +8230,5 @@ Public Class frmSendungsdetailsNEU
            e.SuppressKeyPress = True
        End If
    End Sub
+
 End Class