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

delphi 固定保持DateTime日期格式

打开项目代码,<brstyle="color:#404040;font-family:'MicrosoftYaHei','HelveticaNeue',SimSun;font-size:14px;line-height:21px;background-co...
类别:时间 标签: 作者:admin 日期:2017-07-19 23.00.07

DELPHI从网上获取北京时间

引用单元comobj,DateUtils//从英特网上获取北京时间functionGetInternetTime:string;varXmlHttp:OleVariant;datetxt:string;DateLst:TStringList;mon:string;timeGMT,GetNetTime:TDateTime;s:string;beginXmlHttp:=C…
类别:时间 标签: 作者:admin 日期:2016-01-20 22.28.07

Delphi更新本地时间

procedureUpDataLacolTime(Year,Month,Day,Hour,Minute,Second:Integer);varSysTime:SystemTime;BeginSysTime.wYear:=Year;SysTime.wMonth:=Month;SysTime.wDay:=Day;SysTime.wHour:=Hour;SysTime.wMinute:=Minute;S…
类别:时间 标签: 作者:admin 日期:2016-01-20 22.27.21

DELPHI时间相减函数

//时间相减函数procedureTimeMinus(StartTime,EndTime:string);vart,tmp:TDatetime;d,h,n,s:integer;str:string;Begint:=abs(strtodatetime(EndTime)-strtodatetime(StartTime));d:=round(t);h:=round((t-d)*24);tmp…
类别:时间 标签: 作者:admin 日期:2016-01-20 22.26.42

delphi 网络时间校对

delphi网络时间校对客户端登录的时候,自动同中间件校对时间。procedureTdmCommonFun.setLocalDateTime(Value:TDateTime);varlSystemDateTime:TSystemTime;beginDateTimeToSystemTime(Value,lSystemDateTime);SetLoc…
类别:时间 标签: 作者:admin 日期:2015-04-27 19.57.51

delphi程序不受WINDOWS日期格式的影响

delphi程序不受WINDOWS日期格式的影响如果WINDOWS系统的短日期格式为“yyyy/m/d”,执行下面的代码会报错:2013-01-2900:00:00不是合法的日期procedureTFrmQuerySale.FormShow(Sender:TObject);varsDate:string;begi…
类别:时间 标签: 作者:admin 日期:2015-04-27 19.57.23

Delphi XE5实现的一个阳历转换成阴历的代码

介绍本文章介绍了DelphiXE5实现的一个阳历转换成阴历的代码,该代码只是将阳历转换成了阴历,并不能将阴历转换成阳历,所以代码比较简单,该代码包含了一个DataCN单元,这个单元中实现了阳历转换成阴历的功能,该单元…
类别:时间 标签: 作者:admin 日期:2015-04-16 15.47.18

Delphi 取得某一天所在的星期一及星期天

usesSystem.DateUtils;//取得某一天所在的星期一及星期天procedureTForm1.Button1Click(Sender:TObject);vardw1,dw7,dnow:tdatetime;begindnow:=StrtoDatetime(edtnow.Text);dw1:=(StartOfTheWeek(dnow));edtw1.Text…
类别:时间 标签: 作者:admin 日期:2014-08-04 14.04.23

Delphi判断不同格式的时间是否相等

今天测试写了很久的模拟期货交易平台这个软件的时候,发现K线中的数据很多都是走错了的。原因分析Delphi调试很麻烦,于是打出log来看看,最终发现服务器传过来的数据的日期格式和本机的时间格式不一样,导致在判断时…
类别:时间 标签: 作者:admin 日期:2014-04-18 22.58.47

delphi 带有24节气的日历

