动态显示时间（需要Timer控制的支持，以下代码放到Timer事件中）
Label1.Caption := FormatDateTime('yyyy-mm-dd hh:mm:ss' , Now);
显示当前时间(放在窗体的OnShow事件中)
edit1.text:=FormatDateTime('YYYYMMDDHHMMSSZZZ',now());
时间格式化
Windows中的时间格式还真不少，什么长日期、短日期，两位年份、四位年份等等，在Delphi中可用FormatDateTime函数输出这些格式，下面介绍它的用法：
function FormatDateTime(const Format: string; DateTime: TDateTime): string;
Format参数是一个格式化字符串。DateTime是时间类型。返回值是一种格式化后的字符串，重点来看Format参数中的指令字符：
c以短时间格式显示时间，即全部是数字的表示
FormatdateTime('c',now);
输出为：2023/11/23-7 9:55:40
d 对应于时间中的日期，日期是一位则显示一位，两位则显示两位
FormatdateTime('d',now);
输出可能为1～31
dd 和d的意义一样，但它始终是以两位来显示的
FormatdateTime('dd',now);
输出可能为01～31
ddd 显示的是:周几
FormatdateTime('ddd',now);
输出为: 周四
dddd ：星期四。
但上面两个如果在其他国家可能不一样。
ddddd 以短时间格式显示年月日
FormatdateTime('ddddd',now);
输出为：2023/11/23
dddddd 以长时间格式显示年月日
FormatdateTime('dddddd',now);
输出为：2023年11月23日
e/ee/eee/eeee 以相应的位数显示年
FormatdateTime('ee',now);
输出为：04 （表示04年）
m/mm/mmm/mmmm 表示月
FormatdateTime('m',now);
输出为：8
FormatdateTime('mm',now);
输出为 08
FormatdateTime('mmm',now);
输出为 八月
FormatdateTime('mmmm',now);
输出为 八月
和ddd/dddd 一样，在其他国家可能不同
yy/yyyy 表示年
FormatdateTime('yy',now);
输出为 04
FormatdateTime('yyyy',now);
输出为 2004
h/hh,n/nn,s/ss,z/zzz 分别表示小时，分，秒,毫秒
t 以短时间格式显示时间
FormatdateTime('t',now);
输出为 10:17
tt 以长时间格式显示时间
FormatdateTime('tt',now);
输出为10:18:46
ampm 以长时间格式显示上午还是下午
FormatdateTime('ttampm',now);
输出为：10:22:57上午
如果要在Format中加普通的字符串，可以用双引号隔开那些特定义的字符，这样普通字符串中如果含特殊的字符就不会被显示为时间格式啦：
FormatdateTime('"today is" c',now);
输出为：today is 2004-8-7 10:26:58
时间中也可以加"-"或"\"来分开日期：
FormatdateTime('"today is" yy-mm-dd',now);
FormatdateTime('"today is" yy\mm\dd',now);
输出为： today is 04-08-07
也可以用":"来分开时间
FormatdateTime('"today is" hh:nn:ss',now);
输出为：today is 10:32:23