delphi - 在 Delphi/FreePascal 中解析电子邮件时间戳

Question

使用 FreePascal (FPC) 2.6.2 我想将电子邮件消息中的一些时间戳字符串转换为 DateTime 值（使用 Synapse 从 IMAP 服务器检索IMAPsend）：

Date: Thu, 1 Aug 2013 20:07:43 -0400

从我读过的内容来看StrToDateTime()，TFormatSettings我看不到直接执行此操作的方法。他们通常期望像&这样1/8/2013 20:07:47的格式的字符串，并且无法处理 UTC 偏移量。dd/mm/yyyyhh:mm:ss

我是否有必要先切碎并重新排列字符串并自己转换短月份名称和偏移量？

Answer 1

如果您使用 Synapse；在synautil.pas文件中，您可以找到DecodeRfcDateTime函数。使用此功能，您可以按照您的要求进行操作。