Дата (SQL + Delphi)

[Pinya]

Всем доброго времени суток.
Вот код. Работает отлично.

Form1.ADOQuery1.SQL.Text:= ('update Tabl set Cultivation = "123" Where ODATE = #20-10-2008#');

А вот это не работает вообще.

Form1.ADOQuery1.SQL.Text:= ('update Tabl set Cultivation = "123" Where ODATE = #02-10-2008#');

И самое интересное то, что не работает с числами от 1 до 9. А с остальными все в порядке.
Что я только не по перепробывал. Может кто советом подскажет...

[_SERGEYX_]

Просто отсекается ноль, если числа однозначные.
02-10-2008 превращается в 2-10-2008
Приведи дату в нормальный формат FormatDateTime(.......)

[Pinya]

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

var
 DateTime: TdateTime;
 DateStr: string;
begin 
 DateStr:= DateToStr(DateTime)
 Form1.ADOQuery1.SQL.Text:= ('update Tabl set Cultivation = "123" Where ODATE = #+Datetime+#'); // Так выдается ошибка
 Form1.ADOQuery1.SQL.Text:= ('update Tabl set Cultivation = "123" Where ODATE = #+DateStr+#');  // А так ошибки нет
end;

[_SERGEYX_]

DateStr:=FormatDateTime('dd-mm-yyyy',DateTime);