Обмен сообщениями по TCP.

[XVG]

Добрый день. Есть стороннее серверное приложение которое выполняет определенные команды по средствам получения текстовых сообщений через TCP.

Подключаюсь к нему используя IdTCPClient:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
IdTCPClient1->Connect();

IdTCPClient1->SendCmd("Login Admin 12345");

IdTCPClient1->SendCmd("-------------");

}

Все работает. Сервер выполняет команды, но в ответ шлет строки ответа о подтверждении выполнения, которые вылезают в отдельном окне c надписью:


"Reply Code is not valid: Ok."

Подскажите, каким образом в данном случае можно принимать ответ от сервера? И выводить его например в Memo. Или как вариант, как совсем избавиться от этого окошка? Что бы не мешало.

[XVG]

Всё. Разобрался.

Отправляем через IdTCPClient->Socket->WriteLn();
Получаем через IdTCPClient->Socket->ReadLn();


Сам спросил, сам ответил.