有关listview滚动条的问题？

Question

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

Answer 1

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

Answer 2

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