[fdaptaciya]

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

вот код

Код:

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]

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

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

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

Код:

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;