Thank you Francois; I will most certainly try that. On Feb 19, 2008 5:15 PM, Francois Piette <[EMAIL PROTECTED]> wrote:
> And more note: the code will close the connections, but will not wait > until > the connections are closed. > I suggest you call Shutdown instead of Close, and use OnSessionClosed > event > to keep track of which connection has been gracefully closed, and use a > TTimer to check for timeout in disconnections and the call Abort when > appropriate. All this is to have as much as graceful connection close as > possible. You may also elect to call Abort in the first place to directly > close all connections. > > Contribute to the SSL Effort. Visit http://www.overbyte.be/eng/ssl.html > -- > [EMAIL PROTECTED] > Author of ICS (Internet Component Suite, freeware) > Author of MidWare (Multi-tier framework, freeware) > http://www.overbyte.be > > > ----- Original Message ----- > From: "Arno Garrels" <[EMAIL PROTECTED]> > To: "ICS support mailing" <twsocket@elists.org> > Sent: Tuesday, February 19, 2008 4:04 PM > Subject: Re: [twsocket] Invalid Window Handle when Application > ClosedandActiveConnections > > > > > I have also tried adding this to the Application OnClose Event: > > > procedure TMainForm.FormClose(Sender: TObject; var Action: > TCloseAction); > > > var > > > i : Integer; > > > begin > > > i := WSocketServer1.ClientCount; > > > for i := 0 to i - 1 do begin > > > WSocketServer1.Client[i].Close; > > > end; > > > end; > > > > It's probably just a typo, however the above cannot work. > > I also suggest to iterate the other way around: > > "for i := WSocketServer1.ClientCount -1 downto 0 do" > > since it may happen that the client list shrinks while > > looping. > > Is your application multi threaded? Have you dropped > > the server component onto the form? What component are > > we talking about? > > > > -- > > Arno Garrels [TeamICS] > > http://www.overbyte.be/eng/overbyte/teamics.html > > > > > > > > > > ----- Original Message ----- > > From: "wayne forrest" <[EMAIL PROTECTED]> > > To: "ICS support mailing" <twsocket@elists.org> > > Sent: Tuesday, February 19, 2008 1:42 PM > > Subject: Re: [twsocket] Invalid Window Handle when Application Closed > > andActiveConnections > > > > > > > It is a Bit Hard to Find the Exact Location of the Error; > > > > > > The Debugger goes into : Sysutils to Raise the LastOSError; > > > > > > System Error: 1400, invalid window handle. > > > > > > If I hit Ctrl+F3; to get the STACK TRace, there is nothing that is > > > worthwhile to track. > > > > > > > > > I have also tried adding this to the Application OnClose Event: > > > procedure TMainForm.FormClose(Sender: TObject; var Action: > TCloseAction); > > > var > > > i : Integer; > > > begin > > > i := WSocketServer1.ClientCount; > > > for i := 0 to i - 1 do begin > > > WSocketServer1.Client[i].Close; > > > end; > > > end; > > > > > > the above made no Difference. > > > > > > Any other Ideas; > > > > > > > > > > > > On Feb 19, 2008 2:32 PM, Francois Piette <[EMAIL PROTECTED]> > > > wrote: > > > > > >> > I get an Error when I close my Server Application: "Invalid Window > > >> Handel" > > >> > I get the ERROR when there are USers Connected. > > >> > > >> Run your application under the debugger to see where it happend > exactly. > > >> > > >> > > >> > I want to put something in Application on close Event. > > >> > > >> I suggest you disconnect all clients before closing the application. > > >> > > >> Contribute to the SSL Effort. Visit > http://www.overbyte.be/eng/ssl.html > > >> -- > > >> [EMAIL PROTECTED] > > >> Author of ICS (Internet Component Suite, freeware) > > >> Author of MidWare (Multi-tier framework, freeware) > > >> http://www.overbyte.be > > >> > > >> > > >> -- > > >> To unsubscribe or change your settings for TWSocket mailing list > > >> please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket > > >> Visit our website at http://www.overbyte.be > > >> > > > > > > > > > > > > -- > > > C: 076 337 4368 > > > T: 021 880 2037 > > > F: 021 880 2530 > > > -- > > > To unsubscribe or change your settings for TWSocket mailing list > > > please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket > > > Visit our website at http://www.overbyte.be > > > > -- > > To unsubscribe or change your settings for TWSocket mailing list > > please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket > > Visit our website at http://www.overbyte.be > > -- > To unsubscribe or change your settings for TWSocket mailing list > please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket > Visit our website at http://www.overbyte.be > -- C: 076 337 4368 T: 021 880 2037 F: 021 880 2530 -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
