[thvfr]

Помогите мне с моей проблемой.

Есть база в формате .fdb . Даны в базу заносятся по дате, хочу сделать поиск по дате (компонент использую DBDateTimeEditEh)

Вот код поиска

Код:

procedure TfMain.Button1Click(Sender: TObject);

begin

    if DBDateTimeEditEh.Value > 0 then
    begin
    fDM.TLichData.Filtered:= false;
    fDM.TLichData.Filter:= 'NUMDATA=' + DateToStr(DBDateTimeEditEh.Value);
    fDM.TLichData.Filtered:= true;
end
  else
    fDM.TLichData.Filtered := false;


end;


end.

Когда выбираю дату и нажимаю на кнопку то выдает ошибку

SQL error code = -104
Token unknown - line 2, char 16
1'. Process stopped. Use Step or Run to continue.

Я понимаю что ошибка в запросе, только не могу понять где искать. Базу делал с помощью IBExpert и запросов сам не каких не прописывал.