Drag and drop nested entries

In my attempt to standardize on the Codejock suite, I'm trying to use the report control as a replacement for another grid control I currently use. I'm sure I just don't understand the object model well enough, but have found it difficult to do common actions such as re-arranging the grid.

For example, this code will move an entry to (the end) of another group. Is this the right approach? If so, how can I re-order the Childs collection so the entry stays where I "dropped" it?


Private Sub RC_RecordsDropped(ByVal TargetRecord As XtremeReportControl.IReportRecord, ByVal Records As XtremeReportControl.IReportRecords, ByVal Above As Boolean)
Dim s As String
Dim i As Long
Dim TargetRow As ReportRow
Dim NewRec As ReportRecord
Dim Item As ReportRecordItem
    '--- Find target location
    Set TargetRow = RC.Rows.FindRowInTree(TargetRecord)
    '--- Add a new child record
    Set NewRec = TargetRow.ParentRow.Record.Childs.Add()
    '--- Manually add items (columns)
    NewRec.AddItem Records(0).Item(0).Value
    Set Item = NewRec.AddItem(Records(0).Item(1).Value)
    Item.HasCheckbox = True
    NewRec.AddItem Records(0).Item(2).Value
    '--- Delete original record
    RC.Cut
    RC.Populate
End Sub

Thanks