TsgcWSHTTP2WebBrokerBridgeServer gebruikt TsgcWebSocketHTTPServer met HTTP/2 protocol ingeschakeld als serverbasis en is nuttig als u één server wilt gebruiken voor DataSnap, HTTP/2 en WebSocket-verbindingen.
TsgcWSHTTP2WebBrokerBridgeServer erft van TsgcWebSocketHTTPServer, dus u kunt verwijzen naar deze server.
Volg de volgende stappen om TIdHttpWebBrokerBridge te vervangen door TsgcWSHTTP2WebBrokerBridgeServer:
1. Maak een nieuwe instantie van TsgcWSHTTP2WebBrokerBridgeServer aan.
2. Vervang alle aanroepen naar TIdHttpWebBrokerBridge door TsgcWSHTTP2WebBrokerBridgeServer.
3. Om WebSocket-verbindingen te verwerken, raadpleeg TsgcWebSocketHTTPServer.
De Datasnap-componenten bevinden zich alleen in de map Source; u vindt ze niet in de gecompileerde mappen omdat deze objecten niet zijn opgenomen in het sgcWebSockets-pakket, dus u moet ze tijdens runtime aanmaken.
Voeg gewoon de vereiste bestanden toe aan uw project of stel uw pad in op de Source-map van het sgcWebSockets-pakket. Vereiste bestanden:
Als het project gebruikmaakt van IdHTTPWebBrokerBridge, wijzig dit dan naar sgcIdHTTPWebBrokerBridge (dit geldt alleen voor de Enterprise Edition).
FServer := TsgcWSHTTP2WebBrokerBridgeServer.Create(Self);
FServer.OnCommandRequest := OnCommandRequestEvent;
FServer.OnCommandGet := OnCommandGetevent;
procedure OnCommandRequestEvent(AThread: TIdContext; ARequestInfo: TIdHTTPRequestInfo;
AResponseInfo: TIdHTTPResponseInfo; var aHandled: Boolean);
begin
if ARequestInfo.Document = '/test.html' then
aHandled := True;
end;
procedure OnCommandGetevent(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo;
AResponseInfo: TIdHTTPResponseInfo);
begin
if ARequestInfo.Document = '/test.html' then
begin
AResponseInfo.ResponseNo := 200;
AResponseInfo.ContentText := 'hello all';
end;
end;