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
