TsgcWebSocketHTTPServer | Solicitudes del servidor HTTP

Utilice OnCommandGet para gestionar las solicitudes HTTP del cliente. Use los siguientes parámetros:

RequestInfo: contiene información de la solicitud HTTP.

ResponseInfo: es la respuesta HTTP a la solicitud HTTP.
- ContentText: es la respuesta en formato de texto.
- ContentType: es el tipo de Content-Type.
- ResponseNo: número de respuesta HTTP, ejemplo: 200.


procedure OnCommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo; 
  AResponseInfo: TIdHTTPResponseInfo);
begin
  if ARequestInfo.Document = '/' then
  begin
    AResponseInfo.ContentText := '<html><head><title>Test Page</title></head><body></body></html>';
    AResponseInfo.ContentType := 'text/html';
    AResponseInfo.ResponseNo := 200;
  end;
end;

OnBeforeCommand

Use este evento para personalizar la respuesta HTTP. Por ejemplo, si desea que algunos endpoints usen un esquema de autorización mientras que otros pueden accederse sin autorización, use el parámetro de opciones para permitirlo o deshabilitarlo. A continuación se muestra un ejemplo donde se habilita Authorization Basic, pero cuando un usuario solicita el endpoint /public, no se requiere autorización.


procedure OnBeforeCommand(const aConnection: TsgcWSConnection; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo; var aOptions: TsgcHTTPCommandOptions);
begin
  if aRequestInfo.Document = '/public' then
    aOptions := [hcoAuthorizedBasic];
end;