JWT JSON Web Tokens

uses
  sgcHTTP_JWT;

var
  JWT: TsgcHTTPJWT;
begin
  JWT := TsgcHTTPJWT.Create(nil);
  JWT.Header.Algorithm := jwtRS256;
  JWT.Payload.Issuer := 'my-app';
  JWT.Payload.Subject := 'user-123';
  JWT.Payload.ExpirationTime := Now + 1/24;
  Token := JWT.Compact(PrivateKey);
end;