求时间函数(在线等) 求系统当前时间的年份和月份,如今天是2004年07月27日,我要等到200407,该函数怎么写? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用format函数format(自己的时间格式)具体的看帮助! function FormatDateTime(const Format: string; DateTime: TDateTime): string; 使用now函数然后使用decodetime和decodedate函数,可以得到年、月、日、时、分、秒...查查帮助就可以了! var y,y1:string; y:=formatdatetime('yyyymmddhhmmss',now);y1:=copy(y,1,6);则y1就是你想要的! 比如今天:formatdatetime('yyyymmdd',now) = '20040727' 呵呵,我还没有用过formatdatetime函数,都是自己处理的。亏了,耽误好多时间。 copy(formatdatetime('yyyymmdd',now),1,6) = '200407' FormatDatetime('yyyymmdd', Now());y->年 m->月 d->日 同意楼上。。now 是获取本地的系统时间 这个时间跟系统右下角的时间一致 且右下角时间改变后 now也会跟着改变 时间转换的问题 应该要先获取本地的日期/时间显示格式 再转变 这样就不会有错误 一个新问题。以下排序为什么不能执行。在IB Expert 执行没有问题。 delphi中如何调用DLL中的类? 关于Chart的问题(有一定难度的,另外本人只有70分了:() 关于设置线程优先级 高分求教,如何取得Flash文件的原始长、宽????在线等候! Win32线程问题!100分!!! 关于自画ListBox的列表项的问题 最近做毕业设计,需要一些Paradox的资料,比如它的优点、特征等(200分相赠!) 郁闷至极,,关于EHLIB和DELPHI2007 监视服务的服务 求解输入法 关于光标
format(自己的时间格式)
具体的看帮助!
然后使用decodetime和decodedate函数,可以得到年、月、日、时、分、秒...查查帮助就可以了!
y:=formatdatetime('yyyymmddhhmmss',now);
y1:=copy(y,1,6);
则y1就是你想要的!
formatdatetime('yyyymmdd',now) = '20040727'
且右下角时间改变后 now也会跟着改变
时间转换的问题 应该要先获取本地的日期/时间显示格式 再转变 这样就不会有错误