It is used here:

{* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*}
{$IFDEF COMPILER2_UP}
procedure TCustomWSocket.ThreadAttach;
begin
    inherited ThreadAttach;
    if FHSocket <> INVALID_SOCKET then
        WSocket_Synchronized_WSAASyncSelect(FHSocket, Handle,
                                            FMsg_WM_ASYNCSELECT, 
FSelectEvent);
end;


{* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*}
procedure TCustomWSocket.ThreadDetach;
begin
    if (GetCurrentThreadID = DWORD(FThreadID)) and (FHSocket <> 
INVALID_SOCKET) then
        WSocket_Synchronized_WSAASyncSelect(FHSocket, Handle, 0, 0);
    inherited ThreadDetach;
end;
{$ENDIF}

Regards,

SZ

----- Original Message ----- 
From: "Arno Garrels" <[EMAIL PROTECTED]>
To: "ICS support mailing" <twsocket@elists.org>
Sent: Sunday, June 04, 2006 5:03 PM
Subject: Re: [twsocket] ICSv6 Thread Attach/Detach problem


: Fastream Technologies wrote:
: > If this was the case, how do you suggest me to fix it? Rename the
: > variable?
:
: What happens if you comment out declaration of FThreadID in 
OverbyteIcsWSocket.pas?
:
:
: ---
: Arno Garrels [TeamICS]
: http://www.overbyte.be/eng/overbyte/teamics.html
:
:
:
: >
: > Regards,
: >
: > SZ
: >
: > ----- Original Message -----
: > From: "Francois PIETTE" <[EMAIL PROTECTED]>
: > To: "ICS support mailing" <twsocket@elists.org>
: > Sent: Sunday, June 04, 2006 2:21 PM
: > Subject: Re: [twsocket] ICSv6 Thread Attach/Detach problem
: >
: >
: >>>> BTW, I have a problem with THttpCli Thread(at/de)tach, here is my
: >>>> algorithm:
: >>>>
: >>>> - I create the component in main thread context
: >>>> - ThreadDetach
: >>>> - ThreadAttach in the worker thread
: >>>> - Use
: >>>> - Thread Detach in the worker thread (here it fires the exception
: >>>> "not attached here")
: >>>> - intend to destroy here or reuse later.
: >>>
: >>>> FYI, I do all these to pool connections. With v5, this exact code
: >>>> works very fine. I have one day left to launch the beta of v6 IQRP
: >>>> so if only you would help!
: >>
: >> Maybe the problem lies with FTreadID being redefined in
: >> TCustomWSocket whil eit is already defined in the base class
: >> TIcsWndControl. So the test with the current thread OD fails. You
: >> should be able to see exactly what happend with the debugger.
: >>
: >> --
: >> [EMAIL PROTECTED]
: >> http://www.overbyte.be
: >>
: >> --
: >> To unsubscribe or change your settings for TWSocket mailing list
: >> please goto http://www.elists.org/mailman/listinfo/twsocket
: >> Visit our website at http://www.overbyte.be
: -- 
: To unsubscribe or change your settings for TWSocket mailing list
: please goto http://www.elists.org/mailman/listinfo/twsocket
: Visit our website at http://www.overbyte.be 

-- 
To unsubscribe or change your settings for TWSocket mailing list
please goto http://www.elists.org/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be

Reply via email to