--
--
Você recebeu esta mensagem porque está inscrito no "DUG-RS -
Delphi Users Group Rio Grande do Sul" em Grupos do Google.
Acesse o nosso BLOG em http://www.dug-rs.org e contribua com a comunidade Delphi do Rio Grande do Sul
Para postar neste grupo, envie um e-mail para dug...@googlegroups.com
Para cancelar a sua inscrição neste grupo, envie um e-mail para
dug-rs-unsubscribe@googlegroups.com
Para ver mais opções, visite este grupo em
http://groups.google.com.br/group/dug-rs?hl=pt-BR
Twitter: @dugrs
http://www.facebook.com/groups/dugrs/
http://www.Vimeo.com/dugrs
---
You received this message because you are subscribed to the Google Groups "DUG-RS - Delphi Users Group Rio Grande do Sul" group.
To unsubscribe from this group and stop receiving emails from it, send an email to dug-rs+unsubscribe@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.
OpenSSL? PGP? Ou é programaticamente, no Delphi? Programaticamente eu nunca vi nada parecido, mas sempre se pode usar algum wrapper da OpenSSL para Delphi e gerar um arquivo com assinatura digital no formato desejado.Ainda, usando os recursos de assinatura digital disponíveis no próprio formato PDF eu também nunca vi nada parecido em termos de API. Deve ter, mas tem que procurar.2017-07-10 14:51 GMT-03:00 Gilberto Dessbesell Jr <gdb...@gmail.com>:Boa tarde pessoal!O que vocês têm usado para assinatura digital de PDFs?Att.,
--
--
Você recebeu esta mensagem porque está inscrito no "DUG-RS -
Delphi Users Group Rio Grande do Sul" em Grupos do Google.
Acesse o nosso BLOG em http://www.dug-rs.org e contribua com a comunidade Delphi do Rio Grande do Sul
Para postar neste grupo, envie um e-mail para dug...@googlegroups.com
Para cancelar a sua inscrição neste grupo, envie um e-mail para
dug-rs-unsubscribe@googlegroups.com
Para ver mais opções, visite este grupo em
http://groups.google.com.br/group/dug-rs?hl=pt-BR
Twitter: @dugrs
http://www.facebook.com/groups/dugrs/
http://www.Vimeo.com/dugrs
---
You received this message because you are subscribed to the Google Groups "DUG-RS - Delphi Users Group Rio Grande do Sul" group.
To unsubscribe from this group and stop receiving emails from it, send an email to dug-rs+unsubscribe@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.
program Digital_Signature_Demo; {$APPTYPE CONSOLE} {$R *.res} uses System.SysUtils, VCL.Graphics, gtPDFEng, gtCstPDFEng; var gtPDFEngine1: TgtPDFEngine; tNow: TDateTime; gtDigitalSignature1: TgtDigitalSignature; begin try begin // Create a new PDF document gtPDFEngine1 := TgtPDFEngine.Create(Nil); with gtPDFEngine1 do begin Preferences.ShowSetupDialog := false; FileName := 'sample_doc.pdf'; // Create a hidden digital signature with DigitalSignature do begin Enabled := true; FieldProperties.Visible := false; // hidden signature // Specify signature options with SignatureProperties do begin CertFileName := 'example-com.pfx'; // assumes current directory CertPassword := 'password'; Location := 'Bangalore'; Reason := 'Just for this demo'; DateTime := Now; end; end; BeginDoc; // Creates a page in the document // Render some text on the document Font.Size := 16; TextOut(1,1,'Long long ago, so long ago, nobody knows how long ago...'); EndDoc; // Saves document end; end except on E: Exception do begin Writeln('Error - ' + E.ClassName, ': ', E.Message); Readln; end; end; end.
Para ver mais opções, visite este grupo em
http://groups.google.com.br/group/dug-rs?hl=pt-BR
Twitter: @dugrs
http://www.facebook.com/groups/dugrs/
http://www.Vimeo.com/dugrs
---
You received this message because you are subscribed to the Google Groups "DUG-RS - Delphi Users Group Rio Grande do Sul" group.
To unsubscribe from this group and stop receiving emails from it, send an email to dug-rs+un...@googlegroups.com.
Para ver mais opções, visite este grupo em
http://groups.google.com.br/group/dug-rs?hl=pt-BR
Twitter: @dugrs
http://www.facebook.com/groups/dugrs/
http://www.Vimeo.com/dugrs
---
You received this message because you are subscribed to the Google Groups "DUG-RS - Delphi Users Group Rio Grande do Sul" group.
To unsubscribe from this group and stop receiving emails from it, send an email to dug-rs+un...@googlegroups.com.
--
Gilberto Dessbesell Jr.
"Simplicidade--a arte de maximizar a quantidade de trabalho não realizado--é essencial."
--
--
Você recebeu esta mensagem porque está inscrito no "DUG-RS -
Delphi Users Group Rio Grande do Sul" em Grupos do Google.
Acesse o nosso BLOG em http://www.dug-rs.org e contribua com a comunidade Delphi do Rio Grande do Sul
Para postar neste grupo, envie um e-mail para dug...@googlegroups.com
Para cancelar a sua inscrição neste grupo, envie um e-mail para
Para ver mais opções, visite este grupo em
http://groups.google.com.br/group/dug-rs?hl=pt-BR
Twitter: @dugrs
http://www.facebook.com/groups/dugrs/
http://www.Vimeo.com/dugrs
---
You received this message because you are subscribed to the Google Groups "DUG-RS - Delphi Users Group Rio Grande do Sul" group.
To unsubscribe from this group and stop receiving emails from it, send an email to dug-rs+un...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.
--
--
Você recebeu esta mensagem porque está inscrito no "DUG-RS -
Delphi Users Group Rio Grande do Sul" em Grupos do Google.
Acesse o nosso BLOG em http://www.dug-rs.org e contribua com a comunidade Delphi do Rio Grande do Sul
Para postar neste grupo, envie um e-mail para dug...@googlegroups.com
Para cancelar a sua inscrição neste grupo, envie um e-mail para
Para ver mais opções, visite este grupo em
http://groups.google.com.br/group/dug-rs?hl=pt-BR
Twitter: @dugrs
http://www.facebook.com/groups/dugrs/
http://www.Vimeo.com/dugrs
---
You received this message because you are subscribed to the Google Groups "DUG-RS - Delphi Users Group Rio Grande do Sul" group.
To unsubscribe from this group and stop receiving emails from it, send an email to dug-rs+un...@googlegroups.com.
program TgtPDFDocument_AddSignature_Hidden; {$APPTYPE CONSOLE} uses SysUtils, gtPDFDoc, gtExPDFDoc; var gtPDFDocument1: TgtPDFDocument; begin // Create a document object gtPDFDocument1 := TgtPDFDocument.Create(Nil); try begin // Load input document gtPDFDocument1.LoadFromFile('to_be_signed_doc.pdf'); Writeln('Document opened.'); // Add a hidden signature field to a page gtPDFDocument1.AddSignature( 'F:\Downloads\sub...@gnostice.com-2010-03-04', '-- snipped --', 'To demonstrate digital signing', 'Bangalore', '+91.80.41.726.529', 5, 'fld_sig1'); Writeln('Document signed.'); gtPDFDocument1.SaveToFile('signed_doc.pdf'); Writeln('Document saved.'); end except on Err:Exception do begin Writeln('Sorry, an exception was raised. '); Writeln(Err.Classname + ':' + Err.Message); end; end; // Free resources gtPDFDocument1.Reset; // Destroy document object FreeAndNil(gtPDFDocument1); Writeln('Press Enter to exit.'); Readln; end.O link desse componente é: https://www.gnostice.com/PDFtoolkit_VCL.asp
To view this discussion on the web visit https://groups.google.com/d/msgid/dug-rs/24d8deeb-c9eb-4178-9565-ac58073963ccn%40googlegroups.com.