取日期、星期、时间

Question

想得到以下格式：代码如何写？
2006年12月25日  星期一  （最好用label.caption）
DBgrid中，想让数据居中，用哪个？

Answer 1

1、返回格式日期，用FormatDateTime()函数：    ShowMessage(FormatDateTime('yyyy"年"mm"月"dd"日" dddd',now)); //Delphi6
    据说在Delphi7中，可以把年月日两边的双引号去掉。2、DBgrid居中，没有研究过。

Answer 2

啊,没遵守楼主的要求,我改一下:Label.caption := FormatDateTime('yyyy"年"mm"月"dd"日" dddd',now);

Answer 3

2. dbgrd1.Columns[i].Alignment := taCenter;

Answer 4

Uses DateUtils;....
  Label1.Caption := IntToStr(YearOf(Now)) + '年' + IntToStr(MonthOf(Now)) + '月' +
    IntToStr(DayOf(Now)) + '日 星期' + IntToStr(DayOfWeek(Now));