اشکال scroll به End در ListView

[nba83]

سلام
من تو listView یک سری item در زمان اجرای برنامه اضافه می کنم و می خوام که scroll همیشه رو آخرین item بمونه اما راه های زیادی رو امتحان کردم که هیچکدوم کار نمی کنه می خواستم ببینم مشکل کار من کجا ست.
این هم کد هایی که نوشتم:
ListView1.Items.Add;

ListView1.Items.Item[counter].Caption:=ss;
ListView1.Items.Item[counter].SubItems.Add(timeString);
ListView1.Items.Item[counter].ImageIndex:=StatusImageNumber;
ListView1.Focused:=true;
ListView1.Selected := ListView1.Items.Item[counter];
ListView1.ItemIndex:=counter;
INC(counter);
ListView1.perform(EM_LineScroll,0,MainCGS.ListView1.ItemIndex-1);

[nba83]

سلام
مشکل من حل شد.
برای اینکه اگه کسی به مشکل مشابه برخورد باید از تابع MakeVisible استفاده کنیم
ListView1.Selected:=ListView1.Items.Item[10];
ListView1.Selected.MakeVisible(True);