TsgcWebSocketHTTPServer | Requêtes HTTP du serveur

Utilisez OnCommandGet pour gérer les requêtes HTTP des clients. Utilisez les paramètres suivants :

RequestInfo : contient les informations de la requête HTTP.

ResponseInfo : est la réponse HTTP à la requête HTTP.
- ContentText : est la réponse au format texte.
- ContentType : est le type de Content-Type.
- ResponseNo : numéro de la réponse HTTP, exemple : 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

Utilisez cet événement pour personnaliser la réponse HTTP. Par exemple, si vous souhaitez que certains points de terminaison utilisent un schéma d'autorisation tandis que d'autres sont accessibles sans autorisation, utilisez le paramètre options pour l'autoriser ou le désactiver. Voici un exemple où l'autorisation Basic est activée, mais lorsqu'un utilisateur demande le point de terminaison /public, l'autorisation n'est pas requise.


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