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

Вниз

Фильтрация БД   Найти похожие ветки 

 
Murder   (2003-02-05 10:08) [0]

Здрасте!! Помогите пожалуйста!! Уже 2 день бьюсь надо вопросом фильтрации!! Как отфильтровать данные по неполному поиску т.е.
Есть Несколько Фамилий допуст Сидоров Смирнов Силков, при вводе в поле edit "Си" в Dbgrid Выводились бы те записи которые соответствуют фильтру,, т.е. Сидоров и Силков!!!


 
Anatoly Podgoretsky ©   (2003-02-05 10:21) [1]

OnFilterRecord


 
Murder   (2003-02-05 10:23) [2]

Тогда как обратиться к этому событию?


 
Mike Kouzmine   (2003-02-05 10:24) [3]

Или Filter="NAME = "Си*";


 
passm ©   (2003-02-05 10:24) [4]

Murder (05.02.03 10:08)> Например, [NAME] = "Си*" Выдаст все начинающееся на Си.


 
Murder   (2003-02-05 10:31) [5]

Вобщем есть такой поиск
procedure TForm.FindClick(Sender: TObject);
begin
if not form.Table.Locate("fam",edit_find.Text,[loPartialKey]) then
begin
messagedlg("Результат поиска не дал результатов",mtconfirmation,[mbok],0);
edit_find.Text:="";
end
else
begin
А здесь нужет вот как раз этот фильтр!!!
end;
end;


 
Mike Kouzmine   (2003-02-05 10:32) [6]

Ошибся Filter="NAME = " + QuotedStr("Си*");


 
Anatoly Podgoretsky ©   (2003-02-05 10:36) [7]

Если тебе только сначала, то Mike Kouzmine (05.02.03 10:32)


 
passm ©   (2003-02-05 10:37) [8]

Murder (05.02.03 10:31)>

Form.Table.Filter:= "[NAME] = """ + Edit_Find.Text + "*""";


 
Murder   (2003-02-05 11:01) [9]

Всем огромное спасиба!!!



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

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

Наверх




Память: 0.48 MB
Время: 0.016 c
14-63751
aga
2003-02-05 20:55
2003.02.20
Принять


8-63685
Юрий
2002-11-08 14:07
2003.02.20
Надпись под углом


14-63841
malish
2003-02-04 20:20
2003.02.20
Drawgrid


9-63461
Ангел
2002-09-12 14:13
2003.02.20
Движок для игры типа StarCraft_а на Delphi 6


1-63629
Lamerman
2003-02-11 16:28
2003.02.20
Как узнать код выделенного в Memo символа?