ListView1-> Items-> Item[n]-> Selected = true;
ListView1-> ItemFocused = ListView1-> Selected;
ListView1-> Selected-> MakeVisible(true);
ListView1-> ItemFocused = ListView1-> Selected;
ListView1-> Selected-> MakeVisible(true);