> > Interesting... in 'inherited create' is created the Thread. How will be
> > your thread started now?
> 
> It is like this:
> 
> Procedure TTCPHttpDaemon.Execute;
> Begin
>   fsock.Bind(fIP, fPort);
> ...
> End;
> 
> Procedure StartServer(IP, Port: String);
> Var
>   RunningServer : TTCPHTTPDaemon;
> begin
>   RunningServer := TTCPHTTPDaemon.Create(IP, Port);
>   RunningServer.Execute;
>   RunningServer.Free;
> End;

.. well, but code in execute is not called in separate thread. It is 
really looks like WSAgetLastError not workling in the threads under 
freepascal, and I not have idea why. 

> Same problem with sockets.pp inside a thread.

It is really looks like some mysterious bug in freepascal compiler. :-O


--
Lukas Gebauer.

E-mail: [EMAIL PROTECTED]
WEB: http://www.ararat.cz/synapse - Synapse Delphi and Kylix TCP/IP 
Library



-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2005.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
synalist-public mailing list
synalist-public@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/synalist-public

Reply via email to