请问怎么办才能在DBGrid+ADOQuery显示自定义的日期格式？万分感谢！！！

Question

我想在DBGrid显示的日期格式为：2003年12月1日 这样子格式的日期，但是摸索了很久都没找出办法来。望请指教！=========================
1.在SQL语句中使用select Convert(varchar, GetDate(), 101)得出来的日期格式无法使用xxxx年xx月xx日这样子的格式。2.不能像使用TTable使用
shortdateformat := 'YYYY-MM-DD';
DateSeparator := '-';3.千万别说改控制面版的设置。

Answer 1

var
  SystemTime: TSystemTime;
  str:string;
begin
  GetLocalTime(SystemTime);
  with SystemTime do
    str := trim(inttostr(SystemTime.wYear))+'年'+trim(inttostr(SystemTime.wMonth))+'月'+trim(inttostr(SystemTime.wDay))+'月';
  edit1.Text:=str;
end;

Answer 2

select convert(varchar(4),Year(convert(varchar(20),getdate())))+'年'+
convert(varchar(4),Month(convert(varchar(20),getdate())))+'月'+
convert(varchar(4),Day(convert(varchar(20),getdate())))+'日'

Answer 3

select
str(year(getdate()),4) + '年' + str(month(getdate()),2) + '月' + str(day(getdate()),2) + '日'

Answer 4

select cast(datepart(yy,getdate()) as varchar)+'年'
       +cast(datepart(mm,getdate()) as varchar)+'月'
       +cast(datepart(dd,getdate()) as varchar)+'日'
条条道路通罗马啊~
呵呵

Answer 5

！！！！！！！！！！！！！！！！！！！！！！！！！！！！又被误解，如果直接将日期转换成指定格式用FormatDateTime('yyyy年mm月dd日', DateTime)就可以了！关键我是想直接显示DBGird中，要写必须在这两个事件中处理： DBGrid1DrawColumnCell, DBGrid1DrawDataCell，但这样子必须去创建TField，特别麻烦。在SQL语句中处理虽然可以实现，但这样子会消耗服务器的资源，除情非得已，否则这是下下之策。

Answer 6

okdelphi(okdelphi) ( ) 信誉：53 FormatDateTime('yyyy年mm月dd日', now)
宝贝，
上面的东西你实践过没有啊，没有就不要瞎说

Answer 7

SELECT *, CAST(YEAR(date) AS varchar) + '年' + CAST(MONTH(date) 
      AS varchar) + '月' + CAST(DAY(date) AS varchar) + '日' AS date1
FROM tablename这个是直接用SQL转换的.
1992年8月27日
1990年12月24日
1990年9月13日
1989年9月21日
1991年2月13日是你想要的结果吗?

Answer 8

fantasy1999(黄滕酒) ：
  上次少写单引号了(你没看出来吗？)：
      FormatDateTime('yyyy''年''mm''月''dd''日''', now())
  谢谢各位，看来使用DBGrid1DrawDataCell是无法解决的了。