debugging websocket

emiMobileServer/Source/Ws.Server.Module.dfm

@@ -16,7 +16,6 @@ object WsServerModule: TWsServerModule
     Left = 85
     Top = 110
     object XDataServer1WebSocket: TSparkleWebSocketMiddleware
-      Path = 'emimobile'
       AllowedOrigins.Strings = (
         '*')
     end

emiMobileServer/Source/Ws.Server.Module.pas

@@ -52,6 +52,7 @@ uses
   Common.Logging,
   Common.Middleware.Logging,
   Common.Config, Vcl.Forms, IniFiles,
+  XData.Service.Common,
   Ws.ServiceImpl;
 
 {%CLASSGROUP 'Vcl.Controls.TControl'}
@@ -68,7 +69,7 @@ var
 begin
   RegisterServiceType(TWebSocketService);
   Logger.Log(1, Format('Ws model "%s" registered TWebSocketService', [AModelName]));
-  RegisterOpenApiService;
+  //RegisterOpenApiService;
   Url := ABaseUrl;
   if not Url.EndsWith('/') then
     Url := Url + '/';