This commit is contained in:
2020-08-20 15:36:45 +02:00
parent add39755e6
commit f803b39d0c
40 changed files with 13043 additions and 0 deletions

View File

@@ -0,0 +1,9 @@
Public Class XtraReport3
Private Sub GroupHeaderBand3_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles GroupHeaderBand3.BeforePrint, Detail.BeforePrint, GroupHeaderBand1.BeforePrint
Dim oGroupType As String = GetCurrentColumnValue("GroupType")
Dim oGroupTypeID As Integer = GetCurrentColumnValue("GroupTypeID")
If oGroupType = "HEAD" Then
e.Cancel = True
End If
End Sub
End Class