TsgcWebSocketServer › 事件 › OnBinary
每次客户端发送二进制消息且服务器收到时触发。
property OnBinary: TsgcWSBinaryEvent;
// TsgcWSBinaryEvent = procedure(Connection: TsgcWSConnection; const Data: TMemoryStream) of object
—
一旦从客户端接收并缓冲了完整的二进制负载,就会触发 OnBinary。Data 参数将解码后的字节以定位在 0 处的 TMemoryStream 形式公开;请在处理程序内部读取,因为该流由服务器拥有,处理程序返回后将失效。默认情况下,NotifyEvents 为 neAsynchronous,因此 OnBinary 与主线程同步,可安全操作 UI 控件;如果吞吐量优先,可切换到 neNoSync 以在连接线程上分派。如果 Options.FragmentedMessages 为 frgOnlyFragmented,则不触发此事件,改用 OnFragmented。
procedure OnBinary(Connection: TsgcWSConnection; const Data: TMemoryStream);
var
oBitmap: TBitmap;
begin
oBitmap := TBitmap.Create;
try
oBitmap.LoadFromStream(Data);
Image1.Picture.Assign(oBitmap);
finally
FreeAndNil(oBitmap);
end;
end;