api函数

Question

//强制转化时间格式为4位数的年份如2000-02-25
   DateSeparator := '-';
   ShortDateFormat := 'yyyy-mm-dd';
   TwoDigitYearCenturyWindow := 70;
   //////////////////////////////

Answer 1

Delphi里有一个时间格式转化函数
DateTimeToString(var Result:string,Const Format:String;DateTime:TDatetime);格式采用Format控制,结果保存在Result中

Answer 2

上面的是日期
//强制转化时间格式
   TimeSeparator := ':';
   ShortTimeFormat  :='hh:mm:ss';
   TwoDigitYearCenturyWindow := 70;
   //////////////////////////////
你看一下对不对？

Answer 3

DateTimeToString("yyyy-mm-dd hh:mm:ss",Now);
就将日期显示成你想要的了

Answer 4

function FormatDateTime(const Format: string; DateTime: TDateTime): 
string;
是将当然日期或者时间都可以，转换成你所需要的格式
如：
Edit1.Text:=FormatDateTime('"The meeting is on " dddd, mmmm d, yyyy, " at " hh:mm AM/PM', StrToDateTime('2/15/95 10:30am'));