Update 20240102

This commit is contained in:
Stefan Hutter
2024-01-02 22:23:16 +01:00
parent 31b67036c3
commit 6164ec3d16
219 changed files with 429344 additions and 1191 deletions

View File

@@ -80,6 +80,10 @@ Partial Class LeistungDruck
Me.grpLeistungsdetails = New System.Windows.Forms.GroupBox()
Me.cbboxnrbehandler = New DPM2016.MyCombobox()
Me.GrpProdukte = New System.Windows.Forms.GroupBox()
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
Me.C1Produktzusatz = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ToolStrip4 = New System.Windows.Forms.ToolStrip()
Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.C1Produkte = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ToolStrip3 = New System.Windows.Forms.ToolStrip()
@@ -87,10 +91,6 @@ Partial Class LeistungDruck
Me.ToolStripButton3 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton4 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton()
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
Me.C1Produktzusatz = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ToolStrip4 = New System.Windows.Forms.ToolStrip()
Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
CType(Me.diwert, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DIMenge, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.dtdatum, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -112,12 +112,12 @@ Partial Class LeistungDruck
Me.Panel2.SuspendLayout()
Me.grpLeistungsdetails.SuspendLayout()
Me.GrpProdukte.SuspendLayout()
Me.GroupBox1.SuspendLayout()
CType(Me.C1Produkte, System.ComponentModel.ISupportInitialize).BeginInit()
Me.ToolStrip3.SuspendLayout()
Me.GroupBox2.SuspendLayout()
CType(Me.C1Produktzusatz, System.ComponentModel.ISupportInitialize).BeginInit()
Me.ToolStrip4.SuspendLayout()
Me.GroupBox1.SuspendLayout()
CType(Me.C1Produkte, System.ComponentModel.ISupportInitialize).BeginInit()
Me.ToolStrip3.SuspendLayout()
Me.SuspendLayout()
'
'txtErgänzung
@@ -334,8 +334,9 @@ Partial Class LeistungDruck
Me.C1Leistungen.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.C1Leistungen.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.C1Leistungen.PreviewInfo.ZoomFactor = 75.0R
Me.C1Leistungen.PrintInfo.PageSettings = CType(resources.GetObject("C1Leistungen.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.C1Leistungen.Size = New System.Drawing.Size(1142, 106)
Me.C1Leistungen.PrintInfo.MeasurementDevice = C1.Win.C1TrueDBGrid.PrintInfo.MeasurementDeviceEnum.Screen
Me.C1Leistungen.PrintInfo.MeasurementPrinterName = Nothing
Me.C1Leistungen.Size = New System.Drawing.Size(1142, 268)
Me.C1Leistungen.TabIndex = 2
Me.C1Leistungen.Text = "C1TrueDBGrid1"
Me.C1Leistungen.PropBag = resources.GetString("C1Leistungen.PropBag")
@@ -377,7 +378,7 @@ Partial Class LeistungDruck
Me.GrpTarif.Dock = System.Windows.Forms.DockStyle.Left
Me.GrpTarif.Location = New System.Drawing.Point(0, 0)
Me.GrpTarif.Name = "GrpTarif"
Me.GrpTarif.Size = New System.Drawing.Size(729, 244)
Me.GrpTarif.Size = New System.Drawing.Size(640, 244)
Me.GrpTarif.TabIndex = 1
Me.GrpTarif.TabStop = False
Me.GrpTarif.Text = "Kalkulation"
@@ -418,11 +419,12 @@ Partial Class LeistungDruck
Me.lbtarif1.CheckStateMember = Nothing
Me.lbtarif1.ContainerControlProcessDialogKey = True
Me.lbtarif1.ContextMenuStrip = Me.ContextMenuStrip1
Me.lbtarif1.Dock = System.Windows.Forms.DockStyle.Fill
Me.lbtarif1.DragDropSupport = True
Me.lbtarif1.LicenseKey = "F962CEC7-CD8F-4911-A9E9-CAB39962FC1F"
Me.lbtarif1.Location = New System.Drawing.Point(196, 28)
Me.lbtarif1.Name = "lbtarif1"
Me.lbtarif1.Size = New System.Drawing.Size(513, 208)
Me.lbtarif1.Size = New System.Drawing.Size(513, 168)
Me.lbtarif1.TabIndex = 5
Me.lbtarif1.Text = "ListBoxAdv1"
'
@@ -636,17 +638,17 @@ Partial Class LeistungDruck
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel3.Location = New System.Drawing.Point(0, 0)
Me.Panel3.Name = "Panel3"
Me.Panel3.Size = New System.Drawing.Size(1148, 570)
Me.Panel3.Size = New System.Drawing.Size(1148, 727)
Me.Panel3.TabIndex = 8
'
'GrpLeistungen
'
Me.GrpLeistungen.Controls.Add(Me.C1Leistungen)
Me.GrpLeistungen.Controls.Add(Me.ToolStrip1)
Me.GrpLeistungen.Dock = System.Windows.Forms.DockStyle.Top
Me.GrpLeistungen.Dock = System.Windows.Forms.DockStyle.Fill
Me.GrpLeistungen.Location = New System.Drawing.Point(0, 415)
Me.GrpLeistungen.Name = "GrpLeistungen"
Me.GrpLeistungen.Size = New System.Drawing.Size(1148, 150)
Me.GrpLeistungen.Size = New System.Drawing.Size(1148, 312)
Me.GrpLeistungen.TabIndex = 3
Me.GrpLeistungen.TabStop = False
Me.GrpLeistungen.Text = "Leistungen"
@@ -669,8 +671,8 @@ Partial Class LeistungDruck
'
'Panel2
'
Me.Panel2.Controls.Add(Me.GrpTarif)
Me.Panel2.Controls.Add(Me.grpLeistungsdetails)
Me.Panel2.Controls.Add(Me.GrpTarif)
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Top
Me.Panel2.Location = New System.Drawing.Point(0, 171)
Me.Panel2.Name = "Panel2"
@@ -698,9 +700,10 @@ Partial Class LeistungDruck
Me.grpLeistungsdetails.Controls.Add(Me.lblPosition)
Me.grpLeistungsdetails.Controls.Add(Me.lbldatum)
Me.grpLeistungsdetails.Controls.Add(Me.dtdatum)
Me.grpLeistungsdetails.Location = New System.Drawing.Point(735, 3)
Me.grpLeistungsdetails.Dock = System.Windows.Forms.DockStyle.Left
Me.grpLeistungsdetails.Location = New System.Drawing.Point(640, 0)
Me.grpLeistungsdetails.Name = "grpLeistungsdetails"
Me.grpLeistungsdetails.Size = New System.Drawing.Size(378, 275)
Me.grpLeistungsdetails.Size = New System.Drawing.Size(378, 244)
Me.grpLeistungsdetails.TabIndex = 2
Me.grpLeistungsdetails.TabStop = False
Me.grpLeistungsdetails.Text = "Leistungsdetails"
@@ -720,9 +723,8 @@ Partial Class LeistungDruck
'
'GrpProdukte
'
Me.GrpProdukte.Controls.Add(Me.GroupBox1)
Me.GrpProdukte.Controls.Add(Me.ToolStrip3)
Me.GrpProdukte.Controls.Add(Me.GroupBox2)
Me.GrpProdukte.Controls.Add(Me.GroupBox1)
Me.GrpProdukte.Dock = System.Windows.Forms.DockStyle.Top
Me.GrpProdukte.Location = New System.Drawing.Point(0, 0)
Me.GrpProdukte.Name = "GrpProdukte"
@@ -731,88 +733,14 @@ Partial Class LeistungDruck
Me.GrpProdukte.TabStop = False
Me.GrpProdukte.Text = "Produkte"
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.C1Produkte)
Me.GroupBox1.Dock = System.Windows.Forms.DockStyle.Left
Me.GroupBox1.Location = New System.Drawing.Point(27, 16)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(498, 152)
Me.GroupBox1.TabIndex = 0
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Produkteliste"
'
'C1Produkte
'
Me.C1Produkte.AlternatingRows = True
Me.C1Produkte.Dock = System.Windows.Forms.DockStyle.Fill
Me.C1Produkte.FilterBar = True
Me.C1Produkte.GroupByCaption = "Drag a column header here to group by that column"
Me.C1Produkte.Images.Add(CType(resources.GetObject("C1Produkte.Images"), System.Drawing.Image))
Me.C1Produkte.Location = New System.Drawing.Point(3, 16)
Me.C1Produkte.Name = "C1Produkte"
Me.C1Produkte.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.C1Produkte.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.C1Produkte.PreviewInfo.ZoomFactor = 75.0R
Me.C1Produkte.PrintInfo.PageSettings = CType(resources.GetObject("C1Produkte.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.C1Produkte.Size = New System.Drawing.Size(492, 133)
Me.C1Produkte.TabIndex = 3
Me.C1Produkte.Text = "C1TrueDBGrid1"
Me.C1Produkte.PropBag = resources.GetString("C1Produkte.PropBag")
'
'ToolStrip3
'
Me.ToolStrip3.Dock = System.Windows.Forms.DockStyle.Left
Me.ToolStrip3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton1, Me.ToolStripButton3, Me.ToolStripButton4, Me.ToolStripButton5})
Me.ToolStrip3.Location = New System.Drawing.Point(3, 16)
Me.ToolStrip3.Name = "ToolStrip3"
Me.ToolStrip3.Size = New System.Drawing.Size(24, 152)
Me.ToolStrip3.TabIndex = 5
Me.ToolStrip3.Text = "ToolStrip3"
'
'ToolStripButton1
'
Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton1.Image = CType(resources.GetObject("ToolStripButton1.Image"), System.Drawing.Image)
Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton1.Name = "ToolStripButton1"
Me.ToolStripButton1.Size = New System.Drawing.Size(21, 20)
Me.ToolStripButton1.Text = "Neues Produkt"
'
'ToolStripButton3
'
Me.ToolStripButton3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton3.Image = CType(resources.GetObject("ToolStripButton3.Image"), System.Drawing.Image)
Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton3.Name = "ToolStripButton3"
Me.ToolStripButton3.Size = New System.Drawing.Size(21, 20)
Me.ToolStripButton3.Text = "Speichern"
'
'ToolStripButton4
'
Me.ToolStripButton4.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton4.Image = CType(resources.GetObject("ToolStripButton4.Image"), System.Drawing.Image)
Me.ToolStripButton4.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton4.Name = "ToolStripButton4"
Me.ToolStripButton4.Size = New System.Drawing.Size(21, 20)
Me.ToolStripButton4.Text = "Löschen"
'
'ToolStripButton5
'
Me.ToolStripButton5.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton5.Image = CType(resources.GetObject("ToolStripButton5.Image"), System.Drawing.Image)
Me.ToolStripButton5.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton5.Name = "ToolStripButton5"
Me.ToolStripButton5.Size = New System.Drawing.Size(21, 20)
Me.ToolStripButton5.Text = "Kopieren"
'
'GroupBox2
'
Me.GroupBox2.Controls.Add(Me.C1Produktzusatz)
Me.GroupBox2.Controls.Add(Me.ToolStrip4)
Me.GroupBox2.Location = New System.Drawing.Point(531, 17)
Me.GroupBox2.Dock = System.Windows.Forms.DockStyle.Left
Me.GroupBox2.Location = New System.Drawing.Point(625, 16)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(413, 151)
Me.GroupBox2.Size = New System.Drawing.Size(513, 152)
Me.GroupBox2.TabIndex = 4
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "ProduktDetails"
@@ -829,8 +757,9 @@ Partial Class LeistungDruck
Me.C1Produktzusatz.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.C1Produktzusatz.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.C1Produktzusatz.PreviewInfo.ZoomFactor = 75.0R
Me.C1Produktzusatz.PrintInfo.PageSettings = CType(resources.GetObject("C1Produktzusatz.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.C1Produktzusatz.Size = New System.Drawing.Size(383, 132)
Me.C1Produktzusatz.PrintInfo.MeasurementDevice = C1.Win.C1TrueDBGrid.PrintInfo.MeasurementDeviceEnum.Screen
Me.C1Produktzusatz.PrintInfo.MeasurementPrinterName = Nothing
Me.C1Produktzusatz.Size = New System.Drawing.Size(483, 133)
Me.C1Produktzusatz.TabIndex = 3
Me.C1Produktzusatz.Text = "C1TrueDBGrid2"
Me.C1Produktzusatz.PropBag = resources.GetString("C1Produktzusatz.PropBag")
@@ -841,7 +770,7 @@ Partial Class LeistungDruck
Me.ToolStrip4.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton2})
Me.ToolStrip4.Location = New System.Drawing.Point(3, 16)
Me.ToolStrip4.Name = "ToolStrip4"
Me.ToolStrip4.Size = New System.Drawing.Size(24, 132)
Me.ToolStrip4.Size = New System.Drawing.Size(24, 133)
Me.ToolStrip4.TabIndex = 4
Me.ToolStrip4.Text = "ToolStrip4"
'
@@ -854,13 +783,90 @@ Partial Class LeistungDruck
Me.ToolStripButton2.Size = New System.Drawing.Size(21, 20)
Me.ToolStripButton2.Text = "Speichern"
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.C1Produkte)
Me.GroupBox1.Controls.Add(Me.ToolStrip3)
Me.GroupBox1.Dock = System.Windows.Forms.DockStyle.Left
Me.GroupBox1.Location = New System.Drawing.Point(3, 16)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(622, 152)
Me.GroupBox1.TabIndex = 0
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Produkteliste"
'
'C1Produkte
'
Me.C1Produkte.AlternatingRows = True
Me.C1Produkte.Dock = System.Windows.Forms.DockStyle.Fill
Me.C1Produkte.FilterBar = True
Me.C1Produkte.GroupByCaption = "Drag a column header here to group by that column"
Me.C1Produkte.Images.Add(CType(resources.GetObject("C1Produkte.Images"), System.Drawing.Image))
Me.C1Produkte.Location = New System.Drawing.Point(35, 16)
Me.C1Produkte.Name = "C1Produkte"
Me.C1Produkte.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.C1Produkte.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.C1Produkte.PreviewInfo.ZoomFactor = 75.0R
Me.C1Produkte.PrintInfo.MeasurementDevice = C1.Win.C1TrueDBGrid.PrintInfo.MeasurementDeviceEnum.Screen
Me.C1Produkte.PrintInfo.MeasurementPrinterName = Nothing
Me.C1Produkte.Size = New System.Drawing.Size(584, 133)
Me.C1Produkte.TabIndex = 3
Me.C1Produkte.Text = "C1TrueDBGrid1"
Me.C1Produkte.PropBag = resources.GetString("C1Produkte.PropBag")
'
'ToolStrip3
'
Me.ToolStrip3.Dock = System.Windows.Forms.DockStyle.Left
Me.ToolStrip3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton1, Me.ToolStripButton3, Me.ToolStripButton4, Me.ToolStripButton5})
Me.ToolStrip3.Location = New System.Drawing.Point(3, 16)
Me.ToolStrip3.Name = "ToolStrip3"
Me.ToolStrip3.Size = New System.Drawing.Size(32, 133)
Me.ToolStrip3.TabIndex = 5
Me.ToolStrip3.Text = "ToolStrip3"
'
'ToolStripButton1
'
Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton1.Image = CType(resources.GetObject("ToolStripButton1.Image"), System.Drawing.Image)
Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton1.Name = "ToolStripButton1"
Me.ToolStripButton1.Size = New System.Drawing.Size(29, 20)
Me.ToolStripButton1.Text = "Neues Produkt"
'
'ToolStripButton3
'
Me.ToolStripButton3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton3.Image = CType(resources.GetObject("ToolStripButton3.Image"), System.Drawing.Image)
Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton3.Name = "ToolStripButton3"
Me.ToolStripButton3.Size = New System.Drawing.Size(29, 20)
Me.ToolStripButton3.Text = "Speichern"
'
'ToolStripButton4
'
Me.ToolStripButton4.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton4.Image = CType(resources.GetObject("ToolStripButton4.Image"), System.Drawing.Image)
Me.ToolStripButton4.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton4.Name = "ToolStripButton4"
Me.ToolStripButton4.Size = New System.Drawing.Size(29, 20)
Me.ToolStripButton4.Text = "Löschen"
'
'ToolStripButton5
'
Me.ToolStripButton5.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton5.Image = CType(resources.GetObject("ToolStripButton5.Image"), System.Drawing.Image)
Me.ToolStripButton5.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton5.Name = "ToolStripButton5"
Me.ToolStripButton5.Size = New System.Drawing.Size(29, 20)
Me.ToolStripButton5.Text = "Kopieren"
'
'LeistungDruck
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Controls.Add(Me.Panel3)
Me.Name = "LeistungDruck"
Me.Size = New System.Drawing.Size(1148, 570)
Me.Size = New System.Drawing.Size(1148, 727)
CType(Me.diwert, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DIMenge, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.dtdatum, System.ComponentModel.ISupportInitialize).EndInit()
@@ -888,16 +894,16 @@ Partial Class LeistungDruck
Me.grpLeistungsdetails.ResumeLayout(False)
Me.grpLeistungsdetails.PerformLayout()
Me.GrpProdukte.ResumeLayout(False)
Me.GrpProdukte.PerformLayout()
Me.GroupBox1.ResumeLayout(False)
CType(Me.C1Produkte, System.ComponentModel.ISupportInitialize).EndInit()
Me.ToolStrip3.ResumeLayout(False)
Me.ToolStrip3.PerformLayout()
Me.GroupBox2.ResumeLayout(False)
Me.GroupBox2.PerformLayout()
CType(Me.C1Produktzusatz, System.ComponentModel.ISupportInitialize).EndInit()
Me.ToolStrip4.ResumeLayout(False)
Me.ToolStrip4.PerformLayout()
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout()
CType(Me.C1Produkte, System.ComponentModel.ISupportInitialize).EndInit()
Me.ToolStrip3.ResumeLayout(False)
Me.ToolStrip3.PerformLayout()
Me.ResumeLayout(False)
End Sub