Problem with RecordItemControls Removal

Hi,

after adding Buttons to ReportItems, calling populate, and removing the controls afterwards, i get an exception when i move the mouse over the ReportControl.

adding the following procedure to the form "frmItemControls" in "Report Control Sample" and calling it reproduces the behaviour every time.

Private Sub RemoveAll_Click()
    Dim i As Long
    Dim rr As ReportRecord
    Dim ri As ReportRecordItem
    For Each rr In wndReportControl.Records
        For i = 0 To rr.ItemCount - 1
            Set ri = rr.Item(i)
            ri.ItemControls.RemoveAll
        Next i
    Next
    'wndReportControl.Populate
    wndReportControl.Redraw
End Sub

i'm not sure if this is the right way to remove itemcontrols. if not, how should i do it the right way?