Como vc fez para assinar Ricardo? Usou algum outro componente ou outra DLL?
No site da microsoft achei um código em VB para assinar documentos e converti pra Delphi, mas a assinatura gerada é diferente. http://msdn.microsoft.com/en-us/library/aa387760(VS.85).aspx Abaixo o código convertido: function Signfile(InputFileName: String; OutputFileName: String): Boolean ; var s : String; MyStore : IStore; Signobj : ISignedData ; Assinador : ISigner ; SigningTime : IAttribute; Cert : ICertificate2; Certs : ICertificates; V : OleVariant; i : Integer; Entrada, Saida : TStringList; Texto : WideString; begin try MyStore := CoStore.Create; MyStore.Open( CAPICOM_CURRENT_USER_STORE, 'MY', CAPICOM_STORE_OPEN_READ_ONLY ); V := 'd2a870a1b8ee246a7703c57cc2abf1aac51b2c56'; Certs := MyStore.Certificates ; Assinador := CoSigner.Create; i := 0; while i < Certs.Count do begin Cert := IInterface( Certs.Item[ i+1 ] ) as ICertificate2; if UpperCase(Cert.Thumbprint) = UpperCase(V) then begin Assinador.Certificate := IInterface( Certs.Item[ i+1 ] ) as ICertificate; i := Certs.Count; end; i := i + 1; end; Entrada := TStringList.Create; Entrada.LoadFromFile(InputFileName); Texto := Entrada.Text; Signobj := CoSignedData.Create; Signobj.Content := Texto; SigningTime := CoAttribute.Create; SigningTime.Name := CAPICOM_AUTHENTICATED_ATTRIBUTE_SIGNING_TIME; SigningTime.Value := Now; Assinador.AuthenticatedAttributes.Add(SigningTime); s := Signobj.Sign(Assinador, True, CAPICOM_ENCODE_BASE64) ; Saida := TStringList.Create; Saida.Text := s; Saida.SaveToFile(OutputFileName); Result := True; except on E: Exception do begin Result := False; MessageDlg(E.Message, mtError, [mbOk], 0); end; end; end; André F. Moraes ----- Original Message ----- From: "Ricardo Kenji" <[EMAIL PROTECTED]> To: <delphi-br@yahoogrupos.com.br> Sent: Friday, November 28, 2008 8:13 AM Subject: Re: [delphi-br] Nota Fiscal Eletrônica - NFe > Para realizar a conexão segura para o webservice, apenas os componentes > nativos do delphi já resolvem. Agora para a assinatura em si, o componente > capicom não me resolveu o problema, pois não achei suporte para assinar o > XML de acordo com as especificações da Secretaria.... > > []s > ----- Original Message ----- > From: André Moraes - GMail > To: delphi-br@yahoogrupos.com.br > Sent: Thursday, November 27, 2008 1:51 PM > Subject: Re: [delphi-br] Nota Fiscal Eletrônica - NFe > > > Não gostaria de usar outra dll além da capicom que já estou usando pra > conexão segura, mas obrigado pela dica. > > ----- Original Message ----- > From: "Andreano Lanusse" <[EMAIL PROTECTED]> > To: <delphi-br@yahoogrupos.com.br> > Sent: Thursday, November 27, 2008 2:50 PM > Subject: RE: [delphi-br] Nota Fiscal Eletrônica - NFe > > Da uma olhada > > http://nf-eletronica.com/blog/ > > ________________________________ > From: delphi-br@yahoogrupos.com.br [EMAIL PROTECTED] On > Behalf > Of André Moraes - GMail [EMAIL PROTECTED] > Sent: Thursday, November 27, 2008 8:45 AM > To: delphi-br@yahoogrupos.com.br > Subject: [delphi-br] Nota Fiscal Eletrônica - NFe > > > > ------------------------------------ > > -- > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > >