TsgcWSPServer_sgc › Ereignisse › OnBeforeSubscription
Wird ausgelöst, bevor ein Abonnement akzeptiert wird; der Handler kann es ablehnen oder autorisieren.
property OnBeforeSubscription: TsgcWSBeforeSubscriptionEvent;
// TsgcWSBeforeSubscriptionEvent = procedure(Connection: TsgcWSConnection; const Subscription: String; var Accept: Boolean) of object
—
Wird ausgelöst, wenn ein Client Subscribe aufruft, einmal pro Kanal (Platzhalter-Abonnements werden vor dem Auslösen des Ereignisses expandiert). Überprüfen Sie Subscription, um den Kanalnamen zu prüfen, und setzen Sie Accept auf False, um das Abonnement abzulehnen; der Client erhält in diesem Fall keine Subscribe-Bestätigung. Accept trifft mit True initialisiert ein.
procedure TForm1.oProtocolBeforeSubscription(Connection: TsgcWSConnection;
const Subscription: String; var Accept: Boolean);
begin
Accept := not Subscription.StartsWith('admin.');
end;