> > > > Constructor TTCPHttpDaemon.Create(I, P: String);
> > > > Begin
> > > >    Inherited Create(true); // <<<<< create suspended
> > > >
> > > >    fSock  := TTCPBlockSocket.Create;
> > > >    fIP    := I;
> > > >    fPort  := P;
> > > >    Resume; // <<<<<<<<<<< let it run
> > > > end;
>
> I will try resume and let you know how it works.


I tried Resume().. and same behavior..

The fpc bug report without using any classes or synapse and just BeginThread
seems to have same behavior.
As soon as I comment out all the thread code and run it is a regular non
threaded app, it reports error back correctly. In delphi 5, works fine either
way, with or without threads.

I wonder if other windows api functions don't work within fpc thread.. I mean
WSAGetLastError is just a windows api call along with the WSAData 
struct, and WSAStartup call! It doesn't make sense to me, why a simple winapi 
function wouldn't work. Hmmm. I wonder for example if GetLastError works, 
without the WSA, for checking other problems from other functions not related 
to sockets.  Maybe I try it, if I can cause a intentional error first.

L505


-------------------------------------------------------------------------
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
[email protected]
https://lists.sourceforge.net/lists/listinfo/synalist-public

Reply via email to