Delphi - List Box y Multiselect

Gracias por su ayuda..

En una List Box la propiedad de multiselect esta en True y el ExtendedSelect en False, eso significa los items se seleccionan cuando das un click en cualquiera de ellos; y mi pregunta es ¿Cómo puedo seleccionarlos por codigo en tiempo de ejecución?

ListBox1.Selected[Indice_del_item_que_quieras_seleccionar] := True;