_:nab74802953dd442aba032c097d809e9fxb14
<http://schema.org/text>
"function IcsGetUTCTime: TDateTime;\n\tvar\n\t    SystemTime: TSystemTime;\n\tbegin\n\t    GetSystemTime(SystemTime);\n\t    with SystemTime do begin\n\t        Result := EncodeTime (wHour, wMinute, wSecond, wMilliSeconds) +\n\t                                              EncodeDate (wYear, wMonth, wDay);\n\t    end ;\n\tend;\n\n\n\n\t \n\n\n\n\tAngus\n\n\n\n\t \n\n"
<https://en.delphipraxis.net/topic/5352-how-to-get-the-actual-utc-time/?tab=comments#comment-46221>