Фильтр полей в Delphi

@Du_Law · Регистрация: 17.07.2013

Студворк — интернет-сервис помощи студентам

Всем добрый день ещё раз!
Форумчане, нужна ваша помощь, т.к. я перепробовал почти все виды фильтров, которые знал, просмотрел множество тем и решил сам создать тему(админы и модеры, не серчайте

), потому как не добился нужного результата фильтрации...
База SQLite, соединение Zeos.
Прилагаю код единственного более-менее нормального фильтра, который фильтрует ТОЛЬКО слово, записанное полностью.

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//в комментариях записал то, что я пробовал  
procedure TForm1.Edit1Change(Sender: TObject);
begin
  if Edit1.Text <> '' then begin
//if length(Edit1.Text) > 0 then begin
    ZTable1.Filter := 'Vessel LIKE ' + #39 + Edit1.Text + #39; //фильтрует только по полному слову
  //ZTable1.Filter := 'Vessel LIKE '+ '%' + #39 + Edit1.Text + '%' + #39; эта вроде бы должна помочь, но при ней ничего не выводит
  //ZTable1.Filter := 'Vessel>'''+Edit1.Text+'''' ;
  //ZTable1.Filter := 'Vessel LIKE' + QuotedStr('''');  
  //ZTable1.Filter := 'Vessel>'''+Edit1.Text+'''' ;
    ZTable1.Filtered := true
    end else
    ZTable1.Filtered := false;
end;

Добавлено через 49 минут

Delphi
1
ZTable1.Filter := 'Vessel like' + QuotedStr(Edit1.Text);

вот так тоже на полностью введенное слово работает..)
А мне надо бы, чтобы работало начиная с 1 буквы)

@Du_Law · 05.08.2013, 22:09 **[ТС]**

Сообщение от northener

Собственно для этого его и придумали. Пользователь вводит в Эдит слово, а список при этом позиционируется на ближайшее слово, в котором совпали уже введенные в Эдит буквы.

А разве нельзя использовать компоненты Zeos: ZQuery и ZTable для работы с БД? Они же для этого как раз и придуманы.
Я не могу использовать TTable, потому что моя работа с данными(ввод, вывод, изменение, тот же фильтр) осуществляется благодаря ZQuery.
К тому же фильтрация есть, но по полному слову(словам) в таблице Vessel. Комбинация Locate + KeyUp работает безупречно по "инкрементому поиску", но она бесполезна, мне нужен именно фильтр.

@droider · 05.08.2013, 22:15

northener, оператора LIKE для этого вполне достаточно. У ТС фильтр не отрабатывается вообще.

@Du_Law · 05.08.2013, 22:17 **[ТС]**

Сообщение от droider

оператора LIKE для этого вполне достаточно

Чего же он тогда у меня не работает полноценно?..

@droider · 05.08.2013, 23:58

Выложите проект, посмотрим

@Du_Law · 06.08.2013, 01:02 **[ТС]**

Проверяйте

И ещё, если сможете, добавьте пожалуйста такую вещь: при нажатии на определенную дату календаря, высвечивалось сообщение в DBGride (или в самом календаре как выплывающий список) на эту дату. Я использовал календарь от Alpha. Буду премного благодарен!

P.S. У меня сейчас наоборот - нажал на запись в Гриде, отобразилась дата в Календаре..)

@Du_Law · 06.08.2013, 11:24 **[ТС]**

Доброе утро, форумчане!)
Кто ещё сможет мне помочь с этими проблемами, не стесняйтесь

Новые блоги и статьи Все статьи Все блоги /
Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .

@droider 4893 / 2826 / 867 Регистрация: 04.10.2012 Сообщений: 10,278
	05.08.2013, 22:15
	northener, оператора LIKE для этого вполне достаточно. У ТС фильтр не отрабатывается вообще. 0

@droider 4893 / 2826 / 867 Регистрация: 04.10.2012 Сообщений: 10,278
	05.08.2013, 23:58
	Выложите проект, посмотрим 0

@Du_Law 0 / 0 / 0 Регистрация: 17.07.2013 Сообщений: 111
	06.08.2013, 11:24 [ТС]
	Доброе утро, форумчане!) Кто ещё сможет мне помочь с этими проблемами, не стесняйтесь 0