Código Delphi [-]ListView1.Selected := ListView1.Items[AItemIndex];
ListView1.Selected := ListView1.Items[AItemIndex];