TListView 列宽自适应大小

看图说话，直接看效果。

设置前：

设置后：

我使用的设置：
listview1.Columns[1].Width:=-2; //Columns[1]设置SubItems

扩展：
$a、$ ListView.Column[0].Width := -1;//列宽根据列内容自适应，此时保证列内容都可见。
$b、$ ListView.Column[0].Width := -2;//列宽根据列标题自适应，此时保证列标题可见。

实践是检验真理的唯一标准..Let’s do it together!