[J0ker00]

Хотел сделать поиск по дате с помощью запроса sql.

Код:

1 2 3 4 5 6 7 8 9 10

procedure TForm8.BitBtn1Click(Sender: TObject); begin ADOQuery1.active:=False; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('Select  Заказ_робіт.Дата, Перелік_робіт.код_заказа, Перелік_робіт.Назва, Перелік_робіт.Вартість_за_1, '+ ' Заказ_робіт.Количество_заказов, Заказ_робіт.Оплачено, [Вартість_за_1]*[Количество_заказов] AS Стоимость'+ ' FROM  Заказ_робіт INNER JOIN Перелік_робіт ON Заказ_робіт.Код_заказа = Перелік_робіт.код_заказа'+ ' WHERE Заказ_робіт.Дата= '+ d); ADOQuery1.Active:=True; end;

Проблема возникал в том что при вводе даты в формате 22.05.2013 выдает ошибку синтаксиса, а при вводе даты в формате 22/05/2013 в dbgrid не отображаются нужные данные. Переменную ввожу с едита.