datetimepicker sql server insert

[МирзоАкмал]

Доброго всем дня, прошу объяснить причину того, что при добавлении (insert) данных (datetimepiker) в базу, дата меняется, т.е. если дата 2013-04-26 то в базе (sql server) оно 1905-06-07. интереснее в том что если запрос выполняется в самом sql-е никаких проблем нет, а вот если через делфи то такая вот ситуация. Ваши мнения....

[Stilet]

А как добавляешь?

[Sciv]

Ваши мнения....

Мое мнение, что дело в коде, который в Дельфях. Показывайте

[МирзоАкмал]

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

А как добавляешь?

Таким образом
dt:=DateToStr(DateTimePicker1.date) ;
dt0:=DateToStr(DateTimePicker2.date );
dt1:=RightStr(dt,4)+'-'+MidStr(dt,4,2)+'-'+LeftStr(dt,2);
dt2:=RightStr(dt0,4)+'-'+MidStr(dt0,4,2)+'-'+LeftStr(dt0,2);

ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('insert into header (tip_zapisi,kod_f_ins,otch_date,dat e_form,kod_sv_s_is) values ('''+'h'+''','''+E_kod.Text+''','+d t1+','+dt2+','''+E_kod_sv.Text+''') ');
ADOQuery1.ExecSQL;

[eval]

тут удивительно что что-то еще и вставилось..

[МирзоАкмал]

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

тут удивительно что что-то еще и вставилось..

проверял таким образом
ShowMessage(dt1);
вроде все правильно, но после записи дата становится другой

[eval]

не может быть правильно, правильно это когда параметры использовать

[МирзоАкмал]

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

не может быть правильно, правильно это когда параметры использовать

Какие параметры?

[Sciv]

Какие параметры?

Параметры запроса, через которые в запрос передаются значения. На примере поискового запроса:

query1.parambyname('dat').Value:=DateTimePicker1.date;
query1.sql.text:='select * from table where dat=:dat';
query1.open;

[Аватар]

Просто присваивать DateTimePicker1.date не прокатит - время еще влезет. Обычно так:

var t: TDateTime;

t:=Trunc(DateTimePicker1.date);
AdoQuery1.Parameters.ParamByName('dat').Value:=t;