http://www.programmersheaven.com/feed/User/143605/RSS.aspx Events at Programmer's Heaven related to the user TataL_LoR. en Copyright 2013 Programmers Heaven Wed, 22 May 2013 21:55:31 -0700 Argotic Syndication Framework 2007.3.0.1, http://www.codeplex.com/Argotic http://www.rssboard.org/rss-specification 360 <p>Posted a 'new message on the Advanced Delphi forum.</p>Hi guys!<br /> <br /> I'm building a server app that collects data from many clients (CPU loads) using Indy components (TIdTCPServer and TIdTCPClient). The server should periodically issue a REPORT command to each client and receive a LOAD X response.<br /> <br /> I've set up the client app to create the TCPClient in a TThread descendant and after connecting to the server it just waits to receive a REPORT command, at which point the client answers with 'LOAD X', where X is an integer.<br /> <br /> <pre class="sourcecode"> repeat s := TCPClientInsideThread.IOHandler.ReadLn; if ( s = 'REPORT' ) then TCPClientInsideThread.IOHandler.WriteLn('LOAD ' + IntToStr(GetLoads.CPULoad)); until s = 'DISCONNECT'; </pre><br /> <br /> On the server side, I don't know how to synchronize the server-client connection with the main thread and I don't know where to issue the REPORT command.<br /> <br /> I tried putting it in the OnExecute handler (using a relatively small timeout value to achieve repetition), but when more than one clients were connected, I started getting access violations.<br /> I tried putting it in the OnTimer handler of a TTimer, where I cycled through each connection and sent a REPORT request, but that made the server hang after a few requests to even one client and then got access violations<br /> <br /> When and where should I issue the REPORT command on the server? How should I collect the response from the client? How do I put the response in the main thread of the server?<br /> <br /> Could someone please help out with ideas, if not code?<br /> <br /> <br /> Thanks! Wed, 13 May 2009 14:23:19 -0700