Delphi で RFC822 の日付形式を TDateTime へ変換

Delphi でメールヘッダやXMLで使われる RFC822 の日付形式( Tue, 23 Jan 2018 13:50:00 +0900 みたいなの)を TDateTime へ変換

uses IdGlobalProtocols; // IdGlobalProtocols を追加
// :
TimeStamp := StrInternetToDateTime('Tue, 23 Jan 2018 13:50:00 +0900');