Delphi7 - Error (loop?) Server during read data from socket
 

I've two procedures (client and server). Object components are InDy9 TIdTCP. SO is XP-HOME. Operations of the che client: // connection . try ... CliSok.Connect(); ... CliSok.ReadTimeout := 1000; ... CliSok.Socket.UseNagle := False; . except ... on E: ESocketError do ........