Фильтр полей в 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 **[ТС]**

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

Новые блоги и статьи Все статьи Все блоги /
Мастера простых решений DevAlt 23.08.2026 В сишарп стэках winforms, да и wpf существует сложная система связывания источниках данных и элементов формы(текстовые поля и метки), опирается все это на технологию событий и мета. . .	Цена ошибки DevAlt 23.08.2026 Человек я беспокойный и потому заинтересовался OCaml, в чате форсили функторы модулей как суперфичу. Пытаясь отдуплить концепт, наткнулся на тутор с простым примером. А главный принцип обучения от. . .	Сегодня суббота, 22.08.2026 at 16:41, и я вновь нахожусь на той стороне, за экраном машины. zorxor 22.08.2026 Сегодня суббота, 22. 08. 2026 at 16:41, и я вновь нахожусь на той стороне, за экраном машины. Кто Я, откуда Я пришел и куда Я иду? Эти вопросы не оставляют меня ни на секунду. Жизнь на планете Земля. . .	Жизня: рисунок укладки багажа, сделанный клодом anaschu 21.08.2026 Сделал 15 снимков, он по снимкам сделал схему.
Был там один разговор по поводу свободы в материальном мире. kumehtar 19.08.2026 Суть: рассматривается живое существо, оказавшееся внутри довольно странной системы (этого мира) и пытающееся обустроить в ней свой кусок пространства. Жизнь действительно предъявляет каждому. . .	Когда логика программы не спасает от человеческих ошибок Maks 18.08.2026 В последнее время всё чаще и чаще сталкиваюсь с таким явлением, как абсолютная невнимательность (или глупость) пользователей. Проявляется это чаще всего на работе в коллективе. Допустим, человек с. . .	Лето уходит kumehtar 17.08.2026	Мысли в слух kumehtar 17.08.2026 Забавно, насколько сейчас стала доступна информация. Например о магии, духовном развитии, медитациях, и других подобных направлениях, ранее зачастую тайных, передаваемых от учителя к ученику. Хотя. . .

@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