Фильтрация

[kuzmich]

привет всем!.
не могу сделать фильтрацию. написал код, а при выполнении выдает ошибку. прошу вас посмотреть где ошибка. он должен фильтровать по "Nomer_Gruppy"
Программа тут
зарание спасибо

[rdama]

А не проще ли так?
И кода поменьше.

  if CheckBox1.Checked then
  begin
  with table1 do
     begin
         Filtered := False;
         Filter := FieldByName('поле_для_фильтра').FullName + ' = ' + edit1.text;
         Filtered := True;
     end;
  end else  table1.Filtered := False;

[Belarusn]

У меня фильтр к кнопке привязан. вот код>>

procedure TForm1.Button1Click(Sender: TObject);
begin
anim.Animate:=not anim.Animate;
anim.Visible:=not anim.Visible;
if not Table1.Locate('Name', Edit1.Text, [loCaseInsensitive,
loPartialKey]) then
ShowMessage('Запись не найдена');
end;

[rdama]

Table1.Locate

Locate и Lookup не для фильтрации набора записей, а для поиска записи в наборе.
Не надо путать поиск и фильтрацию.
Вот статья. Правда там нет того варианта который описал я ранее.
Поиск и фильтрация данных в Delphi

Ну а вообще человеку осталось просто скопировать тот код что я привел ранее и им заменить свой. Все будет работать.
НЕ ЗАБЫТЬ ВПИСАТЬ ИМЯ ПОЛЯ ПО КОТОРОМУ БУДЕТ ПРОИЗВОДИТЬСЯ ФИЛЬТРАЦИЯ.

[Anariem]

Выдает ошибку "undeclared identifier FieldByName" Подскажите что делать=)

procedure TForm1.btn1Click(Sender: TObject);
begin
qry1.Filtered := False;
qry1.Filter := FieldByName('MOD').FullName + ' = ' + edt1.text;
qry1.Filtered := True;

end;

[Stilet]

Подскажите что делать

1) Изучать хелп по функции FieldByName
2) Смотреть пример выше внимательно (там описано к чему функция относится, чьим методом является)
3) Не лезть в чужие темы, не некропостить.
4) Код оформлять по правилам спецтегом по кнопке # на панели инструметов редактора поста.