(Delphi ActiveX) Load EC Public Key from X,Y Values (easier)

Demonstrates how to load an ECDSA public key from X and Y values using the LoadEcdsa method introduced in Chilkat v9.5.0.85.

Chilkat for Delphi Downloads Chilkat ActiveX DLL for Delphi Chilkat non-ActiveX DLL for Delphi * The examples here use the ActiveX DLL.

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
success: Integer;
x: WideString;
y: WideString;
pubkey: TPublicKey;

begin
// Note: This example requires Chilkat v9.5.0.85 or greater.

// We have the following x and y values in hex (for an EC point on the P-256 curve).
x := '1ccbe91c075fc7f4f033bfa248db8fccd3565de94bbfb12f3c59ff46c271bf83';
y := 'ce4014c68811f9a21a1fdb2c0e6113e06db7ca93b7404e78dc7ccd5ca89a4ca9';

pubkey := TPublicKey.Create(Self);
success := pubkey.LoadEcdsa('secp256r1',x,y);
if (success = 0) then
  begin
    Memo1.Lines.Add(pubkey.LastErrorText);
    Exit;
  end;

Memo1.Lines.Add('Success.');
end;