Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.29;
Скачать: CL | DM;

Вниз

Помогите с фильтрацией!!!   Найти похожие ветки 

 
Kile ©   (2003-05-07 17:18) [0]

Добрый день мастера!

Чес слово, уже задалбался искать информацию...
Я новичок в этом. Никак не могу сделать фильтрацию в БД по нестрогому соответствию ((
пытался так:

procedure TForm1.Button2Click(Sender: TObject);
begin
table2.Active:= false;
table2.Filtered:=true;
table2.Filter := ""+items.text+" = """+names.text+"""";
table2.Active:=true;
DBGrid2.Visible:=true;

end;
+items.text+ - значение поля, берется из combobox
+items.text+ - пишется значение в edit

все работает нормально, когда вводишь точное значение в edit
Но все дело в том, что у меня значения состоят из нескольких слов да еще и с прбелами.
Читал про варианты
table2.Filter := ""+items.text+" = ""%"+names.text+"%""";
Толку никакого... ((
Где-то увидел мысль что можно это сделать через OnFilterRecord но так и не смог разобратся с ним (
Помогите если кому не лень ) буду благодарен )


 
WarLord ©   (2003-05-07 17:26) [1]

Используй TQuery: SQL.Add("Select * From <table2> where "+items.text+"="""+names.text+""""


 
NickBat ©   (2003-05-07 17:27) [2]

... where myfeild like "%mytext%"
or
Table.Filter:="myfeild like "+#39+"%"+EditMy.Text+"%"+#39;


 
Kile ©   (2003-05-07 18:01) [3]

Спасибо за ответы, рабочий день уже закончился, завтра попробую эти варианты )


 
VAleksey ©   (2003-05-07 18:09) [4]

В OnFilterRecord

Accept := pos(names.text,DataSet.FieldByName("lalala").AsString)<>0;


 
Kile ©   (2003-05-08 10:22) [5]

Спасибо огромное! Сработал последний вариант! Была бы возможность - поставил бы пивка )
Удачи всем!



Страницы: 1 вся ветка

Текущий архив: 2003.05.29;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
3-94721
lightix
2003-05-08 10:23
2003.05.29
TQuery.OnCalcFields ...


6-94991
stas_a
2003-04-01 09:35
2003.05.29
Отправка SMS из моуй проги.


3-94763
prof
2003-05-12 07:03
2003.05.29
Ошибка в запросе


3-94747
Andrey-k
2003-05-10 20:40
2003.05.29
Win9.x и клиент InterBase для них


1-94832
___ALex___
2003-05-19 16:58
2003.05.29
ООП