文档章节

IsLeapYear、IsInLeapYear - 是否是闰年

涂孟超
 涂孟超
发布于 2014/09/26 15:34
字数 78
阅读 2
收藏 0
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

本文转载自:http://www.cnblogs.com/del/archive/2009/05/21/1486175.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
bool isLeapYear(int year)-判断年份是否为闰年的函数

程序计算   如果输入的年份是闰年则返回 true,否则,返回 false   bool isLeapYear( int year )   {   if (year%400 == 0 || (year%4 == 0 && year%100 != 0))   return true;  ...

peterli
2012/08/19
0
0
初学的程序,做了一点修改,结果就不对的。帮忙看看,谢。

是一个给定年、月,打印当月日历的程序。 ———————————————————————— //起点 1800年1月1号,算本月1日是星期几,先算差了几年,几个月,其中有闰年, //然后用差值+...

socalmboy
2016/01/11
109
0
Java8 日期时间 —— LocalDate —— 年月日

一、简介 二、获取 LocalDate 的方法 1.获取当前的日期 LocalDate 2.根据年月日的值获取 LocalDate 3.根据某年的第n天获取 LocalDate 4.从时间纪元(1970年1月1日)开始第n天(负数表示在时间...

动听的椰子
2016/12/21
67
0
jquery中如何获得时间

js(jQuery)获取时间的方法及常用时间类 $(function(){ var mydate = new Date(); var t=mydate.toLocaleString(); /alert(t);/ $("#time").text(t); $("#time").load("Untitled-1.html"); })......

writeademo
2016/10/08
489
0
计算闰年的代码

在与日期有关的计算中往往需要知道某年是否为闰年,这里提供两种代码供大家选择使用(输出0表示非闰年,1表示闰年): 1:shell方法 echo $((y%4==0&&y%100!=0||y%400==0))举例y=2000echo $(...

红薯
2009/05/06
327
1

没有更多内容

加载失败,请刷新页面

加载更多

下一页

docker中安装了RabbitMQ后无法访问其Web管理页面

在官网找了"$ docker run -d --hostname my-rabbit --name some-rabbit -p 8080:15672 rabbitmq:3-management"这条安装命令,在docker上安装了RabbitMQ,,结果输入http://localhost:8080并不......

钟然千落
34分钟前
0
0
spring-cloud | 分布式session共享

写在前面的话 各位小伙伴,你们有福了,这一节不仅教大家怎么实现分布式session的问题,还用kotlin开发,喜欢kotlin的小伙伴是不是很开心! 以前在写Android的时候,就对客户端请求有一定的认...

冯文议
54分钟前
0
0
c语言之内存分配笔记

先看一个数组: short array[5] = {1,2} // 这儿定义的一个int类型的数组,数组第1和第2个元素值是1和2.其余后面默认会给值为0; 或者 short array[] = {1,2};//这儿数组第1和第2个元素,数组...

DannyCoder
今天
4
0
Shell | linux安装包不用选择Y/N的方法

apt-get install -y packageOR echo "y" | sudo apt-get install package

云迹
今天
2
0
Hadoop的大数据生态圈

基于Hadoop的大数据的产品圈 大数据产品的一句话概括 Apache Hadoop: 是Apache开源组织的一个分布式计算开源框架,提供了一个分布式文件系统子项目(HDFS)和支持MapReduce分布式计算的软件架...

zimingforever
今天
7
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部