Delphi ActiveX

Transition from Cert.GetValidFromDt to Cert.ValidFromStr

Provides instructions for replacing deprecated GetValidFromDt method calls with ValidFromStr. 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
cert: TChilkatCert;
ckdt1: ICkDateTime;
ckdt2: TCkDateTime;

begin
cert := TChilkatCert.Create(Self);

// ------------------------------------------------------------------------
// The GetValidFromDt method is deprecated:

ckdt1 := cert.GetValidFromDt();
if (cert.LastMethodSuccess = 0) then
  begin
    Memo1.Lines.Add(cert.LastErrorText);
    Exit;
  end;

// ...
// ...

// ------------------------------------------------------------------------
// Do the equivalent using the ValidFromStr property

ckdt2 := TCkDateTime.Create(Self);
ckdt2.SetFromRfc822(cert.ValidFromStr);
end;