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);
輸出為：2004-8-7 9:55:40
d 對應於時間中的日期，日期是一位則顯示一位，兩位則顯示兩位
FormatdateTime('d',now);
輸出可能為1～31
dd 和d的意義一樣，但它始終是以兩位來顯示的
FormatdateTime('dd',now);
輸出可能為01～31
ddd 顯示的是星期幾
FormatdateTime('ddd',now);
輸出為: 星期六
dddd 和ddd顯示的是一樣的。
但上面兩個如果在其他國家可能不一樣。
ddddd 以短時間格式顯示年月日
FormatdateTime('ddddd',now);
輸出為：2004-8-7
dddddd 以長時間格式顯示年月日
FormatdateTime('dddddd',now);
輸出為：2004年8月7日
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