Цитата:
Сообщение от Cafabuiter
...ComboBox фильтруется используя строку,вводимую в Edit...
|
Да, совершенно верно. Можно, конечно, переделать и на ввод текста в ComboBox
Код:
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
if ComboBox1.Text <> '' then
ComboBox1.Items := CBFilter(ComboBox1.Text)
else
ComboBox1.Items := SList;
end;
Но тогда возникают интересные ситуации:
- По мере ввода, курсор остаётся в начале строки и как следствие вводимый текст получается перевёрнутым.
- При выборе любого элементы выпадающего списка, поле ввода становится пустым, а сам список очищается.
- Свойство AutoComplete, скорее всего, придётся отключить.
Если решить эти проблемы, то всё будет работать как Вам надо.