delphi - 如何让Delphi tlistview像资源管理器一样工作

Windows资源管理器有一些我想在Delphi TListView的主题应用程序中复制的行为。

（如果我没有列表视图的主题，这可以正常工作，但如果可能的话，我宁愿有主题）

在Windows资源管理器中，当我点击图标周围的空白区域时，我仍然可以制作一个dragover框，当我右键单击时，我会获得容器的弹出菜单，而不是图标。

如果选择了主题，则选择将增加到列表中项目的整个边界框，其中主题会缩小以适合列表项中文本的大小。

我需要做些什么才能拥有主题：

enter image description here

但让他们像没有主题一样工作？

enter image description here

并像Windows资源管理器一样工作（允许在选择突出显示的部分行时拖动）

enter image description here