delphi中有没取去年指定日期的函数

13023600339 2004-07-16 04:23:12

我有一个变量为TDATETIME类型，值为2004-01-04，需要通过一个函数取得2003-01-04，有没有这样的函数？

...全文

101 4 打赏收藏转发到动态举报

写回复

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

liuqifeiyu 2004-07-16

打赏
举报

回复

自己写吧，不难的

51372083 2004-07-16

打赏
举报

回复

function IncYear(const AValue: TDateTime; const ANumberOfYears: Integer = 1): TDateTime;

ANumberOfYears给－1就行了

losgou 2004-07-16

打赏
举报

回复

delphi里面没有这样的函数，要自己写，很简单的.....

13023600339 2004-07-16

打赏
举报

回复

如果没这一天，取接近的一天

1 获取特定的日期与时间本小节将为您介绍Delphi 所提供的获取特定日期与时间的函数.这些函数稍后将有详细的范例说明.笔者这里将以列表的方式先说明每一个函数所代表的意义,如图示: 函数名称单元文件所代表的意义 Now SysUtils 此函数可返回现在的日期与时间,其返回值为TDateTime类型 Date SysUtils 此函数可返回现在的日期,其返回值为TDate

转自：微点阅读https://www.weidianyuedu.com/content/2517738239233.html Delphi控件开发浅入深出(一) 有人说过“不会开发控件的Delphi程序员不是真正的程序员”。Delphi正是由于高度的可扩展性和大量的第三方控件的支持才能吸引无数程序员挑剔的目光。即使是由于工作需要使用其他开发工具的开发者也常常怀念和Delphi度过的日日夜夜。接触Delphi已经一年多了，从当初对着Delphi组件面板上上百个控件不知所措，到现在已经可以根据需要开..

//把以下文件复制到记事本中,并保存为DevChs.ini放在exe的目录下 //有这个cxLocalizer控件 //主窗体创建的时候 if (fileexists(ExtractFilePath(Application.ExeName) + 'DevChs.ini') = true) then begin cxLocalizer1.FileName := ExtractF...

从去年开始，kbmmw 慢慢增加内涵，除了完善各种服务外，陆续增加和扩展了作为一个中间件必须有的功能，例如，权限管理、日志系统、调度系统、内存调试等功能。今天给大家介绍一下kbmmw 的调度事件，调度事件的主要目标就是”在指定时间干，必须干“，不是“爱干”不干，是“必须干” ：）。在传统的delphi 中事件调度室通过两种方式，一种...

通常，你需要获得当前日期和计算一些其他的日期，例如，你的程序可能需要判断一个月的第一天或者最后一天。你们大部分人大概都知道怎样把日期进行分割（年、月、日等），然后仅仅用分割出来的年、月、日等放在几个函数中计算出自己所需要的日期！在这篇文章里，我将告诉你如何使用DATEADD和DATEDIFF函数来计算出在你的程序中可能你要用到的一些不同日期。在使用本文中的例子之前，你必须注意以下的问题。大部分可

5,392

社区成员

262,731

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章