Skip to content

E
emiMobile
Commit 9940be71 by emsys
Options

debugging websocket

parent c31c2d2d
Showing with 2 additions and 2 deletions
emiMobileServer/Source/Ws.ServiceImpl.pas
...@@ -22,7 +22,7 @@ type ...@@ -22,7 +22,7 @@ type
[ServiceImplementation] [ServiceImplementation]
TWebSocketService = class(TInterfacedObject, IWebSocketService) TWebSocketService = class(TInterfacedObject, IWebSocketService)
private private
procedure WebSockerConnectionHandler; function WebSockerConnectionHandler: string;
function Health: string; function Health: string;
procedure ProcessJsonMessage(const AMsg: string); procedure ProcessJsonMessage(const AMsg: string);
end; end;
...@@ -31,7 +31,7 @@ implementation ...@@ -31,7 +31,7 @@ implementation
{ TWebSocketService } { TWebSocketService }
procedure TWebSocketService.WebSockerConnectionHandler; function TWebSocketService.WebSockerConnectionHandler: string;
var var
Upgrader: IWebSocketUpgrader; Upgrader: IWebSocketUpgrader;
WebSocket: IWebSocket; WebSocket: IWebSocket;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment