Delphi, SQL, дата

[nactyx]

Всем доброго времени суток! Нужна Ваша помощь.

Имеется запрос вида:

PHP код:

SELECT бла бла бла
       FROM бла бла бла
INNER JOIN бла бла бла
       ON бла бла бла
WHERE x.[date] BETWEEN '2012-01-01' and '2013-01-01' 


(оставил только момент с датой, остальное неважно)
На уровне SQL Server Management Studio работает нормально. Пытаюсь перенести все это дело в Delphi с использованием там DateTimePicker'ов для получения диапазона дат.

Выглядит это примерно так:

  DateTimeToString(d1, 'yyyy-mm-dd', DateTimePicker1.Date);
  DateTimeToString(d2, 'yyyy-mm-dd', DateTimePicker2.Date);

  ADOQuery1.Close;
  ADOQuery1.SQL.ADD('бла бла бла');
  ADOQuery1.SQL.ADD('бла бла бла');
  ADOQuery1.SQL.ADD('бла бла бла');
  ADOQuery1.SQL.ADD('бла бла бла');
  ADOQuery1.SQL.ADD('WHERE x.[date] BETWEEN :d1 and :d2');
  ADOQuery1.Parameters.ParamByName('d1').Value := d1;
  ADOQuery1.Parameters.ParamByName('d2').Value := d2;
  ADOQuery1.Open;

Работать не хочет.
Нужна Ваша помощь.

[Serge_Bliznykov]

Вы взяли хорошую и правильную идею (использовать параметры) и извратили её до предела!!

Внимание! НЕ НУЖНО ПРЕОБРАЗОВЫВАТЬ дату в строку. и всё. Всё сразу заработает как надо!

единственное, я бы временную составляющую (которая есть в DateTimePicker в виде часов, минут, секунд) исключил из даты

попробуйте:

var d1,d2 : TDateTime;
begin
.....
  d1 := Trunc(DateTimePicker1.Date);
  d2 := Trunc(DateTimePicker2.Date);

к самому запросу/передаче параметров в запросу у меня претензий нет.

[nactyx]

Serge_Bliznykov, изначально так и делал, но мне показалось, что программа зависает. Оказывается, надо было просто подождать.
Спасибо за то, что убедили в том, что изначально я шел правильным путем Всё получилось.

[Serge_Bliznykov]

пожалуйста.

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

Serge_Bliznykovно мне показалось, что программа зависает. Оказывается, надо было просто подождать.

если имеете доступ к данной СУБД, добавьте индекс к таблице X по полю date
скорость выполнения должна резко возрасти.