Como verificar a validade do Certificado no Trunk2 do ACBr?

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.