> > procedure TTCPHttpDaemon.Execute;
> > var
> > ClientSock:TSocket;
> > HttpThrd: TTCPHttpThrd;
> > begin
> > with sock do
> > begin
> > CreateSocket;
> > setLinger(true,10);
> > bind('0.0.0.0','80');
[...]
Do correction of SetLinger call. Value 10 is bad (from very old Synapse
version). Change it to 10000 instead.
--
Lukas Gebauer.
E-mail: [EMAIL PROTECTED]
WEB: http://www.ararat.cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
-------------------------------------------------------------------------
Check out the new SourceForge.net Marketplace.
It's the best place to buy or sell services for
just about anything Open Source.
http://sourceforge.net/services/buy/index.php
_______________________________________________
synalist-public mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/synalist-public
