TsgcWSServer_HTTPAPI_WebBrokerBridge

TsgcWSServer_HTTPAPI_WebBrokerBridge는 HTTP/2 프로토콜이 활성화된 TsgcWebSocketServer_HTTPAPI 를 서버 베이스로 사용하며, DataSnap, HTTP/2, WebSocket 연결에 단일 서버를 사용하려는 경우 유용합니다.

 

TsgcWSServer_HTTPAPI_WebBrokerBridge는 TsgcWebSocketServer_HTTPAPI에서 상속되므로 이 서버를 참조할 수 있습니다.

 

TIdHttpWebBrokerBridge를 TsgcWSServer_HTTPAPI_WebBrokerBridge로 교체하려면 다음 단계를 따르십시오:

 

1. TsgcWSServer_HTTPAPI_WebBrokerBridge의 새 인스턴스를 생성합니다.

 

2. TIdHttpWebBrokerBridge에 대한 모든 호출을 TsgcWSServer_HTTPAPI_WebBrokerBridge로 교체하십시오.

 

3. WebSocket 연결을 처리하려면 TsgcWSServer_HTTPAPI_WebBrokerBridge를 참조하십시오.

 

구성

Datasnap 구성 요소는 Source 폴더에만 위치합니다. 이 객체들은 sgcWebSockets 패키지에 포함되지 않으므로 컴파일된 폴더에서는 찾을 수 없으며, 런타임에 생성해야 합니다.

필요한 파일을 프로젝트에 추가하거나 sgcWebSockets 패키지의 Source 폴더로 경로를 설정하기만 하면 됩니다. 필요한 파일:

 

• sgcWebSocket_Server_Base_WebBrokerBridge
• sgcWebSocket_Server_HTTPAPI_WebBrokerBridge

 

프로젝트가 IdHTTPWebBrokerBridge를 사용하는 경우 sgcIdHTTPWebBrokerBridge로 변경하십시오(이는 Enterprise Edition에만 적용됩니다).

Events

FServer := TsgcWSServer_HTTPAPI_WebBrokerBridge.Create(Self);
FServer.OnCommandRequest := OnCommandRequestEvent;
FServer.OnMessage := OnWebSocketMessage;
  
procedure OnCommandRequestEvent(aConnection : TsgcWSConnection_HTTPAPI; 
  const aRequestInfo: THttpServerRequest; var aResponseInfo: THttpServerResponse; var aHandled: Boolean);
begin
  if ARequestInfo.Document = '/test.html' then
  begin
    AResponseInfo.ResponseNo := 200;
    AResponseInfo.ContentText := '... body ...';
    aHandled := True;
  end;
end;
procedure OnWebSocketMessage(aConnection: TsgcWSConnection; const aText: string);
begin
  aConnection.WriteData(aText);
end;