Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Фильтрация в базе [D7, dBase, FoxPro, Paradox]


Страницы:   1 2

anton shestakov ©   (2009-01-26 16:55:00) 

подскажите как произвести фильтрацию в бд не по первым буквам, а по последним, тоесть если мне надо найти фамилию по последним буквам! или даже по любым буквам! или при помощи фильтрации такое не возможно?
Table1.FilterOptions:=[foCaseInsensitive];
Table1.Filter:='name = '+''''+edit1.text+'*'+'''';
Table1.Filtered:=true;


  (2009-04-04 00:09:00) [1]

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


  (2009-04-04 00:08:00) [2]

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


Anatoly Podgoretsky   (2009-03-17 10:13:00) [3]

> D@nger  (17.03.2009 9:24:24)  [24]

accept := Random > 0.8;


D@nger   (2009-03-17 09:24:00) [4]

Я тоже начинающий и  как то тоже столкнулся с такой же проблемой... Anatoly Podgoretsky уже посоветовал использовать событие OnFilterRecord я так и делал в своей программе... проверяй нужное условие фильтра в этой процедуре и если оно удовлетворяет запросу то accept:=true else accept:=false. Для проверки условия пользуйся процедурами и функциями для работы со строками... я использовал функцию pos которая выдает позицию подстроки в строке ... и если подстрока является окончанием (тут уж сам думай как это проверить) то accept:=true ... ну и все... только в процедуре поставь условие когда делать такую проверку потому что эта процедура будет выполнятся каждый раз при фильтровании...


Sergey13   (2009-03-17 08:22:00) [5]

> [22] bla   (17.03.09 00:13)

Сочувствую. Но ради этого признания не стоило поднимать ветку двухмесячной давности.


bla   (2009-03-17 00:13:00) [6]

Я из объяснений ничего не понял, OnFilterRecord тоже не помогло.


Германн   (2009-01-31 01:07:00) [7]


> anton shestakov   (30.01.09 21:35) [19]
>
> такое ощущение, что никто ничего не знает! спросил, так
> никто ничего толком и не ответил точно, посмотри там, используй
> это!

Одно из воспоминаний моего детства:
Мне лет 5-6. Самое начало 60-х. Я играю во дворе. Рядом на скамейке сидит женщина с маленьким ребенком на руках. Она берет ложкой из тарелки гречневую кашу, кладёт себе в рот и жуёт. Потом через некоторое время выдавливает в рот своему ребенку пережеванную кашу из своего рта! Я так и не понял зачем она это делает, хотя несколько раз спрашивал об этом у своей мамы.

Так то ж был грудной ребенок! И времена были иные! Специализированного детского питания тогда не было.
Может ты сам начнешь пережевывать, то что тебе дают?


Johnmen   (2009-01-30 21:54:00) [8]

У всех (ну кроме тебя) ощущение, что песочница в другом месте.
Впрочем, есть ещё вариант про моск...


anton shestakov   (2009-01-30 21:35:00) [9]

такое ощущение, что никто ничего не знает! спросил, так никто ничего толком и не ответил точно, посмотри там, используй это!


Медвежонок Пятачок   (2009-01-29 16:46:00) [10]

ShowMessage(AnsiUpperCase('НебОскреБы, небоСКребы, А я мАлЕнький тАКой....'))


anton shestakov   (2009-01-29 15:57:00) [11]


> Привести Edit1.Text и DataSet['Name'])  в выражении к одному
> регистру, например, использую UnsiUpperCase


А поподробнее?


Виталий Панасенко   (2009-01-29 08:49:00) [12]


> anton shestakov   (28.01.09 21:26) [14]
>
> использовал как и советовали OnFilterRecord - написал вот
> так Accept :=(Pos(Edit1.Text, DataSet['Name']) > 0);
> И вот теперь подскажите, что добавить в эту строчку, чтобы
> сделать фильтрацию нечувствительной к регистру!
> Заранее спасибо!

Лучше так не делать. Я об DataSet['Name']. При "пустом" (null) значении поля Name получишь исключение.. Лучше сделай так: DataSet.FieldByName('Name').AsString


ЮЮ   (2009-01-29 03:32:00) [13]

Привести Edit1.Text и DataSet['Name'])  в выражении к одному регистру, например, использую UnsiUpperCase


anton shestakov   (2009-01-28 21:26:00) [14]

использовал как и советовали OnFilterRecord - написал вот так Accept :=(Pos(Edit1.Text, DataSet['Name']) > 0);
И вот теперь подскажите, что добавить в эту строчку, чтобы сделать фильтрацию нечувствительной к регистру!
Заранее спасибо!


anton shestakov   (2009-01-28 17:04:00) [15]

а по моему случаю? (конечно извините может за детский вопрос, но я не разу этим не занимался) - произвести фильтрацию в бд не по первым буквам, а по последним, тоесть если мне надо найти фамилию по последним буквам! или даже по любым буквам!


Anatoly Podgoretsky   (2009-01-28 16:41:00) [16]

> anton shestakov  (28.01.2009 16:19:11)  [11]

В OnFilterRecord можно, что угодно писать, например

accept := Random > 0.3;

Это очень можное орудие.


anton shestakov   (2009-01-28 16:19:00) [17]

а что в OnFilterRecord тогда писать?


Виталий Панасенко   (2009-01-27 16:44:00) [18]


> anton shestakov   (27.01.09 16:05) [9]


> Виталий Панасенко   (27.01.09 14:12) [8]
>
> Используй OnFilterRecord


anton shestakov   (2009-01-27 16:05:00) [19]

После компиляции проекта и ввода в edite любой буквы, хоть первой, программа вылетает и пишется Priject 1.exe raised exception class EDBEngine Error with message 'Operation not application'


Виталий Панасенко   (2009-01-27 14:12:00) [20]

Используй OnFilterRecord


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо