countdown timer years months days

delphi Input Month judgment daysNeed to quote dateutils;Unit Unit1;InterfaceUsesWindows, Messages, sysutils, variants, Classes, Graphics, Controls, Forms,Dialogs,dateutils, Stdctrls;TypeTForm1 = Class (Tform)Label1:tlabel;Label2:tlabel;Label3:tlabel;Edit_nian:tedit;Edit_yue:tedit;Button1:tbutton;Procedure Button1Click (Sender:tobject);Private{Private declarations}Public{Public declarations}EndVarForm1:tform1;Implementation{$R *.DFM}Procedure Tform1.button1click (Sender:tobject);Beginlabel3.capti

functionDateAdd (interval, number, date) {/** Function: Realize the DATEADD function of JSScript. * Parameter: Interval, string expression representing the time interval to be added. * Parameter: number, numeric expression that indicates how many time intervals to add. * Parameters: Date, Time object. * Returns: the new Time object. * var now = new Date (); * var newdate = DateAdd ("D", 5,now); *---------------DateAdd (interval,nu

Code Download: http://www.zuidaima.com/share/1562038902000640.htm On the StackOverflow to find a simple, rewritten under the requirements, to share with you. Package Com.zuidaima; Import java.text.ParseException; Import Java.text.SimpleDateFormat; Import Java.util.Date; public class Relativedateformat {private static final long One_minute = 60000L; Private static final long one_hour = 3600000L; Private static final long one_day = 86400000L; Private static final long One_week =

": {Date.setdate (Date.getdate () +number); return date; Break Case "H": {date.sethours (date.gethours () +number); return date; Break Case "M": {date.setminutes (Date.getminutes () +number); return date; Break Case "S": {date.setseconds (Date.getseconds () +number); return date;