From 6337fe04e3688cf08ca257fd437ce41121b37d80 Mon Sep 17 00:00:00 2001 From: Andreas Luxbauer Date: Wed, 30 Apr 2025 11:09:58 +0200 Subject: [PATCH] vers --- UID/DISPO.vbproj | 150 ++++++++++++++---- UID/My Project/AssemblyInfo.vb | 4 +- .../Auswertung/subrptAuswertung.Designer.vb | 30 ++-- 3 files changed, 140 insertions(+), 44 deletions(-) diff --git a/UID/DISPO.vbproj b/UID/DISPO.vbproj index 5cbc1c9..81bbea2 100644 --- a/UID/DISPO.vbproj +++ b/UID/DISPO.vbproj @@ -92,6 +92,36 @@ + + F:\PROGRAMMIERUNG\dll\ActiveReports18\ActiveReports.Designer.resources.dll + + + F:\PROGRAMMIERUNG\dll\ActiveReports18\ActiveReports.Imports.resources.dll + + + F:\PROGRAMMIERUNG\dll\ActiveReports18\ActiveReports.Imports.Win.resources.dll + + + F:\PROGRAMMIERUNG\dll\ActiveReports18\ActiveReports.ThemeEditor.resources.dll + + + F:\PROGRAMMIERUNG\dll\ActiveReports18\ActiveReports.Viewer.resources.dll + + + F:\PROGRAMMIERUNG\dll\ActiveReports18\ActiveReports.WpfViewer.resources.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\BouncyCastle.Cryptography.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\DS.Documents.Imaging.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\DS.Documents.Pdf.dll + F:\PROGRAMMIERUNG\dll\Dynamsoft\8.3.3\Dynamsoft.Forms.Viewer.dll @@ -111,36 +141,102 @@ F:\PROGRAMMIERUNG\dll\Ghostscript.NET.dll - - C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\GrapeCity.ActiveReports.dll - - - C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\GrapeCity.ActiveReports.Chart.dll - - - C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\GrapeCity.ActiveReports.Core.Document.dll - - - C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\GrapeCity.ActiveReports.Design.Win.dll - - - C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\GrapeCity.ActiveReports.Document.dll - - - C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\GrapeCity.ActiveReports.Export.Pdf.dll - - - C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\GrapeCity.ActiveReports.Viewer.Common.dll - - - C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\GrapeCity.ActiveReports.Viewer.Win.dll - - - C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\GrapeCity.ActiveReports.Win.dll - ..\..\dll\itextsharp.dll + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Chart.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.DataProviders.dll + + + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.DataProviders.Excel.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.Document.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.Drawing.Gc.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.Drawing.Gdi.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.Export.Excel.Page.dll + + + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.Export.Image.Page.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.Export.Pdf.Section.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.Rdl.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.Rendering.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Core.Scripting.dll + + + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Design.Win.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Export.Excel.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Export.Pdf.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Export.Word.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Viewer.Common.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Viewer.Win.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.ActiveReports.Win.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.Data.DataEngine.dll + + + False + F:\PROGRAMMIERUNG\dll\ActiveReports18\MESCIUS.Data.ExpressionInfo.dll + False ..\..\dll\Report\Microsoft.ReportViewer.Common.dll diff --git a/UID/My Project/AssemblyInfo.vb b/UID/My Project/AssemblyInfo.vb index ea45673..edc9d9e 100644 --- a/UID/My Project/AssemblyInfo.vb +++ b/UID/My Project/AssemblyInfo.vb @@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/UID/Reports/Auswertung/subrptAuswertung.Designer.vb b/UID/Reports/Auswertung/subrptAuswertung.Designer.vb index 9c55d00..751aa94 100644 --- a/UID/Reports/Auswertung/subrptAuswertung.Designer.vb +++ b/UID/Reports/Auswertung/subrptAuswertung.Designer.vb @@ -195,12 +195,12 @@ Partial Public Class subrptAuswertung ChartArea1.AntiAliasMode = GrapeCity.ActiveReports.Chart.Graphics.AntiAliasMode.Graphics Axis1.Arrow = GrapeCity.ActiveReports.Chart.ArrowType.Lines Axis1.AxisType = GrapeCity.ActiveReports.Chart.AxisType.Categorical - Axis1.LabelFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Microsoft Sans Serif", 8.0!), 75.0!) + Axis1.LabelFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Microsoft Sans Serif", 8.0!), 75.0!) Axis1.MajorTick = New GrapeCity.ActiveReports.Chart.Tick(New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Black, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.Dash), New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Black, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.Dot), 1.0R, 0!, False) Axis1.MinorTick = New GrapeCity.ActiveReports.Chart.Tick(New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), 0R, 0!, False) Axis1.StaggerLabels = True - Axis1.TitleFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Microsoft Sans Serif", 8.0!)) - Axis2.LabelFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Microsoft Sans Serif", 8.0!)) + Axis1.TitleFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Microsoft Sans Serif", 8.0!)) + Axis2.LabelFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Microsoft Sans Serif", 8.0!)) Axis2.LabelsGap = 0 Axis2.LabelsVisible = False Axis2.Line = New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Black, 0) @@ -208,25 +208,25 @@ Partial Public Class subrptAuswertung Axis2.MinorTick = New GrapeCity.ActiveReports.Chart.Tick(New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), 0R, 0!, False) Axis2.Position = 0R Axis2.TickOffset = 0R - Axis2.TitleFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Microsoft Sans Serif", 8.0!)) + Axis2.TitleFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Microsoft Sans Serif", 8.0!)) Axis2.Visible = False Axis3.Arrow = GrapeCity.ActiveReports.Chart.ArrowType.Lines Axis3.AxisType = GrapeCity.ActiveReports.Chart.AxisType.Categorical Axis3.DisplayScale = True - Axis3.LabelFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Microsoft Sans Serif", 8.0!)) + Axis3.LabelFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Microsoft Sans Serif", 8.0!)) Axis3.MajorTick = New GrapeCity.ActiveReports.Chart.Tick(New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Gray, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Silver, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.Dot), 1.0R, 10.0!, True) Axis3.MinorTick = New GrapeCity.ActiveReports.Chart.Tick(New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Gray, 0), New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), 0.1R, 0!, False) Axis3.Position = 0R Axis3.Title = "Euro" - Axis3.TitleFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Microsoft Sans Serif", 8.0!), -90.0!) - Axis4.LabelFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Microsoft Sans Serif", 8.0!)) + Axis3.TitleFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Microsoft Sans Serif", 8.0!), -90.0!) + Axis4.LabelFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Microsoft Sans Serif", 8.0!)) Axis4.LabelsVisible = False Axis4.Line = New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None) Axis4.MajorTick = New GrapeCity.ActiveReports.Chart.Tick(New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), 0R, 0!, False) Axis4.MinorTick = New GrapeCity.ActiveReports.Chart.Tick(New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), 0R, 0!, False) - Axis4.TitleFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Microsoft Sans Serif", 8.0!)) + Axis4.TitleFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Microsoft Sans Serif", 8.0!)) Axis4.Visible = False - Axis5.LabelFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Microsoft Sans Serif", 8.0!)) + Axis5.LabelFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Microsoft Sans Serif", 8.0!)) Axis5.LabelsGap = 0 Axis5.LabelsVisible = False Axis5.Line = New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None) @@ -234,7 +234,7 @@ Partial Public Class subrptAuswertung Axis5.MinorTick = New GrapeCity.ActiveReports.Chart.Tick(New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), 0R, 0!, False) Axis5.Position = 0R Axis5.TickOffset = 0R - Axis5.TitleFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Microsoft Sans Serif", 8.0!)) + Axis5.TitleFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Microsoft Sans Serif", 8.0!)) Axis5.Visible = False ChartArea1.Axes.AddRange(New GrapeCity.ActiveReports.Chart.AxisBase() {Axis1, Axis2, Axis3, Axis4, Axis5}) ChartArea1.Backdrop = New GrapeCity.ActiveReports.Chart.BackdropItem(GrapeCity.ActiveReports.Chart.Graphics.BackdropStyle.Transparent, System.Drawing.Color.White, System.Drawing.Color.White, GrapeCity.ActiveReports.Chart.Graphics.GradientType.Vertical, System.Drawing.Drawing2D.HatchStyle.DottedGrid, Nothing, GrapeCity.ActiveReports.Chart.Graphics.PicturePutStyle.Stretched) @@ -261,17 +261,17 @@ Partial Public Class subrptAuswertung Title1.Backdrop = New GrapeCity.ActiveReports.Chart.Graphics.Backdrop(GrapeCity.ActiveReports.Chart.Graphics.BackdropStyle.Transparent, System.Drawing.Color.White, System.Drawing.Color.White, GrapeCity.ActiveReports.Chart.Graphics.GradientType.Vertical, System.Drawing.Drawing2D.HatchStyle.DottedGrid, Nothing, GrapeCity.ActiveReports.Chart.Graphics.PicturePutStyle.Stretched) Title1.Border = New GrapeCity.ActiveReports.Chart.Border(New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), 0, System.Drawing.Color.Black) Title1.DockArea = Nothing - Title1.Font = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Microsoft Sans Serif", 8.0!)) + Title1.Font = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Microsoft Sans Serif", 8.0!)) Title1.Name = "" Title1.Text = "" Legend1.Footer = Title1 Title2.Border = New GrapeCity.ActiveReports.Chart.Border(New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.White, 2), 0, System.Drawing.Color.Black) Title2.DockArea = Nothing - Title2.Font = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Bold)) + Title2.Font = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Arial", 8.0!, GrapeCity.ActiveReports.Chart.Drawing.FontStyle.Bold)) Title2.Name = "" Title2.Text = "Legende" Legend1.Header = Title2 - Legend1.LabelsFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Arial", 8.0!)) + Legend1.LabelsFont = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Arial", 8.0!)) Legend1.Name = "defaultLegend" Me.Chart.Legends.AddRange(New GrapeCity.ActiveReports.Chart.Legend() {Legend1}) Me.Chart.Name = "Chart" @@ -307,13 +307,13 @@ Partial Public Class subrptAuswertung Title3.Backdrop = New GrapeCity.ActiveReports.Chart.Graphics.Backdrop(GrapeCity.ActiveReports.Chart.Graphics.BackdropStyle.Transparent, System.Drawing.Color.White, System.Drawing.Color.White, GrapeCity.ActiveReports.Chart.Graphics.GradientType.Vertical, System.Drawing.Drawing2D.HatchStyle.DottedGrid, Nothing, GrapeCity.ActiveReports.Chart.Graphics.PicturePutStyle.Stretched) Title3.Border = New GrapeCity.ActiveReports.Chart.Border(New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), 0, System.Drawing.Color.Black) Title3.DockArea = Nothing - Title3.Font = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Arial", 10.0!, System.Drawing.FontStyle.Bold)) + Title3.Font = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Arial", 10.0!, GrapeCity.ActiveReports.Chart.Drawing.FontStyle.Bold)) Title3.Name = "header" Title3.Text = "Verlauf" Title4.Border = New GrapeCity.ActiveReports.Chart.Border(New GrapeCity.ActiveReports.Chart.Graphics.Line(System.Drawing.Color.Transparent, 0, GrapeCity.ActiveReports.Chart.Graphics.LineStyle.None), 0, System.Drawing.Color.Black) Title4.DockArea = Nothing Title4.Docking = GrapeCity.ActiveReports.Chart.DockType.Bottom - Title4.Font = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New System.Drawing.Font("Microsoft Sans Serif", 8.0!)) + Title4.Font = New GrapeCity.ActiveReports.Chart.FontInfo(System.Drawing.Color.Black, New GrapeCity.ActiveReports.Chart.Drawing.Font("Microsoft Sans Serif", 8.0!)) Title4.Name = "footer" Title4.Text = "Chart Footer" Title4.Visible = False