Update 2024-01-10

2024-01-10 09:40:00 +01:00
parent 6164ec3d16
commit 2d7f517e98
148 changed files with 2871 additions and 940 deletions
--- a/DPM2016/Klassen/clsStammdaten_flat.Designer.vb
+++ b/DPM2016/Klassen/clsStammdaten_flat.Designer.vb
@@ -40,6 +40,12 @@ Partial Class clsStammdaten_flat
        Dim Style14 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
        Dim Style15 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
        Dim Style16 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style17 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style18 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style19 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style20 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style21 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
+        Dim Style22 As C1.Win.C1TrueDBGrid.Style = New C1.Win.C1TrueDBGrid.Style()
        Me.c1daten = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
        Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
        Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton()
@@ -82,7 +88,6 @@ Partial Class clsStammdaten_flat
        Me.c1daten.AllowAddNew = True
        Me.c1daten.AllowDrop = True
        Me.c1daten.AlternatingRows = True
-        Me.c1daten.BorderColor = System.Drawing.SystemColors.WindowFrame
        Me.c1daten.CellTips = C1.Win.C1TrueDBGrid.CellTipEnum.Floating
        Me.c1daten.Dock = System.Windows.Forms.DockStyle.Fill
        Me.c1daten.FetchRowStyles = True
@@ -94,12 +99,12 @@ Partial Class clsStammdaten_flat
        Me.c1daten.PreviewInfo.Location = New System.Drawing.Point(0, 0)
        Me.c1daten.PreviewInfo.Size = New System.Drawing.Size(0, 0)
        Me.c1daten.PreviewInfo.ZoomFactor = 75.0R
