Как присвоить значение свойству selected в ListBox?

Code:

procedure TForm1.Button1Click(Sender: TObject);

begin

       ListBox1.Items.Add('1');

       ListBox1.Items.Add('2');

       {This will fail on a single selection ListBox}

//        ListBox1.Selected[1] := true;

       ListBox1.ItemIndex := 1; {This is ok}

end;