Sending an email to a SMTP server that uses a self signed certificate.
If TSMTPSend.Sock.SSL.VerifyCert = False then begin
Close the connection;
Exit without an appropriate error code;
end else begin //VerifyCert = True
Close the connection;
Exit with the right error code and message;
end;
The behaviour in the VerifyCert = False case is wrong.