How can i get the Column Index and the Row Index when I click on the ListView? 1

[sal21]

How can i get the Column Index and the Row Index when I click on the ListView?

peraphs just post but not found, sorry

 

[strongm]

Here's an illustration of one method (in a MouseMove event):

[COLOR=blue]Private Sub ListView1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Dim lp As Integer
     Do Until ListView1.ColumnHeaders(lp + 1).Left > X Or lp + 1 = ListView1.ColumnHeaders.Count
        lp = lp + 1
    Loop
    Debug.Print "Col: " & lp
    lp = 0
    Do Until ListView1.ListItems(lp + 1).Top > Y Or lp + 1 = ListView1.ListItems.Count
        lp = lp + 1
    Loop
    Debug.Print "Row: " & lp
   
   [COLOR=green]' Following would also return row, but not column
   ' as, unlike the .NET listview, there is no SubItem index
   ' Debug.Print ListView1.HitTest(X, Y).Index[/color]
End Sub[/color]

 

[2009luca]

Strongm
As usual la you are a gentleman!
Tks

 

[sal21]

Strongm
As usual la you are a gentleman!
Tks