IsLeapYear、IsInLeapYear - 是否是闰年
2009-05-21 11:54
274 查看
SysUtils.IsLeapYear(); DateUtils.IsInLeapYear();
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); end; var Form1: TForm1; implementation {$R *.dfm} uses DateUtils; procedure TForm1.FormCreate(Sender: TObject); var b: Boolean; begin b := IsLeapYear(2009); //False b := IsLeapYear(2012); //True b := IsInLeapYear(StrToDateTime('2009-1-1')); //False b := IsInLeapYear(StrToDateTime('2012-1-1')); //True // ShowMessage(BoolToStr(b, True)); end; end.
DateUtils-Function
相关文章推荐
- IsLeapYear、IsInLeapYear - 是否是闰年
- DateTime.IsLeapYear 方法判断是否是闰年,DaysInMonth判断一个月有几天,Addday取得前一天的日期GetYesterDay
- DateTime.IsLeapYear 方法判断是否是闰年,DaysInMonth判断一个月有几天,Addday取得前一天的日期GetYesterDay
- bool isLeapYear(int year)-判断年份是否为闰年的函数
- 是否是闰年判断函数:BOOL IsLeapYear (int year)
- 判断year年份是否为闰年(能被4整除是闰年,能被整除100不是,能被400整除是闰年)。闰年leap_year为1,否则为0.
- 给年份year,定义一个宏,以判别该年份是否闰年。提示:宏名可以定义为LEAP_YEAR,形参为y,既定义宏的形式为 #define LEAP_YEAR(y) (读者设计的字符串)
- 给年份year,定义一个宏,以判别该年份是否闰年。提示:宏名可以定义为LEAP_YEAR,形参为y,既定义宏的形式为 #define LEAP_YEAR(y) (读者设计的字符串)
- 编写程序方法boolean isLeap(int date),要求传入的的日期,能够输出该日期是否是闰年
- JQuery怎么知道一个元素是否隐藏或显示How do you test if something is hidden in jQuery?
- JQuery怎么知道一个元素是否隐藏或显示How do you test if something is hidden in jQuery?
- 第6周作业1-闰年之循环判断LeapYearFor
- boost准模板库date迭代器(指针)使用以及常用的两个静态成员函数is_leap_year()和end_of_month_day()
- JQuery怎么知道一个元素是否隐藏或显示How do you test if something is hidden in jQuery?
- canvas 使用 isPointInPath() 判断鼠标位置是否在绘制的元素上
- JQuery怎么知道一个元素是否隐藏或显示How do you test if something is hidden in jQuery?
- JQuery怎么知道一个元素是否隐藏或显示How do you test if something is hidden in jQuery?
- Is it possible to display icons in a PopupMenu?PopupMenu中显示图片是否可能
- 作业3(4)循环输入多个年份 year,判断该年是否为闰年。判断闰年的条件是:能被 4 整除但不能被100 整除,或者能被 400 整除。输入-1退出程序执行
- 作业3-4 循环输入多个年份 year,判断该年是否为闰年。判断闰年的条件是:能被 4 整除但不能被100 整除,或者能被 400 整除。输入-1退出程序执行