delphi - Delphi＆ADO:日期时间到字符串的转换

Question

我使用Delphi 2006和ADO连接到MS Access数据库。我检索的某些字段是日期字段（在Access中格式为“中日期”，即2010年4月20日），但是我必须将它们检索为字符串：

FValue:=FAccessADOQuery.Fields.FieldByName(FIELD_NAME).AsString;

然后这些字段的格式如下：2010年4月20日。

我的问题是：这种格式何时发生？如何自定义格式？是ADO设置（在那里找不到任何内容）还是OS（我在美国语言环境中使用Win XP ENG）？也许是德尔福？

谢谢！
娄

Answer 1

ShortDateFormat和LongTimeFormat变量用于将TDateTimeField格式化为字符串。

您可以更改这些变量的值或尝试类似以下的操作：

Dt :TDateTime;
Ds :String;
begin
//FAccessADOQuery.Fields.FieldByName(FIELD_NAME).AsString
Dt:=FAccessADOQuery.Fields.FieldByName(FIELD_NAME).AsDateTime;
Ds:=FormatDateTime('dd-mmm-yyyy',dt);
end;