RSS订阅 | 匿名投稿
您的位置:网站首页 > 时间

delphi 每年、月、周、日的开始与结束的时间StartOfAYear … StartOfTheYear … EndOfAYear … EndOfTheYear

{参数是指定的年、月、周、日}DateUtils.StartOfAYearDateUtils.StartOfAMonthDateUtils.StartOfAWeekDateUtils.StartOfADay{参数是TDateTime}DateUtils.StartOfTheYearDateUtils.StartOfTheMonthDateUtils.StartOfT…
类别:时间 标签: 作者:admin 日期:2013-10-10 20.05.48

delphi 获取指定年月的周、日数 -WeeksInAYear、WeeksInYear、DaysInAYear、DaysInAMonth、DaysInYear、DaysInMonth

DateUtils.DaysInYear();DateUtils.DaysInMonth();DateUtils.DaysInAYear();DateUtils.DaysInAMonth();DateUtils.WeeksInYear();DateUtils.WeeksInAYear();unitUnit1;interfaceusesWindows,Messages,SysUtils,Varian…
类别:时间 标签: 作者:admin 日期:2013-10-10 20.05.22

delphi 判断两个时间差是否在一个指定范围内 -WithinPastYears、WithinPastMonths、WithinPastWeeks、WithinPastDays

DateUtils.WithinPastYears();DateUtils.WithinPastMonths();DateUtils.WithinPastWeeks();DateUtils.WithinPastDays();DateUtils.WithinPastHours();DateUtils.WithinPastMinutes();DateUtils.WithinPastSeconds();…
类别:时间 标签: 作者:admin 日期:2013-10-10 20.04.09

delphi 构建时间 -EncodeDateTime … TryEncodeDateTime

SysUtils.EncodeDateTimeSysUtils.EncodeDateSysUtils.EncodeTimeDateUtils.EncodeDateDayDateUtils.EncodeDateMonthWeekDateUtils.EncodeDateTimeDateUtils.EncodeDateWeekDateUtils.EncodeDayOfWeekInMonthDateUti…
类别:时间 标签: 作者:admin 日期:2013-10-10 20.03.46

delphi 分解时间 –DecodeDate、DecodeTime … DecodeDateTime …

SysUtils.DecodeDate();SysUtils.DecodeDateFully();SysUtils.DecodeTime();DateUtils.DecodeDateTime();DateUtils.DecodeDateDay();DateUtils.DecodeDateWeek();DateUtils.DecodeDateMonthWeek();DateUtils.DecodeD…
类别:时间 标签: 作者:admin 日期:2013-10-10 20.03.02

delphi 判断时间是否合法 -IsValidDateTime、IsValidDate、IsValidTime、IsValidDateDay

DateUtils.IsValidDateTimeDateUtils.IsValidDateDateUtils.IsValidTimeDateUtils.IsValidDateDayDateUtils.IsValidDateWeekDateUtils.IsValidDateMonthWeek//可用下面几个过程抛出异常:DateUtils.InvalidDateDayErr…
类别:时间 标签: 作者:admin 日期:2013-10-10 20.01.47

delphi 是否是闰年- IsLeapYear、IsInLeapYear

