Здравствуйте Уважаемые жители Королевства! Подскажите куда копать. Есть служба, которая по TCP (IdTCPClient) считывает непрерывно поступающие данные и кладет в StringList, который создается при запуске службы, уничтожается при остановке.

code:
 
while not Terminated do
begin
   if IdTCPClient1.Connected then
       while not IdTCPClient1.Socket.InputBufferIsEmpty do
       begin 
         ........... 
         ListData.Add(sdata);
       end
   sleep(500);
end;

Дал ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83328