日期加减-Delphi在指定日期上加3天.rar

时间:2022-07-30 12:58:35
【文件属性】:

文件名称:日期加减-Delphi在指定日期上加3天.rar

文件大小:6KB

文件格式:RAR

更新时间:2022-07-30 12:58:35

Delphi源码-系统相关

日期加减-Delphi在指定日期上加3天,比较基础的时间计算实例,在指定的日期天数上再加上3天,然后程序计算出之后的日期是哪年月几号,通过这个程序,你可以学会简单的时间加减计算功能,相信对Delphi编程会有不小帮助:   procedure TForm1.Button1Click(Sender: TObject);   var    Year,Month,Day : word;   begin    Year := StrToInt(Edit1.Text);    Month := StrToInt(Edit2.Text);    Day := StrToInt(Edit3.Text);    IncAMonth(Year,Month,Day,3);    Edit4.Text := IntToStr(Year) '年'    IntToStr(Month) '月'    IntToStr(Day) '日';   end;


【文件预览】:
srcfans.com
----日期加减()
--------Unit1.ddp(51B)
--------Project1.res(876B)
--------Unit1.dcu(5KB)
--------Unit1.dfm(2KB)
--------Project1.cfg(434B)
--------Project1.dpr(188B)
--------Project1.dof(2KB)
--------Unit1.pas(1KB)

网友评论