Да там что-то не то с кавычками и скобками.
Если не ошибаюсь, то должно быть так:
Код:
DataModule2.ADOQueryApteka.SQL.Add('WHERE ([DataProdagi] BETWEEN ' + d1 + ' AND ' + d2 + ') AND (idAA = ' + id +')');
PS. Возможно, даты надо тоже "закавычить" в запросе.
а вообще, что бы было менще путаницы, я использую функцию Format:
Код:
DataModule2.ADOQueryApteka.SQL.Add(Format('WHERE ([DataProdagi] BETWEEN %s AND %s) AND (idAA = %s)',[d1,d2,id]));
Если даты надо кавычить, то так:
Код:
DataModule2.ADOQueryApteka.SQL.Add(Format('WHERE ([DataProdagi] BETWEEN ''%s'' AND ''%s'') AND (idAA = %s)',[d1,d2,id]));