Como obter o valor do item selecionado em um ComboBox

procedure TForm1.Button1Click(Sender: TObject);
var
  item: String;
begin
  { OBS: se o estilo do ComboBox for csDropDown, o
    usuário será capaz de digitar no componente. Se
    isso acontecer, o conteúdo do combo deverá ser
    obtido usando:

    item := ComboBox1.Text;
  }

  item := ComboBox1.Items[ComboBox1.ItemIndex];

  ShowMessage('Você selecionou o ítem ' + item);
end;

Por: Gleiciano Nunes