Ver um Único Post

 
  #5 (permalink)  
Antigo 26/01/2010
Avatar de LuizVaz
LuizVaz LuizVaz está offline
Administrator
Super Admin
Points: 10,505, Level: 68 Points: 10,505, Level: 68 Points: 10,505, Level: 68
Activity: 0% Activity: 0% Activity: 0%
Last Achievements
 
Registrado em: Oct 2009
Localização: Belo Horizonte
Posts: 86
Thanks: 2
Thanked 6 Times in 6 Posts
Activity Longevity
0/20 20/20
Today Posts
sssssss86
Enviar mensagem via Windows Live Messenger para LuizVaz Enviar mensagem via Yahoo para LuizVaz
Padrão

Citação:
Postado Originalmente por vinicius Ver Post
Olá amigo, encontrei o exemplo da assinatura, e outras rotinas em java e outras linguagens aqui http://www.issdigitalthe.com.br/nfse/Exemplos.zip.
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:



Código:
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

Última edição por LuizVaz; 27/01/2010 às 13:55.. Motivo: LbClass
Responder com Citação
 

Content Relevant URLs by vBSEO 3.3.0