Фильтр по подстроке

← →
qaswet (2007-10-17 03:42) [0]

Как сделать фильтр по подстроке в названии?
DataModule2.base.Filter:="Name="+quotedstr(Edit1.Text+"*") - этот фильтр ищет вхождение с начала.

← →
qaswet (2007-10-17 07:14) [1]

Удалено модератором

← →
ЮЮ © (2007-10-17 09:35) [2]

1) OnFilterRecord мощнее Filter
2) Может все же использовать запросы и WHERE, а не фильтровать на клиенте.

>что, никто не знает?
Я, по крвйней мере, не пользуюсь. Откуда же взяться знаниям :)

← →
Reindeer Moss Eater © (2007-10-17 10:22) [3]

Filter фильтрует не на клиенте (Если применяется к TTable)

← →
Правильный_Вася (2007-10-17 11:35) [4]

> Если применяется к TTable

довольно сложно угадать, что используется в качестве DataModule2.base

← →
qaswet (2007-10-18 02:24) [5]

> довольно сложно угадать, что используется в качестве DataModule2.
> base

таблица BDE

← →
Германн © (2007-10-18 02:50) [6]

> qaswet (18.10.07 02:24) [5]
>
>
> > довольно сложно угадать, что используется в качестве DataModule2.
>
> > base
>
> таблица BDE
>

Ну да. Теперь всё всем стало понятно :-)
Не ну кроме - а что это за зверь? "таблица BDE"?

← →
ASoft (2007-10-18 03:30) [7]

> qaswet (17.10.07 03:42)

...Edit1.Text+"%"

← →
qaswet (2007-10-18 09:55) [8]

> Не ну кроме - а что это за зверь? "таблица BDE"?

Да просто данные о товаре: название, цена и т.д. Хочу фильтровать по названию, т.е. ввел, например, в строке поиска слово "диск" и в отфильтрованном списке содержится записи: жесткий диск, гибкий диск, переносной диск памяти и т.д.

← →
Reindeer Moss Eater © (2007-10-18 10:08) [9]

ну так и символы маски должы быть не только сзади, но и спереди

← →
qaswet (2007-10-18 10:50) [10]

> ну так и символы маски должы быть не только сзади, но и
> спереди

А как эти символы маски спереди поставить?
Так не работает
DataModule2.base.Filter:="Name="+quotedstr("*"+Edit1.Text+"*")

← →
Reindeer Moss Eater © (2007-10-18 11:21) [11]

не работает, потому что там не звезда должна быть.

← →
ASoft (2007-10-18 11:40) [12]

> ASoft (18.10.07 03:30) [7]

← →
qaswet (2007-10-19 08:09) [13]

> ASoft (18.10.07 03:30) [7]
>
> > qaswet (17.10.07 03:42)
>
> ...Edit1.Text+"%"

Символ "%" вообще никак не воспринимается, поэтому и спрашиваю, может в синтаксисе выражения какая-то ошибка?

← →
Anatoly Podgoretsky © (2007-10-19 09:02) [14]

К базе "таблицы БДЕ" фильтры не применимы.

← →
Reindeer Moss Eater © (2007-10-19 09:25) [15]

может в синтаксисе выражения какая-то ошибка?

Может знак равно заменить на что-то другое? Например на какое-нибудь слово из четырех букв.

← →
qaswet (2007-10-19 09:31) [16]

> К базе "таблицы БДЕ" фильтры не применимы.

То есть хотите сказать, что такой функции как Table.Filter не существует?:)

← →
Anatoly Podgoretsky © (2007-10-19 09:44) [17]

> qaswet (19.10.2007 09:31:16) [16]

От тебя давно хочут узнать, что за база такая "таблицы БДЕ"

← →
qaswet (2007-10-19 09:55) [18]

> > Не ну кроме - а что это за зверь? "таблица BDE"?
>
> Да просто данные о товаре: название, цена и т.д.

Что непонятно?

а цена с НДС или без?

← →
qaswet (2007-10-23 05:42) [20]

Сделал через OnFilterRecord

Accept :=pos(main.Edit1.Text,DataModule2.base.FieldByName("Name").AsString)>0

Одна только проблема функция чувствительна к регистру, можно ли это исправить?

← →
qaswet (2007-10-23 07:06) [21]

Пытался переводить все в верхний регистр - не работает...
Accept :=pos(UpperCase(main.Edit1.Text),UpperCase(DataModule2.base.FieldByName("Name"). AsString))>0

← →
qaswet (2007-10-23 07:14) [22]

Блин, UpperCase не русифицированная функция..:( Как можно ее русифицировать?

← →
ASoft (2007-10-23 07:40) [23]

AnsiUpperCase()

← →
qaswet (2007-10-23 08:04) [24]

> ASoft

Огромный тебе respect!!!!!!!!!!!!!!!!!!!!!!

← →
Alex_Y (2007-10-23 11:39) [25]

DataModule2.base.Filter:="Name like "+quotedstr("*" + Edit1.Text + "*")
и будет тебе счастье :)

Фильтр по подстроке Найти похожие ветки