delphi ListView控件用vsList样式，显示文字不全，怎么解决呢？

如下图

怎么设置或者代码设置，让后面的文字都显示出来呢？
求老师告知。

试试看vsSmallIcon，或者单列vsReport去掉表头