函数原型：
UnicodeString __fastcall TimeToStr(const TDateTime DateTime);
UnicodeString __fastcall TimeToStr(const TDateTime DateTime, const TFormatSettings &AFormatSettings);
头文件：
#include <System.SysUtils.hpp> (XE2 之后) #include <SysUtils.hpp> (XE 之前)
参数：
DateTime: TDateTime 类型的日期时间。
AFormatSettings: TFormatSettings 类型的格式信息。
返回值：
字符串：只包含时间
如果没有 AFormatSettings 参数，按照全局对象 FormatSettings 指定的格式，
如果有 AFormatSettings 参数，按照这个参数指定的格式，把日期时间转为字符串。
例1：使用默认格式显示当前系统时间
默认格式，即全局对象 FormatSettings 指定的格式
TDateTime dt = Now();
Label1->Caption = TimeToStr(dt); |
运行结果：
例2：使用参数给定格式显示当前系统时间
运行结果：
|
