TDBgrid + groupcolumns
Hi,
I want to group 3 columns of my tdbgrid 6 in design time using the groupcolumns collection.
The code I have at the moment:
For Each loCol In grdOpdrachten.Columns
Select Case loCol.ColIndex
Case aiColIndex (parameter)
Set loColGroup = grdOpdrachten.GroupColumns.Add
(grdOpdrachten.GroupColumns.Count, loCol)
With loColGroup
.Caption = loCol.Caption
.DataField = loCol.DataField
End With
loCol.Visible = False
Exit For
End Select
Next loCol
Has anyone an idea. Thanx.
|