End else

Tablel.CancelRange;

end;

В этом случае в НД будут показаны все записи с названием товара, равным или большим указанного в Edit1 (рис. 7.27):

Рис. 7.27. После фильтрации показываются все товары с названием, равным ли большим «М».

Изменим вызов метода SetRange на следующий:

SetRange ([Editl.Text], [Editl.Text + ‘яя']);

Тогда в результате фильтрации в отфильтрованный НД попадут только записи, начи­нающиеся с введенного в Edit1 фрагмента названия товара, т.е. с буквы «М» (рис. 7.28).

Рис. 7.28. После фильтрации показываются все товары с названием, начинающимся на «М».