TsgcWSPServer_WAMP › 事件 › OnException
当 Delphi 异常在服务器的工作线程或用户事件处理程序内部引发时触发。
property OnException: TsgcExceptionEvent;
// TsgcExceptionEvent = procedure(Connection: TsgcWSConnection; E: Exception) of object
—
为那些原本会静默终止监听器或分发器线程的异常提供集中钩子——例如 OnCall 处理程序中的错误、针对格式正确帧的 JSON 解析错误,或 TLS 期间发生的操作系统级故障。组件捕获异常后将其转发到此处,以便应用程序可以记录类名和消息。以普通字符串形式呈现的协议级状况通过 OnError 处理;应用程序代码返回的 RPC 错误则通过 CallError 返回给调用方。
procedure TForm1.WAMPServerException(Connection: TsgcWSConnection;
E: Exception);
begin
Memo1.Lines.Add(Format('[%s] exception: %s - %s',
[Connection.Guid, E.ClassName, E.Message]));
end;