Фильтрация DBGrid Delphi7

[MrMorozko]

begin
st3:=ComboBox1.Text;
 if st3='Материал' then begin Table1.IndexName:='in1';st2:='S_Name'; end else
 if st3='Единица измерения' then begin Table1.IndexName:='in2';st2:='S_Unit'; end else
  if st3='Стоимость материала' then begin Table1.IndexName:='in3'; st2:='S_Price'; end else
   if st3='Количество' then begin Table1.IndexName:='in4'; st2:='S_Quantity'; end else
  begin
    Table1.SetRangeStart;
    Table1.FieldByName(st2).AsString := Edit4.Text;
    Table1.SetRangeEnd;
    Table1.FieldByName(st2).AsString := Edit5.Text;
    Table1.ApplyRange;
  end;
  end;

В чем может возникнуть загвоздка у меня не фильтруеот от одного значения до другого а просто сортирует ((((: confused:

[Stilet]

Загвоздка в том что тебя какое то из условий выполняется утвердительно, и до Table1.SetRangeStart; и иже с ним просто не доходит.