search

HashLoad / horse

Fast, opinionated, minimalist web framework for Delphi
MIT License
1.17k stars 217 forks source link

Sugestão ReadTimeOut #411

Open trainneEg7 opened 1 day ago

trainneEg7 commented 1 day ago

Bom dia,

Ocorreu uma situação pra mim e precisei configurar o ReadTimeOut da conexão da requisição, mas nao encontrei parametros no Horse, poderia ser verificado?

Algo semelhante:

WebServer := TIdHTTPServer.Create(nil); WebServer.SessionState := false; WebServer.KeepAlive := false; WebServer.OnCommandGet := CustomOnCommandGet;

procedure CustomOnCommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo; begin AContext.Connection.Socket.ReadTimeout := 60000; # ReadTimeout AResponseInfo.ContentStream := TFileStream.Create('C:/file.zip', fmOpenRead or fmShareCompat); end;