随笔分类 - Delphi-Time
摘要：uses messages; Procedure SetDateFormat; //设置系统日期格式var buf:pchar; i:integer; p:DWORD;begin getmem(buf,100); i:=100; //i必须在调用前赋值为buf缓冲区的长度。如果设为0或负值，将取不到
阅读全文
摘要：●function MonthsBetween(const ANow, AThen: TDateTime): Integer; 描述： 根据两个给定的TDateTime类型的参数ANow和AThen，MonthsBetween函数能得到两个日期在月份 上差距数。因为月份的天数是不同的，所以 Mont
阅读全文
摘要：Str:= '2010-4-13 06:22:22'; StrToDateTime(Str); 现象：在WinXP, Win2003 都不会报错 但是在Windows7,Windows Server 2008 上，报 ‘xxx’ is not a valid date and time 错误 后来发
阅读全文
摘要：uses DateUtils;DateTimeToUnix(Now) 可以转换到unix时间，但是注意的是，它得到的时间比c语言中time()得到的时间大了8*60*60这是因为Now是当前时区的时间，c语言中time()是按格林威治时间计算的，北京时间比格林威治时间多了8小时DateTimeToU
阅读全文
摘要：我在NT Service里，使用delphi的CompareDate函数出错，我怀疑这个函数有bug，总是说我的参数多了''，所以没办法自己弄了一个！ [delphi] view plain copy { //功能：比较日期 //参数： //a:比较的日期，格式(2013-07-23) //b:要比
阅读全文
摘要：如果WINDOWS系统的短日期格式为“yyyy/m/d”，执行下面的代码会报错：2013-01-29 00:00:00不是合法的日期procedure TFrmQuerySale.FormShow(Sender: TObject);varsDate: string;begininherited;//
阅读全文
摘要：在Delphi中，特别是在写管理系统软件时，经常要用到 FormatDateTime 以将 TDateTime 格式的日期时间转换成字符串形式的值显示或保存起来，或者用 StrToDateTime将字符串形式的日期时间转换成 TDateTime 然后再做其他操作。在进行时间或日期的转换时，会使用系统...
阅读全文
摘要：方法一：[delphi]view plaincopyprint?usesComObj,DateUtils;functionGetInternetTime:string;varXmlHttp:OleVariant;datetxt:string;DateLst:TStringList;mon:strin...
阅读全文
摘要：在开发应用程序时往往需要获取当前系统时间。尽管Y2K似乎已经平安过去，但在我们新开发的应用程序中还是要谨慎处理“时间”问题。 在《融会贯通--Delphi4.0实战技巧》(以下简称“该书”)第89页专门介绍了两种获取当前系统时间的方法，但这两种方法都存在不足或错误，以下就此进行讨论。 该书第一种...
阅读全文
摘要：uses ComObj, DateUtils;procedure TForm1.Button1Click(Sender: TObject);var XmlHttp: Variant; datetxt : String; DateLst : TStringList; mon: String; ...
阅读全文
摘要：http://docwiki.embarcadero.com/RADStudio/Seattle/en/Internal_Data_Formats关于Double的RTL函数，好像就一个：TryStrToFloatfunction TryStrToFloat(const S: string; out...
阅读全文
摘要：方法一： 方法二： http://blog.csdn.net/yanjiaye520/article/details/7887463
阅读全文
摘要：用Now返回的日期格式中年只有2位,即2000年显示为00, 这似乎不太令人满意. 此外Now和Time都只能获得精确到秒的时间，为了得到更精确的毫秒级时间，可以使用API函数GetSystemTime，它对应的TSystemTime类型的定义为： TSystemTime = record wYea
阅读全文
摘要：转载请标明出处，原文地址：http://blog.csdn.net/morewindows/article/details/8654298 欢迎关注微博：http://weibo.com/MoreWindows 前面的《Windows 各种计时函数总结》介绍了Windows系统常用的5种计时函数——
阅读全文
摘要：在最近做的一个项目中用到了Java和Delphi，发现它们不能正确读取对方的日期类型，如在Java中写入一个值为“2007-12-1”的日期值，通过Delphi读取却不是这个值了。通过查阅资料，发现两者对日期类型的定义略有不同。Java中日期使用的是长整型进行存储的，它表示距“1970-1-1”的毫...
阅读全文
摘要：格林治时间，也就是返回从 UTC 1970 年 1 月 1 日午夜开始经过的毫秒数。(*Delphi获取13位格林治时间实现方法，与java中的java.lang.System.currentTimeMillis()效果相同*)varSysTime: TSystemTime;begin GetSys...
阅读全文
摘要：从服务器上获得网络时间的几种方法1. 用Net Time \\server2. NT平台用Win32 API函数：NetRemoteTOD3. 用文件的创建时间在服务器的共享文件夹下创建新文件，取新文件的创建时间。4. 用HTTP协议头，有服务器的时间5. 使用Telnet，取返回值Telnet S...
阅读全文
摘要：Delphi取UTC时间秒自格林威治标准时间1970年1月1日00:00:00 至现在经过多少秒数时间模块Uses DateUtils;当前时间：中国是 +8时区，换成UTC 就要减掉8小时showMessage(inttostr(DateTimeToUnix(now())-28800));参考：h...
阅读全文
摘要：时区Windows API 没有提供直接得到特定时区信息的功能，Windows 系统中的时区信息存储在注册表中下面的位置：HKEY_LOCAL_MACHINE SOFTWARE Microsoft Windows NT CurrentVersion ...
阅读全文
摘要：字符串格式参数的日期比较函数我在NT Service里，使用delphi的CompareDate函数出错，我怀疑这个函数有bug，总是说我的参数多了''，所以没办法自己弄了一个！[delphi]view plaincopy{//功能：比较日期//参数：//a:比较的日期，格式(2013-07-23)...
阅读全文