SysUtils.IsLeapYear();DateUtils.IsInLeapYear();unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls;typeTForm1=class(TForm)procedureFormCreate(Sen…
类别:时间 标签: 作者:admin 日期:2013-10-10 19.59.44

delphi 判断时间是否是下午 DateUtils.IsPM

奇怪的事难道有一个isPM就没有一个ISAM,外国人的思维真奇怪肯定是认为ISAM=notisPM所以少写了一个,难道外国的日子是用PM开始?unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls…
类别:时间 标签: 作者:admin 日期:2013-10-10 19.20.37

Delphi程序不受Windows日期格式的影响

procedureSetSysDateFormat;begin//设置WINDOWS系统的短日期的格式SetLocaleInfo(LOCALE_SYSTEM_DEFAULT,LOCALE_SSHORTDATE,'yyyy-MM-dd');Application.UpdateFormatSettings:=False;//设定程序本身所使用的日期时间…
类别:时间 标签: 作者:admin 日期:2013-10-10 10.05.32

delphi 随便找个网站获取格林威治时间, 并转换到北京时间

usesWinapi.msxml,System.DateUtils;//实时获取网络时间的函数,得到的是格林威治时间;默认从sohu服务器获取,因为它最快,平均只需15毫秒functionGetNetTime(aUrl:WideString='http://www.sohu.com'):string;beginwith…
类别:时间 标签: 作者:admin 日期:2013-10-01 17.08.03

delphi中设置系统时间方法

//delphi中设置系统时间方法varsystemtime:Tsystemtime;DateTime:TDateTime;beginDateTime:=StrToDateTime(Edit1.text);//获得时间(TDateTime格式)DateTimeToSystemTime(DateTime,systemtime);//把Delphi的TDateTi…
类别:时间 标签: 作者:admin 日期:2013-04-07 09.36.22

Delphi根据输入日期按年月周日输出日期段

Delphi根据输入日期按年月周日输出日期段输入变量ADateStart,并为其填写起始日期,变量ADateEnd,计算类型AType,输出变量ADateStart,变量ADateEndprocedureFormatDateByType(AType:Integer;varADateStart,ADateEn…
类别:时间 标签: 作者:admin 日期:2013-04-02 22.04.34

delphi 获取北京时间

方法1usesComObj,DateUtils;functionGetInternetTime:string;varXmlHttp:OleVariant;datetxt:string;DateLst:TStringList;mon:string;timeGMT,GetNetTime:TDateTime;s:string;beginXmlHttp:=CreateOleObject('Micros…
类别:时间 标签: 作者:admin 日期:2013-03-25 15.57.09

delphi 倒计时对话框

unitCountDownCtrlplatform;{$R-,T-,H+,X+}interfaceusesWindows,Messages,SysUtils,Classes,Controls,Graphics,Forms,Menus,StdCtrls,Buttons,ExtCtrls;functionMyMessageDlg(varMsgStr:string;Interval:Longint):B…
类别:时间 标签: 作者:admin 日期:2013-03-21 22.28.44

delphi 公历到农历的转换法

unitCNYear;interfaceusessysutils;typeTCNDate=Cardinal;functionDecodeGregToCNDate(dtGreg:TDateTime):TCNDate;functionGetGregDateFromCN(cnYear,cnMonth,cnDay:word;bLeap:Boolean=False):TDateTime;functionGr…
类别:时间 标签: 作者:admin 日期:2013-03-20 09.33.09

Delphi2007在win7系统下的日期问题

XP和Win7的日期格式在系统默认中并不一致,比如在XP下默认是'2012-1-1',在win7下却变成了'2012/1/1'。办法1---替换法:strSetTime:='2013/1/1';ifpos('/',strSetTime)>0thenstrSetTime:=StringReplace(strSetTime,'…
类别:时间 标签: 作者:admin 日期:2013-01-24 20.12.30

delphi网络时间校对

网络时间校对proceduresetLocalDateTime(Value:TDateTime);varlSystemDateTime:TSystemTime;beginDateTimeToSystemTime(Value,lSystemDateTime);SetLocalTime(lSystemDateTime);end;
类别:时间 标签: 作者:admin 日期:2013-01-24 12.48.16

delphi 日期时间计算

一、TDateTime类型怎么进行加减运算?比如我要在当前的日期时间上再加30分钟,得到一个新的日期时间,应该怎么运算?答:TDateTime类型可直接进行运算(*前n秒的TDateTime是多少?前n分钟的TDateTime是多少?前n小时的…
类别:时间 标签: 作者:admin 日期:2013-01-22 12.53.22

delphi 公历转农历函数

delphi公历转农历函数方法一unitDateCn;interfaceusesWindows,SysUtils,Controls;const//农历月份数据,每年4字节,从1901年开始,共150年//数据来源:UCDOS6.0UCT.COM//分析整理:Copyright(c)1996-1998,Randolph//…
类别:时间 标签: 作者:admin 日期:2013-01-20 10.54.20

delphi 最全_日期格式_DateUtils时间单元说明

DateUtils时间单元说明CompareDate函数比较两个日期时间值日期部分的大小CompareDateTime函数比较两个日期时间值的大小CompareTime函数比较两个日期时间值时间部分的大小DateOf函数去除日期时间值的时间部分DateTime…
类别:时间 标签: 作者:admin 日期:2012-05-21 11.49.01