Hola alquimista.
Te pongo un ejemplo con un Timer que va creando items en un ListView, dejando seleccionado siempre el último:
Código Delphi
[-]
...
implementation
var
Con: Integer = 0;
procedure TForm1.Timer1Timer(Sender: TObject);
var
it: TListItem;
begin
Inc(Con);
it:= ListView1.Items.Add;
it.Caption:= IntToStr(con);
it.MakeVisible(False); it.Selected:= True; end;
...
Un saludo.