Фильтр TDBF не находит записи

[Джентельмен]

Вообщем такая проблема.
есть БД DATABASE IV...
есть текстовое поле... VID
и мне нужно отфильтровать таблицу по этому полю...
я пишу:
DataModule1.DBF1.Filter := 'VID=' + chr(39) + Edit1.text + chr(39)
в итоге фильтр получаетса такой: VID=ТЕКСТ
вводимый текст есть в таблице, но он не находит не одной записи...
че делать?
в чем проблема?

[Lazy]

DataModule1.DBF1.Filter := 'VID="' + Edit1.text + '"';

в итоге фильтр получаетса такой: VID="ТЕКСТ"

[Джентельмен]

неее...
так не получитса...
он с кавычками запаритса...

[Lazy]

Попробуй.
Вот кусок кода, который работает:

var
Tables : TDBF;
Indexes: TDBF;

procedure TStrucForm.SetFilter;
begin
Indexes.Filter:='TABLE_NAME="'+Tables.FieldByName('TABLE_NAME').AsString+'"';
Indexes.Filtered:=CheckBox1.Checked;
end;

CheckBox1 - флажок, указывающий на необходимость использования фильтра.