delphi - 在关闭并重新打开应用程序之前，日期格式无法正确显示

Question

我正在使用 FireDAC 和 SQLite3 在 Delphi 中开发一个简单的数据库应用程序。每当我将新记录插入数据库时​​，我的表单上显示的日期格式yyyy-mm-dd始终m/d/yyyy为无需关闭并重新打开我的应用程序。

FireDAC 连接的定义参数和选项都是默认值。为保存 SQLite3 数据库中日期的字段设置的 DataType 设置为DATE。最后，我用来插入记录的代码如下。

Qry.SQL.Text := 'INSERT INTO employees (HireDate) VALUES (:HiredOn)';

Qry.ParamByName('HiredOn').AsDate := DateTimePicker1.Date;
Qry.ExecSQL;
Qry.Open('SELECT * FROM employees');  

任何帮助，将不胜感激。

Answer 1

确保底层 BindingSource / List / Adapter 中日期字段的任何格式设置与表单/网格字段的格式设置相匹配。可能是该字段的基础绑定格式覆盖了您对表单/网格字段的新设置。

Answer 2

将表单字段上的格式/显示设置为“m/d/yyyy” ，并且为了更好地衡量，*也可以通过InitializeGrid 事件处理程序中的代码来完成

Answer 3

尝试

FormatDateTime('dd/mm/yyyy', DateTimePicker1.Date);

Answer 4

使用 DateUtils ...

DateUtils.DateOf(DateTimePicker1.Date);

Answer 5

当表单字段上的日期格式与 SQLite3 中的“yyyy-mm-dd”不匹配时，就会发生这种情况。因此，您需要在表单字段上设置格式/显示以匹配它。