how to make Delphi tlistview work like explorer

3
votes

Windows Explorer has some behaviors that I would like to replicate in a themed application for a Delphi TListView.

(This works fine if I don't have themes for the list view, but I'd rather have themes if at all possible)

In Windows Explorer, when I click in the white space around an icon I can still make a dragover box and when I right click I get the popup menu for the container, not the icon.

With themes on, the selection grows to the entire bounding box of the item in the list, with themes off it shrinks to fit the size of the text in the list item.

What do I need to do to have themes:

enter image description here

But keep them working like no themes?

enter image description here

and work like Windows Explorer (allowing drag when selecting part of the row that is highlighted)

enter image description here

1
delphiwindows-explorertlistview
Starting with windows vista, Windows explorer uses the undocumented DirectUIHWND class. – RRUZ
@RRUZ OK, so it won't be automatic, do you think it's possible? – Peter Turner
Try adding a image to show what do you want to accomplish. – RRUZ
@RRUZ OK, the first image is what happens now, the second is what happens without themes (I like the behavior, I don't like the style) and the third is windows explorer where everything works exactly right (but since it's not even the same control isn't a very good example) – Peter Turner

1 Answers

-1
votes

I suggest you to use VirtualTreeView instead. It is a powerful component with a huge possibilities, so you can do what you want event if the themes are not available