[giordanirocha]

Postado Originalmente por LuizVaz

Interessante, o código de assinatura não tem.
Está somente compilado como DCU.
A Versão de Delphi Utilizada é o BDS 2006 ou Delphi 10.

Para quem não tem pode pegar a versão lite:
hxxp://rapidshare.com/files/29607660/Delphi10_Lite_v4.1_SP2_Integrated.rar

DCU2INT

Usando o DCU2INT (Delphi 2.0-8.0, 2005(.net and WIN32), 2006(WIN32 only)&Kylix1.0-3.0 Units Parser.) pelo menos consegui descobrir que componente ele usou.
É o LockBox2 da TurboPower.

TurboPower LockBox2 (OpenSource)

LockBox 2 é um toolkit multi-platforma para encriptação de dados. Eles contêm rotinas & componentes para uso com Borland Delphi, C++Builder, & Kylix. Ele provês suporte para Blowfish, RSA, MD5, SHA-1, DES, triple- DES, Rijndael, & assinatura digital de mensagens.

TurboPower LockBox | Get TurboPower LockBox at SourceForge.net

TAG Assinatura
Usando o exemplo abaixo é possível gerar o código SHA1:

uses LbClass;

function CalulateCheckSum(text: string): string; 
var
    sha1 : TlbSHA1; 
     SHA1Digest : TSHA1Digest; 
 begin 
  sha1 := TLBSha1.Create(nil); 
  Try
    sha1.HashString(text); 
     sha1.GetDigest(SHA1Digest); 
     result := BufferToHex(SHA1Digest, SizeOf(SHA1Digest)); 
  finally
     sha1.Free; 
  end;
end;

Att,
Luiz Vaz

Ola Luiz Vaz.

Onde conseguir esta "LbClass" para realizar a assinatura ?

Obrigado.