var

  I,J: Integer;

begin

  for I := 0 to 500 do

  begin

    with ListView1.Items.Add do

    begin

      Caption := IntToStr(I);



    end;



  end;

  j := ListView1.Items.Count -1;

   ListView1.Items[J].MakeVisible(True);//滚动到最后一条记录

自个儿顶一下。

第二个问题，在增加记录后面写这行代码：
SendMessage(listview1.Handle, WM_VSCROLL, SB_PAGEDOWN, 0) ;

第一个问题我也没试出来，很少用过vsSmallIcon这种模式，我也比较好奇，不知道何种需求下才用到它。

引用 4 楼  的回复:

第二个问题，在增加记录后面写这行代码：
SendMessage(listview1.Handle, WM_VSCROLL, SB_PAGEDOWN, 0) ;

第一个问题我也没试出来，很少用过vsSmallIcon这种模式，我也比较好奇，不知道何种需求下才用到它。

我用vssmallicon也是试出来的，感觉那样放的效果好。我就是读数据库的记录，生成一个列表，加checkbox，对这些记录进行选择，用vslist的时候，好像只能一列，用vsicon的时候，caption一长，好像就显示不完，最后我试到了vssmallicon感觉还能满足我的需求，不知是不是我操作没对还是怎么的。或者有其他更好的控件可以使用，请指教……

我还得自个儿顶啊？