пользуйтесь компонентами TQuery или TADOQuery (в зависимости от типа базы).
для фильтрации используйте:
Код:
ADOQuery1.SQL.Text := 'SELECT * FROM Товары WHERE тип_товара = 1';
ADOQuery1.Open;
для возврата в обычное состояние:
Код:
ADOQuery1.SQL.Text := 'SELECT * FROM Товары';
ADOQuery1.Open;
но это так, на вскидку