数据库中DWBZ_DATE字段为字符型 ,怎么将它转换成DateTime类型,给控件赋值DateTimePicker1.Date:=ADOQuery1.FieldByName('DWBZ_DATE').AsDateTime; 这句该怎么改啊?
谢谢!!!

解决方案 »

  1.   

    试试这个
    DateTimePicker1.Date:=strtodate(ADOQuery1.FieldByName('DWBZ_DATE').Asstring)
      

  2.   

    DateTimePicker1.DateTime:=ADOQuery1.FieldByName('DWBZ_DATE').AsDateTime;
      

  3.   

    DateTimePicker1.Date:=strtodate(ADOQuery1.FieldByName('DWBZ_DATE').Asstring)提示错误2005.01.16不是有效日期 大家帮帮忙啊
      

  4.   

    提示错误2005.01.16不是有效日期
    ////////////////////////////////
    这个2005.01.16时怎么保存进去的?如果是手动输入进去的,按照人类的理解是个时间,但是程序不认识啊,把输入也限制到合法格式,或者直接用DataTimeToStr往数据库中写数据。
    或者干脆把DWBZ_DATE字段设定成Datatime格式的算了,免得麻烦!!!
      

  5.   

    看看这个代码
    datetime1:tdatetime;
    datetime1:=strtodatetime(formatdatetime('yyyy-mm-dd',DateTimePicker1.Date)+' '+formatdatetime('hh:nn:ss',DateTimePicker1.Time));
    你代一下看看
      

  6.   

    var
      vDateSeparator: Char;
    begin
      vDateSeparator := DateSeparator;
      try
        DateSeparator := '.';
        DateTimePicker1.Date := StrToDate(
          ADOQuery1.FieldByName('DWBZ_DATE').AsString, Date);
      finally
        DateSeparator := vDateSeparator;
      end;
    end;