Здравствуйте!

Вот Runtime запрос, так сказать, из программы:

procedure TForm1.N10Click(Sender: TObject);
begin
with DataModule1.IBQuery1 do
begin
Close;
UnPrepare;
SQL.Clear;
SQL.Text := 'SELECT * FROM MAIN WHERE (RENTUNTIL <= ' + DateToStr(Now) + ')';
Prepare;
Open;
end;
end;

В таблице поле RENTUNTIL = тип DATE

При клике ошибка:

Dynamic SQL Error
SQL error code =-104
Token unknown - line 1, char 392.


Где я не прав в запросе?

Хочу просто выбрать записи где поле RENTUNTIL (тип DATE) меньше или равно текущей дате (сейчас)

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

Всё, спасибо - работает, но я вот ещё что раскопал в Developers Guide для IB - также работает:

...
IBQuery1.SQL.UnPrepare;
IBQuery1.SQL.LoadFromFile('filename.sql');
IBQuery1.SQL.Prepare;
...


Содержание 'filename.sql':

SELECT * FROM tablename WHERE (datefield <= 'TODAY');

вот TODAY - есть системное слово в IB (есть также - TOMORROW, NOW, YESTERDAY)



Всем спасибо