[AlexSku]

Вот это не выделяет строку синим цветом, но не знаю, как передать правую кнопку мыши:

Код:

procedure TForm1.ListView1SelectItem(Sender: TObject; Item: TListItem;
  Selected: Boolean);
begin
  Item.Selected:= false;
end;