如何将date和time合并输入库中

如何将date和time合并输入库中，
我通过两个空间获取的时间如何合并？如果通过字符合并的话，又如何在中间加入空格呢？我尝试了用在字符后加入一个空格却不行!
如：日期：2003:03:18 时间：3：18：20

解决方案 »

  1.   

    procedure TForm1.Button1Click(Sender: TObject);
    begin
        EdtDateAndTime.Text := EdtDate.Text + ' ' + EdtTime.Text;
    end;
      

  2.   

    建议入库使用DATETIME类型，否则以后分解显示及统计就是个大问题：
      入库：=STRTODATETIME（‘DATE’+‘TIME’）；
     读出时分解：DATETOSTR（时间）+' '+timetostr(时间)
      

  3.   

    strToDateTime(Edit1.Text+' '+Edit2.Text);