listview的滚动条

问：我在edit里面添加的数据   想在listview里面显示出来
但是有一个问题就是我添加之后不能马上显示出来还要
我点击一下listview的滚动条才能在里面显示出来
我想问一下有没有好的方法在程序里面写一句话
来代替滚动条显示下一行

答1：

procedure   TForm1.Button1Click(Sender:   TObject);
begin
    ListBox1.Items.Add(Edit1.Text);
    ListBox1.ItemIndex   :=   Listbox1.Items.Count   -   1;
end;

答2：

procedure   TForm1.Button1Click(Sender:   TObject);
begin
    ListView1.Selected   :=   ListView1.Items.Add;
    ListView1.Selected.Caption   :=   Edit1.Text;
    ListView1.Selected.MakeVisible(True);
end;

转自：http://topic.csdn.net/t/20040323/15/2876156.html