Строка с данными проходит, сервер вроде бы ее получает а на сборе данных виснет программа.Если выключить принудительно. То после ее выключения пакет с нужными данными приходит но уже неизвестно куда.
Что я делаю не так ? Дайте совет. (Пакеты отслеживаю Wireshark) а на прием данных пробовал и readln и readstream. не помогает. И как можно установить что б слушать пока не получим символ '\n'
Код:
1 2 3 4 5 6 7 8 9 | IdTCPClient1 . Disconnect;
IdTCPClient1 . Host := '192.168.20.175' ;
IdTCPClient1 . Port := 4444 ;
IdTCPClient1 . Connect();
IdTCPClient1 . Socket . Open;
IdTCPClient1 . Socket . WriteLn ( '{"id":1, "method":"getstat"}\n' );
str:= IdTCPClient1 . Socket . AllData;
|