Mulitselect MSFlexgrid??

[99mel]

Is it possible to retrieve all the rows which are selected by the user??

i'm wanting to delete all the rows which the user selects, but i can only delete one row

Any ideas?

 

[MarkSweetland]

The trick is to not use the index of the row to remove the item since the bounds of the index changes after the removal. You can remain on the first selected row and continue to remove rows until you've reached the last selected row:

Private Sub fg_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
    Dim i As Integer
    Dim j As Integer
    Dim c As Integer
    
    i = fg.Row ' first row selected
    j = fg.RowSel ' last row selected
    
    While c <= j - i ' itterate through the selection
        fg.RemoveItem (fg.Row)
        c = c + 1
    Wend
End Sub

Mark