ListView的Columns自适应内部文字

我是个完美主义者，既不想设置太宽，浪费界面。也不想太窄，显示不下SubItems的文字。

在网上找了很多相关的文章，都千篇一律的 AutoSize，其实并没有效果。

 

后来在一篇外文网站看到完美解决方法

 

 

将Columns的宽度设为 -1即可

例如

TntListView1.Columns[0].Width := -1;

这样宽度就会自适应SubItems里最宽的字符长度了

 

如果

 

TntListView1.Columns[0].Width := -2;

则无论SubItems的文字多长，Columns的宽度都等于Header的文字宽度

 

 图例

 

1、初始状态

2、插入一个Caption，此时宽度自适应为test宽度

3、插入一个Caption，此时宽度适应最大宽度test123

学习！备忘！