PVK to XML

Convert RSA .pvk (private key) to XML.

uses
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
    Dialogs, StdCtrls,
    CHILKATCERTIFICATELib_TLB,
    OleCtrls;

...

procedure TForm1.Button1Click(Sender: TObject);
var
pvk: IPrivateKey;
success: Integer;

begin
pvk := TPrivateKey.Create(Self);

//  Password is "wiggy"
success := pvk.LoadPvkFile('myKey.pvk','wiggy');
if (success = 0) then
  begin
    Memo1.Lines.Add(pvk.LastErrorText);

  end;

//  Save it as XML:
success := pvk.SaveXmlFile('myKey.xml');
if (success = 0) then
  begin
    Memo1.Lines.Add(pvk.LastErrorText);

  end;
end;