[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 и запросов сам не каких не прописывал.

[TOJluK]

Если уж решили делать так геморно, то вот:

Код:

QuotedStr(DateToStr(DBDateTimeEditEh.Value));

[thvfr]

А какой более простой способ вы можете предложить?

[TOJluK]

Использовать запрос с параметром. Скажем так- это не более простой, а более правильный. Гугл расскажет все в деталях.

[thvfr]

Сообщение от TOJluK

Использовать запрос с параметром. Скажем так- это не более простой, а более правильный. Гугл расскажет все в деталях.

Спасибо за помощь!