SSLClientAuthentication Event

Fired when the client presents its credentials to the server.

Syntax

type TSSLClientAuthenticationEvent = procedure (
  Sender: TObject;
  ConnectionId: Integer;
  CertEncoded: String;
  CertEncodedB: TBytes;
  const CertSubject: String;
  const CertIssuer: String;
  const Status: String;
  var Accept: Boolean
) of Object;

property OnSSLClientAuthentication: TSSLClientAuthenticationEvent read FOnSSLClientAuthentication write FOnSSLClientAuthentication;

Remarks

This is where the server can decide whether to continue or not. The Accept parameter is a recommendation on whether to continue or close the connection. This is just a suggestion: application software must use its own logic to determine whether to continue or not.

When Accept is False, Status shows why the verification failed (otherwise, Status contains the string "OK").