>O meu medo é usar essa classe e quando instalado em um cliente o sistema começar a emitir mensagens de erro por falta de DLL ou algo parecido.
>
>Qual a chance disto acontecer? Existe uma maneira de testar se está instalado ou não e emitir uma mensagem do tipo:
>
>"Para que este programa funcione, é necessário ter ..."Vc pode usar o controlador do erro:
lLErro = .F.
lcErroVelho = ON ERROR()
ON ERROR llErro = .T.
loCrypt = NEWOBJECT("_cryptapi",HOME()+"\ffc\_crypt.vcx")
ON ERROR &lcErroVelho
IF llErro = .T. OR VARTYPE(loCrypt) != "O"
ENDIFHTH
