Report Control - Grouping question.....

Print Page | Close Window

Grouping question.....

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=4071
Printed Date: 30 April 2025 at 7:34am
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com

Topic: Grouping question.....

Posted By: flauzer
Subject: Grouping question.....
Date Posted: 27 April 2006 at 3:52am

Is there a way to have case-insensitive groups?

In other words, its possible to have a property mk:@MSITStore:C:\Programmi\Codejock%20Software\ActiveX\Xtreme%20SuitePro%20ActiveX%202006\help\SymbolReference.chm::/XtremeReportControl~ReportColumn_members.html - ReportColumn .CompareMethod

in which I can set for example.....CompareMethod = optTextCompare

In 10.2 ???

Thanks

Replies:

Posted By: sserge
Date Posted: 27 April 2006 at 4:19am

Try using SortPriority + GroupPriority properties, it seems to do what you want.

--
WBR,
Serge

Posted By: flauzer
Date Posted: 27 April 2006 at 5:13am

Sorry, Serge I don't understand....

suppose you have 5 columns, and the user drag one column 'PROJ' for grouping....

We can see:

PROJ

PROJ: Project 1

item1
item2
...

PROJ: project 1

item3
item4
...

How to make 'PROJ' column case-insensitive, so that items for

Project1 and project1 belong to the same group????

Have you an example?

Thanks

Posted By: sserge
Date Posted: 27 April 2006 at 5:56am

Try following example. Place wndReport to clear Form1:


Private Sub Form_Load()
    wndReport.Columns.Add 0, "Items", 50, True
    wndReport.Columns.Add 1, "Proj", 100, True
    
    wndReport.ShowGroupBox = True
    
    Dim Record As ReportRecord
    Dim Item As ReportRecordItem
    Dim str As String
    
    For i = 1 To 16
        Set Record = wndReport.Records.Add
    
        str = "Item " & CStr(i)
        Set Item = Record.AddItem(str)
        
        str = "project 1"
        If i > 4 Then str = "Project 1"
        If i > 8 Then str = "Project 2"
        If i > 12 Then str = "project 2"
        Set Item = Record.AddItem(str)
        If i > 8 Then
              Item.GroupPriority = 2
              Item.GroupCaption = "Title for Project 2"
        Else
              Item.GroupPriority = 1
              Item.GroupCaption = "Title for Project 1"
        End If
    Next i

    wndReport.Populate
End Sub

--
WBR,
Serge

Posted By: flauzer
Date Posted: 27 April 2006 at 9:19am

Ok Serge, Thanks for the suggestions.

I was thinking about writing some code that doesn't depend on the items, but really of the property of the column: in fact I could write a "filter-function" during the loading of the items to resolve the matter of the case-insensitive items....

for example (in vb) str = Ucase(str).

But if you have a grid that "binds" some generic-recordsets it's difficult to work with the items,..... it would be better a property that says "group items in case-insensitive mode...".

I hope to have been enough clear (excuse my English)

I think that this property could be useful....If you could add it to a 10.2.....it would be appreciated

Thanks