[fdaptaciya]

У меня есть Edit, в него ввожу "Фамилию" и он должен найти ее. А у меня, после полного введения фамилии в поле Edit, оставляей только те фамилии которые находятся ниже искомой.

вот код

Код:

1 2 3 4 5 6 7

procedure TStudentForm.FilterFamEditChange(Se nder: TObject); begin   If Length(FilterFamEdit.Text)>0     then DataModule1.StudentTable.Filtered:= True     else DataModule1.StudentTable.Filtered:= False;   DataModule1.StudentTable.Filter:='Ф амилия>'''+FilterFamEdit.Text+''''; end;

lmikle: Пользуемся тегами!!!

[lmikle]

Сначала ставим фильтр, только потом включаем фильтрацию.
Это так, лирика.

Теперь по вопросу.
А какое условие ты поставил в фильтре?
Вот ровно то ты и получаешь в результате.

Код должен выглядеть примерно так:

Код:

1 2 3 4 5 6 7

procedure TStudentForm.FilterFamEditChange(Se nder: TObject); begin   If FilterFamEdit.Text  <> ''     then DataModule1.StudentTable.Filter:='Ф амилия='''+FilterFamEdit.Text+''''     else DataModule1.StudentTable.Filter:='';   DataModule1.StudentTable.Filtered:= FilterFamEdit.Text  <> ''; end;