TsgcWSPServer_sgc › Eventos › OnBeforeSubscription
Disparado antes de uma assinatura ser aceita; o manipulador pode negá-la ou autorizá-la.
property OnBeforeSubscription: TsgcWSBeforeSubscriptionEvent;
// TsgcWSBeforeSubscriptionEvent = procedure(Connection: TsgcWSConnection; const Subscription: String; var Accept: Boolean) of object
—
Gerado quando um cliente chama Subscribe, uma vez por canal (inscrições com curinga são expandidas antes do disparo do evento). Inspecione Subscription para verificar o nome do canal e defina Accept como False para recusar a inscrição; nesse caso, o cliente não recebe confirmação de Subscribe. Accept chega inicializado como True.
procedure TForm1.oProtocolBeforeSubscription(Connection: TsgcWSConnection;
const Subscription: String; var Accept: Boolean);
begin
Accept := not Subscription.StartsWith('admin.');
end;