TsgcWSPServer_sgc › Gebeurtenissen › OnBeforeSubscription
Wordt geactiveerd voordat een abonnement wordt geaccepteerd; de handler kan het weigeren of autoriseren.
property OnBeforeSubscription: TsgcWSBeforeSubscriptionEvent;
// TsgcWSBeforeSubscriptionEvent = procedure(Connection: TsgcWSConnection; const Subscription: String; var Accept: Boolean) of object
—
Wordt geactiveerd wanneer een client Subscribe aanroept, eenmaal per kanaal (wildcard-abonnementen worden uitgebreid vóór het evenement wordt geactiveerd). Inspecteer Subscription om de kanaalnaam te controleren en stel Accept in op False om het abonnement te weigeren; de client ontvangt in dat geval geen abonnementsbevestiging. Accept wordt geïnitialiseerd als True.
procedure TForm1.oProtocolBeforeSubscription(Connection: TsgcWSConnection;
const Subscription: String; var Accept: Boolean);
begin
Accept := not Subscription.StartsWith('admin.');
end;