TsgcWSPServer_sgc事件 › OnBeforePublish

OnBeforePublish 事件

在客户端发布被广播之前触发;处理器可重写或拒绝该发布。

语法

property OnBeforePublish: TsgcWSBeforePublish;
// TsgcWSBeforePublish = procedure(Connection: TsgcWSConnection; const aChannel: String; var aText: String; var Accept: Boolean) of object

默认值

备注

在处理客户端发起的 Publish 时触发,发生在消息到达任何订阅者之前。检查 aChannel 以授权发布,修改 aText 以过滤或重写有效载荷,并将 Accept 设置为 False 以静默丢弃消息。Accept 初始值为 True。

示例

procedure TForm1.oProtocolBeforePublish(Connection: TsgcWSConnection;
  const aChannel: String; var aText: String; var Accept: Boolean);
begin
  Accept := aChannel <> 'private';
end;

返回事件