TsgcWebSocketHTTPServer › Eventi › OnCommandGet
Viene attivato quando il server HTTP riceve una richiesta GET, POST o HEAD affinché l'applicazione possa costruire la risposta.
property OnCommandGet: TIdHTTPCommandEvent;
// TIdHTTPCommandEvent = procedure(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo) of object—
OnCommandGet è il punto di ingresso principale per il traffico HTTP (GET, POST e HEAD) servito dal componente. ARequestInfo espone la richiesta (Document, Params, AuthUsername, Headers, PostStream, RemoteIP...) e AResponseInfo è la risposta in uscita: impostare ContentText o ContentStream con il corpo, ContentType con il tipo MIME e ResponseNo con il codice di stato HTTP (200, 404...); chiamare AResponseInfo.ServeFile per inviare un file dal disco. I gestori vengono eseguiti nel contesto del thread di connessione, quindi evitare l'accesso diretto all'interfaccia utente o passare a un dispatch sincronizzato. Le richieste per i file che si trovano già nella DocumentRoot vengono servite automaticamente e non attivano questo evento.
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;