Closed ysair closed 1 year ago
SynCrtSock.pas
procedure THttpServer.Process(ClientSock: THttpServerSocket; ConnectionID: THttpServerConnectionID; ConnectionThread: TSynThread); ... ctxt := THttpServerRequest.Create(self,ConnectionID,ConnectionThread); try respsent := false; with ClientSock do ctxt.Prepare(URL,Method,HeaderGetText(fRemoteIP),Content,ContentType,'',ClientSock.fTLS); //change to ctxt.Prepare(URL,Method,HeaderGetText(fRemoteIP),Content,ContentType,fRemoteIP,ClientSock.fTLS); ...
It may be time to switch to mORMot 2 anyway. ;)
so fast!
SynCrtSock.pas