delphi如何取得：从1970年1月1日0时开始的到当前时间的毫秒数?在C#时的代码类似这样,怎么翻译成Delphi的呢System.DateTime startTime = TimeZone.CurrentTimeZone.ToLocalTime(new System.DateTime(1970,1,1,0,0,0,0));System.Da

来源：学生作业学帮网编辑：学帮网时间：2024/05/08 08:49:12

delphi如何取得：从1970年1月1日0时开始的到当前时间的毫秒数?
在C#时的代码类似这样,怎么翻译成Delphi的呢
System.DateTime startTime = TimeZone.CurrentTimeZone.ToLocalTime(new System.DateTime(1970,1,1,0,0,0,0));
System.DateTime nowTime = System.DateTime.Now;
long unixTime = (long)(nowTime - startTime).TotalMilliseconds;
MessageBox.Show(unixTime.ToString());

DELPHI里有MilliSecondsBetween这个函数（INT64）.可以使用.
该函数就是返回两个日期时间之间的毫秒差.
但是经测试,返回的值可能超界了.
改良了一下.代码如下：
Function getMilliSecond(BigTime,SmallTime :TDateTime):String;
var
a :Longint;
b :String;//毫秒数
begin
a := MinutesBetween(BigTime,SmallTime);//取分钟差
a := a * 60;//取秒差
b := IntToStr(a) + '000';//将秒差结果后缀加上三个零（等于毫秒数）
Result := b;
end;
另外,你可以用StrToDateTime函数将字符串转换成日期时间类型.例如：
StrtoDateTime('1970-01-01 0:00:00');

delphi如何取得：从1970年1月1日0时开始的到当前时间的毫秒数?在C#时的代码类似这样,怎么翻译成Delphi的呢System.DateTime startTime = TimeZone.CurrentTimeZone.ToLocalTime(new System.DateTime(1970,1,1,0,0,0,0));System.Da delphi中dimens[1]. 如何取得从1970年到现在的毫秒数? Delphi编程,计算e的近似值(e=1+1/1!+1/2!+1/3!+...+1/n!+...)从var开始写,我没基础, 我国抗日战争从1937年7月7日开始,经过8年1个月零9天的英勇抗战取得胜利.抗日战争在哪年哪月那日结束李大爷2004年5月1日存入银行10000元,定期三年,月息2.1%.,到期后,李大爷从银行可以取得多少人民币?10252 从1931年到1945年8月,日本给中国人民带来哪些苦难?中国人民是如何克服并最终取得胜利的? 从1931年到1945年8月,日本给中国人民带来哪些苦难?中国人民是如何克服并最终取得胜利的? 从1931至1945年8月,日本给中国人民带来哪些重大苦难?中国人民是如何克服困难并最终取得胜利的?… 从1931年至1945年8月,日本给中国人民带来哪些苦难?中国人民是如何克服并最终取得胜利的? 2008年1月29日—3月16日取得22连胜,用英语怎么说如何从空气中取得co2? 1中国公民薛某2011年9月-12月收入情况如下:每月取得工资收入5500元 12月取得年终一次性奖金18000元则薛某则薛某2011年9月-12月工资和奖金应纳个人所得税多少中国居民王某2012年1月取得工资,薪金所得5000元,取得上年度全年一次性奖金84000中国居民王某2012年1月取得工资、薪金所得5000元,取得上年度全年一次性奖金84000元,则王某当月应缴纳个人所得 delphi if a in[1,2,3,4,5] then b='c' else b=''如果a等于1,2,3,4,5时b等于c,否则等于空这个句子在delphi报表里面怎么写? 写 Delphi 程序输入一个整数n,计算1~n之间的平方和,立方和,偶数和我国抗日战争是从1937年7月7日开始的,经过8年1个月零九天取得胜利,结束时在哪年哪月哪日正确答案应该是1945年8月15日,而上面算出是8月16,为什么会多一天呢? 1949年10月1日,中华人民共和国成立,标志着中国什么革命已经取得基本胜利