Label1.Caption := DateToStr(StrToDate(edit1.Text) + StrToInt(edit2.Text));

解决方案 »

  1.   

    windindance(风之舞)的非常正确! Label1.Caption := DateToStr(StrToDate(edit1.Text) + StrToInt(edit2.Text));  
      

  2.   

    var a:datetime;
        
    begin
    a:= strtodate(Edit1.text);
    a:= a+ Strtoint(Edit2.text);
    label1.caption := datetostr(a);
    end;
      

  3.   

    但是好像如果edit换成三个dbedit就会出错???
    试试看???
      

  4.   

    但是好像如果edit换成三个dbedit就会出错???
    试试看??? 
      

  5.   

    你的代码?DBEDIT中是否有内容?