Delphi ActiveX

DateTime - Get as Unix Time String

Demonstrates the GetAsUnixTimeStr method.

Note: This example is only valid in Chilkat v9.5.0.65 or later.

Delphi ActiveX

uses
    Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
    Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Chilkat_TLB;

...

procedure TForm1.Button1Click(Sender: TObject);
var
dateTime: TCkDateTime;
bLocal: Integer;

begin
dateTime := TCkDateTime.Create(Self);

dateTime.SetFromCurrentSystemTime();

// (in seconds since the epoch: 00:00:00 UTC on 1 January 1970)
bLocal := 1;
Memo1.Lines.Add('Unix time: ' + dateTime.GetAsUnixTimeStr(bLocal));

// Sample output for test run on 2-Dec-2016: 

//     Unix time: 1480661608
end;