Hi
 I thing that is bug in http.pas

Constructor TTCPHttpDaemon.Create;
begin
  sock:=TTCPBlockSocket.create;
  FreeOnTerminate:=true;
  Priority:=tpNormal;
  inherited create(false);  //<- than cause EA error under Delphi
end;

should be:
Constructor TTCPHttpDaemon.Create;
begin
  sock:=TTCPBlockSocket.create;
  inherited create(false);  // <-------first create   ***************
  FreeOnTerminate:=true;
  Priority:=tpNormal;
end;


the same in Constructor TTCPHttpThrd.Create(Hsock:TSocket);




Darek

-------------------------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc.
Still grepping through log files to find problems?  Stop.
Now Search log events and configuration files using AJAX and a browser.
Download your FREE copy of Splunk now >>  http://get.splunk.com/
_______________________________________________
synalist-public mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/synalist-public

Reply via email to