I have attached a demo program with the source here:-

 type
  TForm1 = class(TForm)
   ListView1: TListView;
    ListView2: TListView;
    ListView3: TListView;
    Button1: TButton;
    procedure FormCreate(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

procedure TForm1.FormCreate(Sender: TObject);
var i:integer; J:Tlistitem;
begin
for i:=1 to 12 do
begin
  J:=Listview2.items.add;
  J.caption:='These 12 items are created WHEN Formcreate';
end;
end;
I have attached the demo program with the source code here:=

procedure TForm1.Button1Click(Sender: TObject);
var i:integer; J:Tlistitem;
begin
for i:=1 to 12 do
begin
J:=Listview3.items.add;
J.caption:='These 12 items are created WHEN click button1';
end;
end;

end.

The question is why I cant show all the width of the caption when I
click the button????  How to adjust the width of the item caption
shown in the Tlistview view in the "vsList' viewstyle?

Hope any one can help because I get stuck in this question for a long
time.

Thank very much

KC out