向Oracle插入时间类型字段成功，数据却错误

D7+ORACLE8i，用时间控件tdatetimepicker获取日期值，转换为字符串赋值给一字符串变量，然后转换成日期类型赋值给存储过程的参数，插入能成功，但是插入的值根本不是我想要的值，而是一个奇怪的值。数据库里的字段是DATE型的，存储过程代码如下：
--根据输入的日程信息来进行修改
 procedure modifyschedule(in_id in scott.task.task_id%type,
                          in_title in scott.task.title%type,
                          in_detail in scott.task.detail%type,
                          in_begintime in scott.task.begintime%type,
                          in_neednotify in scott.task.neednotify%type,
                          in_notifytime in scott.task.notifytime%type,
                          in_finished in scott.task.finished%type, 
                          in_type in scott.task.typeid%type, 
                          in_priority in scott.task.priority%type) as
  begin
    update scott.task set title=in_title,detail=in_detail,begintime=in_begintime,neednotify=in_neednotify,notifytime=in_notifytime,finished=in_finished,typeid=in_type,priority=in_priority where task_id=in_id;
    commit;
  end;程序中的代码如下：d1:=datetostr(dtpbegintime.Date );
params.ParamByName('in_begintime').Value :=strtodate(d1);把控件值设置为2009-11-11,添加新纪录后数据库里的值是07-五月 -12827 12:13:17 AM，怎么才能让数据库正确记录控件的值呢？