delphi 求时间的间隔小记

草鸟积累，看官莫笑

Delphi中求两个日期之间的天数间隔使用，返回整数，如果相差不足

function YearsBetween(const ANow, AThen: TDateTime): Integer;
function MonthsBetween(const ANow, AThen: TDateTime): Integer;
function WeeksBetween(const ANow, AThen: TDateTime): Integer;
function DaysBetween(const ANow, AThen: TDateTime): Integer;
function HoursBetween(const ANow, AThen: TDateTime): Int64;
function MinutesBetween(const ANow, AThen: TDateTime): Int64;
function SecondsBetween(const ANow, AThen: TDateTime): Int64;
function MilliSecondsBetween(const ANow, AThen: TDateTime): Int64;

返回非整数的结果
function YearSpan(const ANow, AThen: TDateTime): Double;
function MonthSpan(const ANow, AThen: TDateTime): Double;
function WeekSpan(const ANow, AThen: TDateTime): Double;
function DaySpan(const ANow, AThen: TDateTime): Double;
function HourSpan(const ANow, AThen: TDateTime): Double;
function MinuteSpan(const ANow, AThen: TDateTime): Double;
function SecondSpan(const ANow, AThen: TDateTime): Double;
function MilliSecondSpan(const ANow, AThen: TDateTime): Double;

时间： 2024-08-27 13:48:16

delphi 求时间的间隔小记的相关文章

DELPHI日期时间函数(DateUtils单元)

原文出自:http://shao171.blog.163.com/blog/static/238397019201502011844293/ CompareDate 函数 比较两个日期时间值日期部分的大小 CompareDateTime 函数 比较两个日期时间值的大小 CompareTime 函数 比较两个日期时间值时间部分的大小 DateOf 函数 去除日期时间值的时间部分 DateTimeToJulianDate 函数 转换日期时间值为儒略日 DateTimeToModifiedJulian

实例365（6）---------DateTime.ToString格式化日期，使用DateDiff方法获取日期时间的间隔数

一:DateTime.ToString格式化日期,截图 二:代码 using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace TmrFormat { public part

Delphi DateUtils时间单元

? 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86

Echarts的柱状统计图出现x轴统计时间出现间隔显示的问题

今天在使用Echarts的柱状统计图出现x轴统计时间出现间隔显示的问题: 数据都拿到了,放到Json数组都是完整的, 展现是时候 如下图: ------------------------------------------------------jsp页面代码 的div <div class="f-r w-b45">                <div id="proMonthCount" style="min-width: 310

Delphi日期时间 UNIX

Delphi日期时间,就是常见的 2014-05-02 10:37:35 -------------------------------------------------------------------- UNIX日期时间,一个整数,从1970/01/01 开始的秒数,int64位 ------------------------------------------------------------------- 标准UTC时间, 世界统一时间,世界标准时间,国际协调时间,简称UTC 不

Delphi 设置时间格式

// 设置WINDOWS系统的短日期的格式SetLocaleInfo(LOCALE_SYSTEM_DEFAULT, LOCALE_SSHORTDATE, 'yyyy-MM-dd'); Application.UpdateFormatSettings := False;// 设定程序本身所使用的日期时间格式LongDateFormat := 'yyyy-MM-dd';ShortDateFormat := 'yyyy-MM-dd';LongTimeFormat := 'hh:nn:ss';Short

C# 判断两个时间的间隔

#region 获得两个日期的间隔 /// <summary> /// 获得两个日期的间隔 /// </summary> /// <param name="DateTime1">日期一.</param> /// <param name="DateTime2">日期二.</param> /// <returns>日期间隔TimeSpan.</returns> public

Mysql 求时间 between 昨天 and 上个月的今天 等时间函数

问题: Mysql表中一列create_time,类型datetime(YYYY-MM-DD HH:MM:SS),想获取上个月今天到昨天的数据. select * from 表名 where date_format(create_time,'%Y-%m-%d') between date_sub(curdate(),interval 1 MONTH) and date_sub(curdate(),interval 1 day) 仔细研究了下,Mysql有很多时间类型. /*今天*/select

js求时间天数

function Days() { //开始时间 var txtYearAnnualDates =txtBeginTime.GetText(); //结束时间 var txtNextYearAnnualDates = txtEndSendTime.GetText(); //转为时间 var YearAnnualDates = new Date(txtYearAnnualDates.replace(/-/g, "/")); var NextYearAnnualDates = new Da