VPF::ActiveDataSet.Filter - частичный поиск как?

Bodrox

Дата 4.12.2006, 15:29 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 91
Регистрация: 14.4.2004
Где: Чебоксары

Репутация: нет
Всего: нет

Есть код (из Borland ADOTest)

Код


procedure TMainForm.FilteredClick(Sender: TObject);
var
  Options: TFilterOptions;
begin
  Options := [];
  if CheckBox2.Checked then ActiveDataSet.FilterOptions:=[foNoPartialCompare];
   Include(Options, foNoPartialCompare);
  if Filtered.Checked then
    ActiveDataSet.Filter := Filter.Text;
  ActiveDataSet.Filtered := Filtered.Checked;
end;

ставлю галку в проге - а всё равно частичный поиск не работает smile

x77

Дата 4.12.2006, 15:44 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1255
Регистрация: 25.3.2002

Репутация: 1
Всего: 22

а при чём здесь частичный поиск? foNoPartialCompare определяет, как будет трактоваться звёздочка ("*") в строке фильтра. по умолчанию, если звёздочка находится в конце строки, она трактуется как wildcard, и будет найдена строка, начинающаяся с подстроки, указанной в фильтре. если же foNoPartialCompare включена в опции, это означает, что звёздочка ("*") трактуется как литера, и при указании, например, "Te*t" будет искаться именно строка Te*t.

для того, чтобы "частичный поиск" работал, надо наоборот убрать foNoPartialCompare из Options. только вот, если мне не изменяет память, полноценный поиск по заданной подстроке надо писать ручками, самому, потому что Filtered позволяет фильтровать только строки, начинающиеся с подстроки в Filter.

--------------------

Я никогда не сопротивлялся искушению, поскольку узнал: что мне
не нравится, то меня не искушает. © Джордж Бернард Шоу (Ирландия)

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Базы данных и репортинг \| Следующая тема »