Oi pessoal, está é uma dúvida muito recorrente para o pessoal que está
migrando do trunk para o Trunk2 do ACBr.
No tunk, para verificar a validade do certificado com a versão capicom
era usado o seguinte código, por exemplo:
1 2 3 4 | procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(FormatDateTime('dd/mm/yyyy', ACBrNFe1.Configuracoes.Certificados.DataVenc)); end; |
Lembrando que só funcionava para a versão Capicom.
Agora no Trunk2, podemos usar o seguinte código:
1 2 3 4 | procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(FormatDateTime('dd/mm/yyyy', ACBrNFe1.SSL.CertDataVenc)); end; |
E funciona com qualquer SSLLib que você apontar para o componente!
Para mais detalhes, você pode dar uma conferida nos exemplos
que acompanham os fontes do componente.
Dúvidas ou sugestões deixe nos comentários do post.
Está gostando do conteúdo? Considere pagar um cafezinho para nossa equipe!