unithxCalendar;interfaceusesClasses,Controls,Messages,Windows,Forms,Graphics,StdCtrls,Grids,SysUtils,DateUtils;typeTDayOfWeek=0..6;TDroppedCell=procedure(Sender:TObject;ACol,ARow:LongInt;varValue:stri…
类别:时间 标签: 作者:admin 日期:2014-04-02 16.12.34

Delphi 万年历 程序源码下部分(包括:农历计算、24节气、星期计算、属相)

作者:近猪者痴functionWeekDay(iYear,iMonth,iDay:Word):Integer;beginResult:=DayOfWeek(EncodeDate(iYear,iMonth,iDay));end;functionWeekNum(constTDT:TDateTime):Word;varY,M,D:Word;dtTmp:TDateTime;beginDeco…
类别:时间 标签: 作者:admin 日期:2014-04-02 16.11.15

Delphi获取13位格林治时间实现方法

格林治时间,也就是返回从UTC1970年1月1日午夜开始经过的毫秒数。(*Delphi获取13位格林治时间实现方法,与java中的java.lang.System.currentTimeMillis()效果相同*)varSysTime:TSystemTime;beginGetSystemTime(SysTi…
类别:时间 标签: 作者:admin 日期:2014-03-08 10.33.47

delphi中Time消息的使用方法

unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Con****ols,****s,Dialogs,S****C****ls;constTIMER_ID=200;typeT****1=class(T****)Label1:TLabel;btkilltime:TButton;btsettime:TBu…
类别:时间 标签: 作者:admin 日期:2013-11-22 19.58.36

Delphi中ns和ms时间的获取方法

今天突然和老师开始研究Delphi的编程~之前都是听说过~但是没有真的用过~老师说很不错~然后开始研究发现还真的不错啊···说说精确时间的获取~明天再讲讲关于DNS的问题~因为刚刚在做DNS解析的软件~~~要介绍的利用Win…
类别:时间 标签: 作者:admin 日期:2013-11-12 11.20.10

delphi 設置系統時間

functionSetSystemtime(ATime:TDateTime):Boolean;varADateTime:TSystemTime;yy,mon,dd,hh,min,ss,ms:Word;begindecodedate(ATime,yy,mon,dd);decodetime(ATime,hh,min,ss,ms);withADateTimedobeginwYear:=yy;wMonth…
类别:时间 标签: 作者:admin 日期:2013-10-30 11.18.21

Delphi处理公历到农历的转换

constSTART_YEAR=1901;END_YEAR=2050;//返回iYear年iMonth月的天数1年1月---65535年12月functionMonthDays(iYear,iMonth:Word):Word;//返回阴历iLunarYer年阴历iLunarMonth月的天数,如果iLunarMonth为闰月,//高字为…
类别:时间 标签: 作者:admin 日期:2013-10-10 20.17.48

delphi CompareDateTime、CompareDate、CompareTime、SameDateTime、SameDate、SameTime – 对比时间的函数

CompareDateTime、CompareDate、CompareTime返回的是-1、0、1;前者=后者:返回0;前者>后者:返回1;前者<后者:返回-1;SameDateTime、SameDate、SameTime返回的是True和False.unitUnit1;interfaceusesWindows,Messages,S…
类别:时间 标签: 作者:admin 日期:2013-10-10 20.08.29

delphi DateOf、TimeOf、YearOf、MonthOf、WeekOf、DayOf、HourOf、MinuteOf、SecondOf、MilliSecondOf – 提取时间成分

它们的参数都是一个TDateTime,DateOf、TimeOf分别提取日期与时间,并返回TDateTime类型;YearOf、MonthOf、WeekOf、DayOf、HourOf、MinuteOf、SecondOf、MilliSecondOf返回的都是Word类型.unitUnit1;interfaceusesWind…
类别:时间 标签: 作者:admin 日期:2013-10-10 20.07.50

delphi MonthOfTheYear、WeekOfTheYear、WeekOfTheMonth、DayOfTheYear … 相对时间

SysUtils.DayOfWeek();DateUtils.MonthOfTheYear();DateUtils.WeekOfTheYear();DateUtils.WeekOfTheMonth();DateUtils.NthDayOfWeek();DateUtils.DayOfTheYear();DateUtils.DayOfTheMonth();DateUtils.DayOfTheWeek(…
类别:时间 标签: 作者:admin 日期:2013-10-10 20.07.14

delphi YearsBetween、MonthsBetween … YearSpan、MonthSpan … 间隔时间

DateUtils.YearsBetween();DateUtils.MonthsBetween();DateUtils.WeeksBetween();DateUtils.DaysBetween();DateUtils.HoursBetween();DateUtils.MinutesBetween();DateUtils.SecondsBetween();DateUtils.MilliSecond…
类别:时间 标签: 作者:admin 日期:2013-10-10 20.06.46