关于FormatDateTime

Question

比方说
我想以  'yyyy"年"mm"月"dd"日  "dddd" "hh:mm:ss AM/PM'的形式显示我想要的时间年：a := '2004'
月：b := '03'
日：c := '04'
星期：d := '02'
时：e := 11
分：f := 08
秒：g := 30用FormatDateTime函数，第二个参数该怎么设置？？
得到的效果为 
2004年03月04日  星期二 11:08:30 AM
本人刚学DELPHI三天时间，望大虾们赐教！

Answer 1

后面是个datetime数据类型的数据
例如now()返回就是现在的时间
formatdatetime('yyyy-MM-dd',now())
返回的结果就是当天的日期

Answer 2

FormatDateTime('yyyy年mm月dd日  dddd hh:mm:ss am/pm ', Now())
FormatDateTime('yyyy年mm月dd日  dddd hh:mm:ss am/pm ', strtodatetime('2004/01/02'))

Answer 3

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Edit1.Text := FormatDateTime('YYYY年MM月DD日 DDDD hh:mm:ss AM/PM', Now);
end;
转化当前时间

Answer 4

FormatDateTime('YYYY+'年'+MM+'月'+DD+'日' DDDD hh:mm:ss AM/PM', Now);

Answer 5

FormatDateTime('yyyy"Äê"mm"ÔÂ"dd"ÈÕ"  dddd hh:mm:ss AM/PM', 此参数是TDateTime类型的数据即可);

Answer 6

FormatDateTime('yyyy"月"mm"月"dd"日"  dddd hh:mm:ss AM/PM', 此参数是TDateTime类型的数据即可);

Answer 7

第二个参数到底该怎么设置啊？？与系统时间不一致的情况
------
第二个参数 为TDatetime型  
  将你要转换的日期转换成TDatetime型就可以了可以用StrToDatetime 将字符串转换成TDatetime型
如下：
  strtodatetime('2004/01/02')FormatDateTime('yyyy年mm月dd日  dddd hh:mm:ss am/pm', strtodatetime('2004/01/02'))

Answer 8

FormatDateTime('YYYY+'年'+MM+'月'+DD+'日' DDDD hh:mm:ss AM/PM', Now);

Answer 9

zzllabc(抱朴子--清心释累，绝率忘情) 的写法是对的。
第二个参数如果不是系统当前时间，你可以将你的时间字串转换成时间类型的数据。
用StrToDateTime(S:string);
例子：
procedure TFrmMain.Button2Click(Sender: TObject);
var
  a,b,c,d,e,f,g,h: string;begin
  a := '2004';
  b := '03';
  c := '04';  e := '11';
  f := '13';
  g := '12';  h := a + '-' + b + '-' + c + ' ' + e + ':' + f + ':' + g;
  h := formatdatetime('yyyy"月"mm"月"dd"日"  dddd hh:mm:ss AM/PM',strtodatetime(h));
  showmessage(h);
end;