Código Delphi [-]ComboBox1.ItemIndex := ComboBox1.Items.IndexOf(Combobox1.Text);
ComboBox1.ItemIndex := ComboBox1.Items.IndexOf(Combobox1.Text);