Active Reports to Vers 18 (from18ish..)

This commit is contained in:
2025-06-22 21:52:30 +02:00
parent 2182b5e887
commit dea90d7fb5
400 changed files with 78615 additions and 33556 deletions

View File

@@ -1,5 +1,5 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports GrapeCity.ActiveReports.Document
@@ -23,13 +23,13 @@ Public Class rptCMR
' MsgBox(CMR.CMR_Absender_1 & CMR.CMR_Absender_2 & CMR.CMR_Absender_3 & CMR.CMR_Absender_4)
Dim vbNewLine1 = Environment.NewLine
txtAbsender.Text = If(CMR.CMR_Absender_1, "")
txtAbsender.Text &= If(CMR.CMR_Absender_2 IsNot Nothing, vbNewLine1 & CMR.CMR_Absender_2, "")
txtAbsender.Text &= If(CMR.CMR_Absender_3 IsNot Nothing, vbNewLine1 & CMR.CMR_Absender_3, "")
txtAbsender.Text &= If(CMR.CMR_Absender_4 IsNot Nothing, vbNewLine1 & CMR.CMR_Absender_4, "")
txtEmpf<EFBFBD>nger.Text = If(CMR.CMR_Empf<EFBFBD>nger_1, "")
txtEmpf<EFBFBD>nger.Text &= If(CMR.CMR_Empf<EFBFBD>nger_2 IsNot Nothing, vbNewLine1 & CMR.CMR_Empf<EFBFBD>nger_2, "")
@@ -88,7 +88,7 @@ Public Class rptCMR
txtAnh<EFBFBD>ngerKg.Text = If(CMR.CMR_Nutzlast_Anh<EFBFBD>nger, "")
If CMR._kurz Then
Dim sRptKurz = New subrptLadungKurz
If CMR.CMRPos.Count > 0 Then

View File

@@ -1,5 +1,5 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports GrapeCity.ActiveReports.Document

View File

@@ -1,5 +1,5 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports GrapeCity.ActiveReports.Document

View File

@@ -2,7 +2,7 @@ Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Public Class rptEinheitspapier0735
Sub New(RandOben As Double)
' Dieser Aufruf ist f<>r den Designer erforderlich.

View File

@@ -1,5 +1,5 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports GrapeCity.ActiveReports.Document
Public Class rptEinheitspapier0736
Sub New(RandOben As Double)

View File

@@ -1,5 +1,5 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class rptEinheitspapier0777
Partial Public Class rptEinheitspapier0777
Inherits GrapeCity.ActiveReports.SectionReport
'Form overrides dispose to clean up the component list.
@@ -8,7 +8,7 @@ Partial Public Class rptEinheitspapier0777
End If
MyBase.Dispose(disposing)
End Sub
'NOTE: The following procedure is required by the ActiveReports Designer
'It can be modified using the ActiveReports Designer.
'Do not modify it using the code editor.

View File

@@ -1,7 +1,7 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Public Class rptEinheitspapier0777
Public Class rptEinheitspapier0777
Sub New(RandOben As Double)
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()

View File

@@ -1,5 +1,5 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports GrapeCity.ActiveReports.Document
Public Class rptEinheitspapier0778
Sub New(RandOben As Double)

View File

@@ -1,5 +1,5 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports GrapeCity.ActiveReports.Document
Public Class rptPreislisten

View File

@@ -310,7 +310,7 @@ Partial Public Class rptVerpflichtungserklaerung
'
Me.picVERAG.Height = 0.5000001!
Me.picVERAG.HyperLink = Nothing
Me.picVERAG.ImageData = CType(resources.GetObject("picVERAG.ImageData"), System.IO.Stream)
Me.picVERAG.ImageBase64String = resources.GetString("picVERAG.ImageBase64String")
Me.picVERAG.Left = 5.096456!
Me.picVERAG.Name = "picVERAG"
Me.picVERAG.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom

File diff suppressed because one or more lines are too long

View File

@@ -93,7 +93,7 @@ Partial Public Class rptVerpflichtungserklaerungNeu
'
Me.picVERAG.Height = 0.5000001!
Me.picVERAG.HyperLink = Nothing
Me.picVERAG.ImageData = CType(resources.GetObject("picVERAG.ImageData"), System.IO.Stream)
Me.picVERAG.ImageBase64String = resources.GetString("picVERAG.ImageBase64String")
Me.picVERAG.Left = 5.095276!
Me.picVERAG.Name = "picVERAG"
Me.picVERAG.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom

File diff suppressed because one or more lines are too long

View File

@@ -1,5 +1,5 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports GrapeCity.ActiveReports.Document
Public Class subrptPreislisten