Column-index of a line after double-click

[webu]

Hi,

if i make a double-click to a part of a list-item, i want to do different things in col 1 or col 2 or col n

if i make a click to a ColumnHeader, i can get with ColumnHeader.Index the index:

Sub lv1_ColumnClick(ColumnHeader As ColumnHeader)
Message "Click on col-number " & ColumnHeader.Index

But how do I get the column number when I (double)click on a normal part of a row?

Sub lv1_DblClick
Message "Click on col-number " ??

What is for the ??

[(X)]

A possible way is to use the HitTest event that will return the x,y coordinates where the mouse was clicked on the Listview control.

Then you can check which columnheader the x falls in between.

Dim ch As ColumnHeader
For each ch in LV1.ColumnHeaders
<do something with ch.Index, ch.Left and ch.Width>
Next

[webu]

And you're sure that's the only way? No index-var like 'ColumnHeader.Index' in the header line?

[(X)]

I should have said: A possible way so it does not seem like there is only one way. There may be other ways.

If you click on the column header I think you can get the column index directly, but, that was not what you asked about.

From Help Document:


Sub lv1_ColumnClick(ColumnHeader As ColumnHeader)

Trace ColumnHeader.Index

End Sub



[webu]

I already had the sub you quoted from help in my opening post.

Don't we have an operating system function like

Sub ObjectUnderTheMouse(obj as object)

I confess, unfortunately I don't know that either...  Maybe I should ask www.you.com about this

[webu]

Für die, die Deutsch können:

you.com/search?q=Mit%20welcher%20vb-Routine%20kommt%20man%20an%20die%20Spaltennummer%20in%20einer%20angeklickten%20Zeile%3F%20Bei%20den%20headerzeilen%20kommt%20man%20an%20diesen%20index%20%C3%BCber%20%27ColumnHeader.Index%27%2C%20aber%20wie%20schafft%20man%20das%20bei%20klicks%20auf%20%27normale%27%20Zeilen%3F&fromSearchBar=true&tbm=youchat

[(X)]

Bing offers a way using API's. I've never seen such a function in GB32.
I guess when the mouse moves, you could check if the mouse pointer is within the bounds(left, top, right, bottom) of any controls in any form you are wondering about.

[(X)]

You.com's answer is spot on! ( I didn't even hear about You.com until now.  Thanks webu!)

Question: In vb6 is there a way to get the column of a listview when the mouse clicks on a row?

Yes, in VB6, you can get the column of a ListView when the mouse clicks on a row.
One way to achieve this is by using the FindListViewRowColumn function and the GetListViewColumn function.

Here's an example of how you can implement this:


Private Sub ListView1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
   Dim row As Integer
   Dim col As Integer
   
   ' Find the row and column under the mouse
   FindListViewRowColumn X, Y, row, col
   
   ' Display the row and column numbers
   MsgBox "Clicked on Row: " & row & ", Column: " & col
End Sub

Private Sub FindListViewRowColumn(X As Single, Y As Single, ByRef row As Integer, ByRef col As Integer)
   Dim item As ListItem
   
   ' Find the item under the mouse
   Set item = ListView1.HitTest(X, Y)
   
   ' Get the column that contains the X position
   col = GetListViewColumn(X)
   
   ' Get the row index
   row = item.Index + 1
End Sub

Private Function GetListViewColumn(X As Single) As Integer
   Dim col As Integer
   
   ' Loop through the columns
   For col = 1 To ListView1.ColumnHeaders.Count
       ' Check if the X position is within the column bounds
       If X >= ListView1.ColumnHeaders(col).Left And X <= ListView1.ColumnHeaders(col).Left + ListView1.ColumnHeaders(col).Width Then
           ' Return the column index
           GetListViewColumn = col
           Exit Function
       End If
   Next col
   
   ' Return -1 if no column is found
   GetListViewColumn = -1
End Function



In this example, the `ListView1_MouseDown` event is triggered when the mouse button is pressed down on the ListView control. The `FindListViewRowColumn` function is called to determine the row and column under the mouse. The `GetListViewColumn` function is used to find the column that contains the X position.

Please note that this is just one way to achieve this functionality, and there may be other approaches as well.

[webu]

Addendum: I was ultimately very disappointed with the commands and functions you.com claimed to have available in GFA-Basic-32 to address the problem. Even when I pointed out to you.com after the chat that GFA does not have this function and that command or object property, it only modified it slightly and came up with more nonsense that does not exist in GFA-Basic-32.

Meaning: somewhat disappointing, unfortunately.

Deutsch:

Nachtrag: Ich bin letztlich sehr enttäuscht gewesen, was you.com an Befehlen und Funktionen in GFA-Basic-32 angeblich zur Verfügung hatte, um das Problem anzugehen. Auch als ich in der Folge des Chats you.com darauf hinwies, dass GFA diese Funktion und jenen Befehl oder Objekt-Eigenschaft gar nicht besitzt, hat es nur geringfügig modifiziert und sich weiteren Unsinn ausgedacht, den es unter GFA-Basic-32 nicht gibt.

Bedeutet: Etwas enttäuschend, leider.

[webu]

By the way: A program that uses this function to do different things when you click on different columns in a row is KeePass. Give it a try.

Deutsch:

Übrigens: Ein Programm, das diese Funktion nutzt, unterschiedliches zu tun, wenn man unterschiedliche Spalten in einer Zeile anklickt, ist KeePass. Versucht es gerne mal.