Главная страница
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.013 c
14-63732
Jaxtor
2003-01-31 12:04
2003.02.20
Реальность уехать заграницу


7-63879
mBorovik
2002-12-19 09:18
2003.02.20
Сервисы на Дельфи


7-63870
Oskolok
2002-12-22 04:49
2003.02.20
Как изменить программно фоновый рисунок Рабочего Стола


14-63832
ZeroDivide
2003-02-03 13:44
2003.02.20
Группа крови на рукаве, мой порядковый IP на рукаве.


3-63579
Senator
2003-02-04 10:48
2003.02.20
Запуск программы