How to make my listview clickable?

Hi experts

i use a listview in detail view and set ownerdraw to TRUE

the listview is correctly drawed in the control but i cannot click any row...

here is the code :

 Private Sub lvMail_DrawColumnHeader(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawListViewColumnHeaderEventArgs) Handles lvMail.DrawColumnHeader
        e.DrawDefault = True
    End Sub


    Private Sub lvMail_DrawSubItem(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawListViewSubItemEventArgs) Handles lvMail.DrawSubItem
        Select Case e.ColumnIndex
            Case 0 'priority
                Select Case CType(e.SubItem.Text, ClsMessage.PriorityInfo)
                    Case ClsMessage.PriorityInfo.High
                        Me.DrawCenterImage(Me.ImageListSmallMail.Images("HighImportance.bmp"), e)
                    Case ClsMessage.PriorityInfo.Low
                        Me.DrawCenterImage(Me.ImageListSmallMail.Images("LowImportance.bmp"), e)
                    Case ClsMessage.PriorityInfo.Normal
                        e.DrawDefault = True
                End Select
            Case 2 'attach
                If Boolean.Parse(e.SubItem.Text) Then
                    Me.DrawCenterImage(Me.ImageListSmallMail.Images("attach2.gif"), e)
                End If
            Case 3 'read
                If Not Boolean.Parse(e.SubItem.Text) Then
                    Me.DrawCenterImage(Me.ImageListSmallMail.Images("UnopenedMail.ico"), e)
                End If
            Case Else
                e.DrawDefault = True
        End Select
    End Sub

    Private Sub DrawCenterImage(ByVal img As Image, ByVal e As DrawListViewSubItemEventArgs)
        e.DrawBackground()
        Dim x As Single = CSng(e.Bounds.Left + (e.Bounds.Width - img.Width) / 2)
        Dim y As Single = CSng(e.Bounds.Top + (e.Bounds.Height - img.Height) / 2)
        e.Graphics.DrawImage(img, x, y)
    End Sub


thank you in advance

regards