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