Lazarus Pascal

Get and Set the Email Date (Local Timezone)

Demonstrates the Chilkat Email.LocalDateStr property, which is the date/time from the Date header returned in the local timezone in RFC822 string form (for example, Fri, 10 Jul 2026 15:15:30 -0500). Setting this property updates the email's Date header. Use LocalDate when a native local date/time value is preferred. This example sets the date and reads it back.

Background: An RFC822 date ends with a timezone: either GMT (equivalently +0000) or a signed offset like -0500, which means five hours behind UTC. The trailing offset is the only difference between the local and GMT views — they describe the identical moment in time. LocalDateStr presents the Date header using the running computer's local offset, while EmailDateStr presents it in GMT.

Chilkat Lazarus Pascal Downloads

Download Chilkat for Lazarus Pascal

Lazarus Pascal

program ChilkatDemo;

// Demonstrates using the Chilkat Pascal wrapper via the C bridge DLL.
// Builds as a console application under Lazarus (FPC) or Delphi.

{$IFDEF FPC}
  {$MODE DELPHI}
{$ENDIF}
{$APPTYPE CONSOLE}

uses
  {$IFDEF UNIX}
  cthreads,
  {$ENDIF}
  SysUtils,
  CkDllLoader,
  Chilkat.Email;

// ---------------------------------------------------------------------------

procedure RunDemo;
var
  email: TEmail;

begin
  //  Demonstrates the Email.LocalDateStr property.
  //  This is the date/time from the Date header returned in the local timezone,
  //  in RFC822 string form.  Setting it updates the email's Date header.

  email := TEmail.Create;

  email.LocalDateStr := 'Fri, 10 Jul 2026 15:15:30 -0500';

  WriteLn('LocalDateStr = ' + email.LocalDateStr);


  email.Free;

end;

// ---------------------------------------------------------------------------

begin

  try
    RunDemo;
  except
    on E: Exception do
      WriteLn('Unhandled exception: ', E.ClassName, ': ', E.Message);
  end;

  WriteLn;
  {$IFDEF MSWINDOWS}
  WriteLn('Press Enter to exit...');
  ReadLn;
  {$ENDIF}
end.