文档章节

Now、Date、Time、CurrentYear - 当前日期

涂孟超
 涂孟超
发布于 2014/09/26 15:38
字数 92
阅读 2
收藏 0
SysUtils.Now;
SysUtils.Date;
SysUtils.Time;
SysUtils.CurrentYear;

 
 
 
 
 

 

 

  

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

uses DateUtils;

procedure TForm1.FormCreate(Sender: TObject);
var
  dt: TDateTime;
  d: TDate;
  t: TTime;
  y: Word;
begin
  dt := Now;
  d := Date;
  t := Time;
  y := CurrentYear;

  ShowMessage(DateTimeToStr(dt)); //2009-5-21 17:45:50
  ShowMessage(DateToStr(d));      //2009-5-21
  ShowMessage(TimeToStr(t));      //17:45:50
  ShowMessage(IntToStr(y));       //2009
end;

end.

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

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
mysql日期转换与计算函数

MySQL 获得当前日期时间 函数 获得当前日期+时间(date + time)函数:now() mysql> select now(); +---------------------+| now() |+---------------------+| 2008-08-08 22:20:46 |+-----......

孟飞阳
2016/10/09
14
0
数据库——mysql如何获取当前时间

数据库——mysql如何获取当前时间 1.1 获得当前日期+时间(date + time)函数:now() 除了 now() 函数能获得当前的日期时间外,MySQL 中还有下面的函数: currenttimestamp() currenttimest...

writeademo
02/06
0
0
mysql有关日期的函数

ADDTIME (date2 ,timeinterval ) //将timeinterval加到date2 CONVERTTZ (datetime2 ,fromTZ ,toTZ ) //转换时区 CURRENTDATE ( ) //当前日期 CURRENTTIME ( ) //当前时间 CURRENTTIMESTAMP (......

辉_仔
2015/12/11
31
0
MySQL 获得当前日期时间 函数

获得当前日期+时间(date + time)函数:now() mysql> select now(); +---------------------+| now() |+---------------------+| 2008-08-08 22:20:46 |+---------------------+ 获得当前日......

豆花饭烧土豆
2016/08/27
4
0
MySQL日期函数、时间函数总结(MySQL 5.X)

MySQL日期函数、时间函数总结(MySQL 5.X) 获得当前日期时间函数 1.1 获得当前日期+时间(date + time)函数:now() mysql> select now();+---------------------+| now() |+--------------...

秋风醉了
2015/11/10
0
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

c语言之内存分配笔记

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

DannyCoder
今天
2
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
今天
5
0
八大包装类型的equals方法

先看其中一个源码 结论:八大包装类型的equals方法都是先判断类型是否相同,不相同则是false,相同则判断值是否相等 注意:包装类型不能直接用==来等值比较,否则编译报错,但是数值的基本类型...

xuklc
今天
2
0
NoSQL , Memcached介绍

什么是NoSQL 非关系型数据库就是NoSQL,关系型数据库代表MySQL 对于关系型数据库来说,是需要把数据存储到库、表、行、字段里,查询的时候根据条件一行一行地去匹配,当量非常大的时候就很耗...

TaoXu
昨天
5
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部