<html>
  <head>
    <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
  </head>
  <body>
    <div class="moz-cite-prefix">El 29/04/2020 a las 19:31, Zamrony P.
      Juhara via fpc-pascal escribió:<br>
    </div>
    <blockquote type="cite"
      cite="mid:512584338.1538441.1588181461041@mail.yahoo.com">
      <meta http-equiv="content-type" content="text/html; charset=UTF-8">
      Yes, it works if I remove timezone part from pattern as suggested
      by Santiago. This one works
      <div id="yMail_cursorElementTracker_1588181174404"><br>
      </div>
      <div id="yMail_cursorElementTracker_1588181175068">adatetime :=
        scanDateTime(</div>
      <div id="yMail_cursorElementTracker_1588181245070">     'ddd, dd
        mmm yyyy hh:mm:ss',</div>
      <div id="yMail_cursorElementTracker_1588181250486">     'Tue, 28
        Apr 2020 10:11:12 GMT');</div>
      <div id="yMail_cursorElementTracker_1588181303542"><br>
      </div>
      <div id="yMail_cursorElementTracker_1588181327020">So i guess, we
        must convert timezone information to local timezone manually.<br>
      </div>
    </blockquote>
    <br>
    yes.<br>
    In unit Dateutils
    <a class="moz-txt-link-freetext" href="https://www.freepascal.org/docs-html/rtl/dateutils/index-5.html">https://www.freepascal.org/docs-html/rtl/dateutils/index-5.html</a><br>
    You have a lot of handy functions:<br>
    <br>
    <table cellspacing="0" cellpadding="0">
      <tbody>
        <tr>
          <td>
            <p><tt><span class="code"><span class="kw">function</span>
                  UniversalTimeToLocal<span class="sym">(</span></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code">  UT<span class="sym">: </span><a
href="https://www.freepascal.org/docs-html/rtl/system/tdatetime.html">TDateTime</a></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code"><span class="sym">):</span><a
                    href="https://www.freepascal.org/docs-html/rtl/system/tdatetime.html">TDateTime</a><span
                    class="sym">;</span><br>
                  <br>
                  <span class="kw">function</span> UniversalTimeToLocal<span
                    class="sym">(</span></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code">  UT<span class="sym">: </span><a
href="https://www.freepascal.org/docs-html/rtl/system/tdatetime.html">TDateTime</a><span
                    class="sym">;</span></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code">  TZOffset<span class="sym">: </span><a
href="https://www.freepascal.org/docs-html/rtl/system/integer.html">Integer</a></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code"><span class="sym">):</span><a
                    href="https://www.freepascal.org/docs-html/rtl/system/tdatetime.html">TDateTime</a><span
                    class="sym">;</span></span></tt></p>
          </td>
        </tr>
      </tbody>
    </table>
    <br>
    <br>
    <table cellspacing="0" cellpadding="0">
      <tbody>
        <tr>
          <td>
            <p><tt><span class="code"><span class="kw">function</span>
                  LocalTimeToUniversal<span class="sym">(</span></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code">  LT<span class="sym">: </span><a
href="https://www.freepascal.org/docs-html/rtl/system/tdatetime.html">TDateTime</a></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code"><span class="sym">):</span><a
                    href="https://www.freepascal.org/docs-html/rtl/system/tdatetime.html">TDateTime</a><span
                    class="sym">;</span><br>
                  <br>
                  <span class="kw">function</span> LocalTimeToUniversal<span
                    class="sym">(</span></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code">  LT<span class="sym">: </span><a
href="https://www.freepascal.org/docs-html/rtl/system/tdatetime.html">TDateTime</a><span
                    class="sym">;</span></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code">  TZOffset<span class="sym">: </span><a
href="https://www.freepascal.org/docs-html/rtl/system/integer.html">Integer</a></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code"><span class="sym">):</span><a
                    href="https://www.freepascal.org/docs-html/rtl/system/tdatetime.html">TDateTime</a><span
                    class="sym">;</span></span></tt></p>
          </td>
        </tr>
      </tbody>
    </table>
    <br>
    <br>
    <table cellspacing="0" cellpadding="0">
      <tbody>
        <tr>
          <td>
            <p><tt><span class="code"><span class="kw">function</span>
                  UniversalTimeToLocal<span class="sym">(</span></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code">  UT<span class="sym">: </span><a
href="https://www.freepascal.org/docs-html/rtl/system/tdatetime.html">TDateTime</a></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code"><span class="sym">):</span><a
                    href="https://www.freepascal.org/docs-html/rtl/system/tdatetime.html">TDateTime</a><span
                    class="sym">;</span><br>
                  <br>
                  <span class="kw">function</span> UniversalTimeToLocal<span
                    class="sym">(</span></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code">  UT<span class="sym">: </span><a
href="https://www.freepascal.org/docs-html/rtl/system/tdatetime.html">TDateTime</a><span
                    class="sym">;</span></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code">  TZOffset<span class="sym">: </span><a
href="https://www.freepascal.org/docs-html/rtl/system/integer.html">Integer</a></span></tt></p>
          </td>
        </tr>
        <tr>
          <td>
            <p><tt><span class="code"><span class="sym">):</span><a
                    href="https://www.freepascal.org/docs-html/rtl/system/tdatetime.html">TDateTime</a><span
                    class="sym">;</span></span></tt></p>
          </td>
        </tr>
      </tbody>
    </table>
    <br>
    <p><tt><span class="code"><span class="kw">function</span>
          GetLocalTimeOffset<span class="sym">: </span><a
            href="https://www.freepascal.org/docs-html/rtl/system/integer.html">Integer</a><span
            class="sym">;</span></span></tt></p>
    <br>
    <br>
    <blockquote type="cite"
      cite="mid:512584338.1538441.1588181461041@mail.yahoo.com">
      <div id="yMail_cursorElementTracker_1588181327020"><br>
        Thank you</div>
      <div id="yMail_cursorElementTracker_1588181445937"><br>
        <div id="ymail_android_signature">Zamrony P. Juhara<br>
          <a class="moz-txt-link-freetext" href="https://v3.juhara.com">https://v3.juhara.com</a><br>
          <a class="moz-txt-link-freetext" href="https://github.com/zamronypj">https://github.com/zamronypj</a><br>
          <br>
          Fano Framework<br>
          <a class="moz-txt-link-freetext" href="https://fanoframework.github.io">https://fanoframework.github.io</a><br>
          <br>
          mod_pascal<br>
          <a class="moz-txt-link-freetext" href="https://zamronypj.github.io/mod_pascal">https://zamronypj.github.io/mod_pascal</a></div>
        <br>
        <blockquote style="margin: 0 0 20px 0;">
          <div style="font-family:Roboto, sans-serif; color:#6D00F6;">
            <div>On Wed, Apr 29, 2020 at 16:40, Santiago A.</div>
            <div><a class="moz-txt-link-rfc2396E" href="mailto:svaa@ciberpiula.net"><svaa@ciberpiula.net></a> wrote:</div>
          </div>
          <div style="padding: 10px 0 0 20px; margin: 10px 0 0 0;
            border-left: 1px solid #6D00F6;">
            _______________________________________________<br
              clear="none">
            fpc-pascal maillist  -  <a shape="rect"
              ymailto="mailto:fpc-pascal@lists.freepascal.org"
              href="mailto:fpc-pascal@lists.freepascal.org"
              moz-do-not-send="true">fpc-pascal@lists.freepascal.org</a><br
              clear="none">
            <a shape="rect"
              href="https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal"
              target="_blank" moz-do-not-send="true">https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal</a><br
              clear="none">
          </div>
        </blockquote>
      </div>
      <br>
      <fieldset class="mimeAttachmentHeader"></fieldset>
      <pre class="moz-quote-pre" wrap="">_______________________________________________
fpc-pascal maillist  -  <a class="moz-txt-link-abbreviated" href="mailto:fpc-pascal@lists.freepascal.org">fpc-pascal@lists.freepascal.org</a>
<a class="moz-txt-link-freetext" href="https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal">https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal</a>
</pre>
    </blockquote>
    <br>
    <br>
    <pre class="moz-signature" cols="72">-- 
Saludos

Santiago A.
</pre>
  </body>
</html>