-        Me.c1daten.PrintInfo.PageSettings = CType(resources.GetObject("c1daten.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
+        Me.c1daten.PrintInfo.MeasurementDevice = C1.Win.C1TrueDBGrid.PrintInfo.MeasurementDeviceEnum.Screen
+        Me.c1daten.PrintInfo.MeasurementPrinterName = Nothing
        Me.c1daten.Size = New System.Drawing.Size(758, 374)
        Me.c1daten.TabAction = C1.Win.C1TrueDBGrid.TabActionEnum.ColumnNavigation
        Me.c1daten.TabIndex = 0
        Me.c1daten.Text = "C1TrueDBGrid1"
-        Me.c1daten.UseCompatibleTextRendering = False
        Me.c1daten.PropBag = resources.GetString("c1daten.PropBag")
        '
        'ToolStrip1
@@ -197,28 +202,29 @@ Partial Class clsStammdaten_flat
        Me.C1TrueDBDropdown1.AllowColSelect = True
        Me.C1TrueDBDropdown1.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.C1TrueDBDropdown1.AlternatingRows = False
-        Me.C1TrueDBDropdown1.BorderColor = System.Drawing.SystemColors.WindowFrame
        Me.C1TrueDBDropdown1.CaptionStyle = Style1
        Me.C1TrueDBDropdown1.ColumnCaptionHeight = 17
        Me.C1TrueDBDropdown1.ColumnFooterHeight = 17
-        Me.C1TrueDBDropdown1.EvenRowStyle = Style2
+        Me.C1TrueDBDropdown1.ColumnSelectorStyle = Style2
+        Me.C1TrueDBDropdown1.EvenRowStyle = Style3
        Me.C1TrueDBDropdown1.FetchRowStyles = False
-        Me.C1TrueDBDropdown1.FooterStyle = Style3
-        Me.C1TrueDBDropdown1.HeadingStyle = Style4
-        Me.C1TrueDBDropdown1.HighLightRowStyle = Style5
+        Me.C1TrueDBDropdown1.FooterStyle = Style4
+        Me.C1TrueDBDropdown1.HeadingHotStyle = Style5
+        Me.C1TrueDBDropdown1.HeadingStyle = Style6
+        Me.C1TrueDBDropdown1.HighLightRowStyle = Style7
        Me.C1TrueDBDropdown1.Images.Add(CType(resources.GetObject("C1TrueDBDropdown1.Images"), System.Drawing.Image))
        Me.C1TrueDBDropdown1.Location = New System.Drawing.Point(16, 70)
        Me.C1TrueDBDropdown1.Name = "C1TrueDBDropdown1"
-        Me.C1TrueDBDropdown1.OddRowStyle = Style6
-        Me.C1TrueDBDropdown1.RecordSelectorStyle = Style7
+        Me.C1TrueDBDropdown1.OddRowStyle = Style8
+        Me.C1TrueDBDropdown1.RecordSelectorStyle = Style9
        Me.C1TrueDBDropdown1.RowDivider.Color = System.Drawing.Color.DarkGray
        Me.C1TrueDBDropdown1.RowDivider.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.[Single]
+        Me.C1TrueDBDropdown1.RowSelectorStyle = Style10
        Me.C1TrueDBDropdown1.RowSubDividerColor = System.Drawing.Color.DarkGray
        Me.C1TrueDBDropdown1.ScrollTips = False
        Me.C1TrueDBDropdown1.Size = New System.Drawing.Size(215, 150)
-        Me.C1TrueDBDropdown1.Style = Style8
+        Me.C1TrueDBDropdown1.Style = Style11
        Me.C1TrueDBDropdown1.TabIndex = 14
-        Me.C1TrueDBDropdown1.UseCompatibleTextRendering = False
        Me.C1TrueDBDropdown1.Visible = False
        Me.C1TrueDBDropdown1.PropBag = resources.GetString("C1TrueDBDropdown1.PropBag")
        '
@@ -228,28 +234,29 @@ Partial Class clsStammdaten_flat
        Me.C1TrueDBDropdown2.AllowColSelect = True
        Me.C1TrueDBDropdown2.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
        Me.C1TrueDBDropdown2.AlternatingRows = False
-        Me.C1TrueDBDropdown2.BorderColor = System.Drawing.SystemColors.WindowFrame
-        Me.C1TrueDBDropdown2.CaptionStyle = Style9
+        Me.C1TrueDBDropdown2.CaptionStyle = Style12
        Me.C1TrueDBDropdown2.ColumnCaptionHeight = 17
        Me.C1TrueDBDropdown2.ColumnFooterHeight = 17
-        Me.C1TrueDBDropdown2.EvenRowStyle = Style10
+        Me.C1TrueDBDropdown2.ColumnSelectorStyle = Style13
+        Me.C1TrueDBDropdown2.EvenRowStyle = Style14
        Me.C1TrueDBDropdown2.FetchRowStyles = False
-        Me.C1TrueDBDropdown2.FooterStyle = Style11
-        Me.C1TrueDBDropdown2.HeadingStyle = Style12
-        Me.C1TrueDBDropdown2.HighLightRowStyle = Style13
+        Me.C1TrueDBDropdown2.FooterStyle = Style15
+        Me.C1TrueDBDropdown2.HeadingHotStyle = Style16
+        Me.C1TrueDBDropdown2.HeadingStyle = Style17
+        Me.C1TrueDBDropdown2.HighLightRowStyle = Style18
        Me.C1TrueDBDropdown2.Images.Add(CType(resources.GetObject("C1TrueDBDropdown2.Images"), System.Drawing.Image))
        Me.C1TrueDBDropdown2.Location = New System.Drawing.Point(189, 153)
        Me.C1TrueDBDropdown2.Name = "C1TrueDBDropdown2"
-        Me.C1TrueDBDropdown2.OddRowStyle = Style14
-        Me.C1TrueDBDropdown2.RecordSelectorStyle = Style15
+        Me.C1TrueDBDropdown2.OddRowStyle = Style19
+        Me.C1TrueDBDropdown2.RecordSelectorStyle = Style20
        Me.C1TrueDBDropdown2.RowDivider.Color = System.Drawing.Color.DarkGray
        Me.C1TrueDBDropdown2.RowDivider.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.[Single]
+        Me.C1TrueDBDropdown2.RowSelectorStyle = Style21
        Me.C1TrueDBDropdown2.RowSubDividerColor = System.Drawing.Color.DarkGray
        Me.C1TrueDBDropdown2.ScrollTips = False
        Me.C1TrueDBDropdown2.Size = New System.Drawing.Size(233, 150)
-        Me.C1TrueDBDropdown2.Style = Style16
+        Me.C1TrueDBDropdown2.Style = Style22
        Me.C1TrueDBDropdown2.TabIndex = 15
-        Me.C1TrueDBDropdown2.UseCompatibleTextRendering = False
        Me.C1TrueDBDropdown2.Visible = False
        Me.C1TrueDBDropdown2.PropBag = resources.GetString("C1TrueDBDropdown2.PropBag")
        '