delphi - SysListView32类似鼠标选择矩形

Question

我可以在 ListView 中像在 SysListView32 中一样制作鼠标选择矩形吗？

有没有办法使用 SysListView32 并在 Delphi 中使用它？

谢谢!

Answer 1

您需要设置LVS_EX_DOUBLEBUFFER ListView 的样式(仅适用于 comctl32.dll 版本 6.0 (XP) 及更高版本):

[...] This extended style also enables alpha-blended marquee selection on systems where it is supported.

uses
  commctrl;
..

ListView_SetExtendedListViewStyle(ListView1.Handle, LVS_EX_DOUBLEBUFFER);

它还可以与演示中包含的 TShellListView 组件配合使用。请参阅this answer了解如何查找和安装 shell 控件。

(PS:不要忘记将Multiselect设置为true)