Show selected Column (Listview)

I have a listview with approx 20 columns, 4 of which are dates.

When I scroll along to one of these dates columns, and click on the columnheader to sort that column, I clear the listbox and reload in the sort order by recalling the data from the database via a recordset.

The problem is, although the data is sorted as I want, the column that has the sort on it is now not showing. I have to scroll back along to show it.

How can I set it so that the column that has the sort on it is visible?
I looked for an 'EnsureVisible' property, but either I have missed it somehow, or that isn't the way to go.

aikido..

What about a Refresh?

ListView1.refresh

since you have sorted the DB, records may reloaed in the latest order in to the list view :D

No, this doesn't work Fazi. It is still sorted, but the sorted column still doesn't show without scrolling to it!

How about using the Position Property to move the column to the first position:

VB Code:

Private Sub Command1_Click()
    ListView1.ColumnHeaders.Item(3).Position = 1
End Sub

I would like to try to keep all of the columns in the same place as they work across in a specific order, which is relevent else where.

Quote:

---

Originally Posted by aikidokid

I would like to try to keep all of the columns in the same place as they work across in a specific order, which is relevent else where.

---

Hmm, I am not sure how you could do then, sorry :(

Ok, thanks anyway Mark and Fazi, I will keep looking :)

I have been looking at MSDN here and more specifically here

I have tried using this but I get the error message:

Run-time-error '438': Property doesn't support this method

Code:

---

lresult = SendMessage(lvwShowAll, LVM_SETSELECTEDCOLUMN, 12, 0)

---

I just wondered what I have wrong with this code, and secondly, is this something that would achieve what I am after?

Is lvwShowAll a control or the hWnd of a control? (I don't think the default property of a listview is its hWnd.) SendMessage wants an hWnd as the first parameter.

Quote:

---

Originally Posted by Al42

Is lvwShowAll a control or the hWnd of a control? (I don't think the default property of a listview is its hWnd.) SendMessage wants an hWnd as the first parameter.

---

OOPS, that was a bit obvious :blush:

I have tried this and it runs, but either I don't know how to correctly use it or it doesn't do what I am after, which is to make sure a ceretain column is showing after reloading the listview from a recordset, loaded by date order.

Any ideas?

akido,

check this link as well. http://vbnet.mvps.org/code/comctl/lvmembers.htm
it has tons of messages that you can send to a listview :D.

Thanks Fazi. I have bookmarked that site :thumb:

I have changed my code to

Code:

---

SendMessage lvwShowAll.hWnd, LVM_SETSELECTEDCOLUMN, ColumnHeader.Index - 1, 0

---

but this still does not work..

From what I have read and found out so far, this is the message I need, so am I using it incorrectly?

Quote:

---

Originally Posted by Microsoft Forum

How does the ListView know which column is used for sorting?
LVM_SETSELECTEDCOLUMN

---

I now have this, but LVM_SETSELECTEDCOLUMN is showing a value of "Empty" and I don't know why!

vb Code:

If ColumnHeader.Index - 1 = 12 Then
        SendMessage lvwShowAll.hWnd, LVM_SETSELECTEDCOLUMN, ColumnHeader.Index - 1, 0
    End If

Any thig to do with the below

LVM_SETSELECTEDCOLUMN Message

MSDN :
Note: To use this API, you must provide a manifest specifying Comclt32.dll version 6.0.

:D

Thanks Fazi, I have actually been looking at this here.

I have to be honest, this seems a bit too advanced for me.
I have never used manifest files.:confused:

I don't have a lot of experience using 'SendMessage' apart from code that people have helped me with! :rolleyes:

to apply XP visual style to listviews, you need to use microsoft windows common controlls 5.0 sp2. then applying XP style is very simple. tons of articles and manifiest files are on the net.

dont warry.

What is the difference between Windows common controls 5.0 SP2
and what I am using which is Windows common controls 6.0 SP6