Report Control - Group Sub total not Visible in Print Preview

Group Sub total not Visible in Print Preview

Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Report Control
Forum Description: Topics Related to Codejock Report Control
URL: http://forum.codejock.com/forum_posts.asp?TID=16975
Printed Date: 15 November 2024 at 3:16pm
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com

Topic: Group Sub total not Visible in Print Preview

Posted By: SHAN
Subject: Group Sub total not Visible in Print Preview
Date Posted: 19 July 2010 at 7:25am

Hi,

Group Sub total not Visible in Print Preview and Column Header also not showing, But printing is Ok.See the below Screen Shot .

Print Preview Screen Shot

ReportControl Screen Shot

-------------
Product: Xtreme SuitePro (ActiveX) version 15.0.2
Platform: Windows 7 Professional
Language: Visual Basic 6.0

Replies:

Posted By: SHAN
Date Posted: 01 September 2010 at 11:39pm

This Print Preview problem only in Windows 7 But Printing Correctly.

Other Operationg System Displays in Print Preview and PrintingCorrectly

-------------
Product: Xtreme SuitePro (ActiveX) version 15.0.2
Platform: Windows 7 Professional
Language: Visual Basic 6.0

Posted By: JamGodz
Date Posted: 11 September 2010 at 4:28am

hello any update with this i also encounter in PrintPreview example. My O.S is Win7

Posted By: RJAMIN
Date Posted: 29 September 2010 at 6:24pm

Hi,

How does the group subtotal show properly on your control? When I tried to do the subtotal, unless the columns are at exact location with exact size, the subtotal will be in the wrong place (Not just alignment, but it can show up in a wrong column).

This is the code I use to generate the subtotal:

Private Sub wndReportControl_GroupOrderChangedEx(ByVal sender As Object, ByVal e As AxXtremeReportControl._DReportControlEvents_GroupOrderChangedExEvent) Handles wndReportControl.GroupOrderChangedEx
Dim row As Integer
Dim groupRow As XtremeReportControl.ReportGroupRow

    If ((e.reason And XTPReportColumnOrderChangedReason.xtpReportColumnAddedToGroupby) = XTPReportColumnOrderChangedReason.xtpReportColumnAddedToGroupby) Or _
       ((e.reason And XTPReportColumnOrderChangedReason.xtpReportColumnRemovedFromGroupby) = XTPReportColumnOrderChangedReason.xtpReportColumnRemovedFromGroupby) Then
        For row = 0 To (wndReportControl.Rows.Count - 1)
            If (wndReportControl.Rows(row).GroupRow) Then
                groupRow = wndReportControl.Rows(row)
                groupRow.GroupFormula = "SUMSUB(C6:C7) SUMSUB(C8:C9)"
                groupRow.GroupFormat = "%0.2f"
                groupRow.GroupCaption = ""
            End If
        Next
    End If
End Sub