Delphi ActiveX

Set the JWS Payload

See more JSON Web Signatures (JWS) Examples

Demonstrates Jws.SetPayload, which sets the content to be signed. The charset converts the text to bytes, and a flag controls whether a byte-order mark is included.

Background. JWS (JSON Web Signature) integrity-protects a payload with a signature or MAC. The header alg names the algorithm; this example uses HMAC-SHA256 (HS256) with a symmetric MAC key.

Chilkat Delphi ActiveX Downloads

Download Chilkat for Delphi ActiveX

Delphi ActiveX

var
success: Integer;
jws: TChilkatJws;
bIncludeBom: Integer;

begin
success := 0;

jws := TChilkatJws.Create(Self);

//  Set the payload (the content to be signed).  The 2nd argument is the charset used to convert the
//  text to bytes, and the 3rd controls whether a byte-order mark is included.
bIncludeBom := 0;
success := jws.SetPayload('This is the content to sign.','utf-8',bIncludeBom);
if (success = 0) then
  begin
    Memo1.Lines.Add(jws.LastErrorText);
    Exit;
  end;
Memo1.Lines.Add('Payload set.');