Selecionar um item no ListView no Delphi

Para selecionar um item no ListView via programação use
o código abaixo.

{ Manda o foco para o ListView }
ListView1.SetFocus;



{ Seleciona o quarto item }
ListView1.Items.Item[3].Selected := true;

{ Manda o foco para o quarto item }
ListView1.Items.Item[3].Focused := true;

Um procedimento semelhante pode ser usado com o TreeView.