Поле, куда Вы хотите вводить символы для отбора записей (например, Pole1), имеет событие Change "изменение". В свойствах этого поля, вкладка "События", поле "изменение" - выберите в списке (процедура обработки события) и щелкните кнопку построителя слева от поля. Откроется окно модуля формы с заготовкой процедуры - туда и вставьте код, который я представил. Замените имена на свои. На каждое нажатие клавиши эта процедура будет выполняться, меняя источник строк ListBox в соответствии со значением в Вашем поле отбора (Pole1).