Использование IdTCPClient

@6_2_xe_novichek · Регистрация: 19.09.2012

Студворк — интернет-сервис помощи студентам

Приветствую всех обозревающих это сообщение, т.е. потенциальных помощников!

Прошу помощи в использовании IdTCPClient в среде Borland C++ 6.0. Я перекопал много где, не только здесь. Большая часть имеющейся инфы уже с использованием новых компонент Indy (кстати, какая у меня версия Indy, не знаю, но, видимо, очень старая, судя по отсутствию свойств, которые указаны в примерах). Много схожих проблем, но сколько пробовал "передрать", ничего не выходит, либо результат, так себе, т.к. есть с чем сравнивать - результат работы Telnet программы, либо просто зависает.

Я пишу только клиента, сервер уже есть, фирменный, т.е. работает чётко, и вся проблема на моей стороне. Посылаю последовательность текстовых команд, одну за другой, но только после получения ответа от предидущей. Ответы приходят разные, тоже текст, при чём разной длины, от нескольких байт, до сотен, а может и больше, кило-байт. Посылка команд проблем не вызывает, например:

C++
1
IdTCPClient1->WriteLn("LST OBJ;");

Но вот приём данных проблематичен, иногда это может быть несколько байтов текста, а иногда, очень много. Пробовал использвать метод:

C++
1
IdTCPClient1->WaitFor(">>> END");

Где ">>> END" - признак конца ответа сервера, иногда, до определённого количества данных, срабатывает нормально, но когда приходит бОльший объём данных, (больше определённого, не стал выискивать размер), выдаёт не всё. Далее решил использовать метод ReadBuffer:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
AnsiString tmp_ansi, buffer_ansi;
char *memblock=NULL;
...
memblock=new char[32768]; // 32768 - IdTCPClient1->RecvBufferSize;
while(true)
{
  IdTCPClient1->ReadBuffer(memblock,32768);
  tmp_ansi=memblock;
  if (tmp_ansi.Length()==0)
    break;
  else
    buffer_ansi=buffer_ansi+tmp_ansi;
}
delete[] memblock;
memblock=NULL;
...

Данный код "зависает", видимо когда подходит чтение последнего блока, который, наверняка отличается от 32768. Как решить эту проблему?

Заранее благодарен.

@Neal · 24.07.2013, 14:04

...или отсутствует знак завершения потока ('\0')

Добавлено через 1 минуту
или while не завершается

@nick42 · 24.07.2013, 14:21

Сообщение от Neal

или while не завершается

Естественно. В цикле же memblock не обнуляется.

@6_2_xe_novichek · 25.07.2013, 06:51 **[ТС]**

Сделал так, что бы переменная tmp_ansi записывалась в файл до того, как прицепится к buffer_ansi, как и предполагал, последний блок не дочитывается и висит, видимо, пока не допишется до конца... В общем мучал, мучал, нашёл-таки, вот:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
AnsiString tmp_ansi, buffer_ansi;
int count;
...
IdTCPClient1->WriteLn("LST OBJ;");
buffer_ansi="";
count=0;
while(true)
{
  tmp_ansi=IdTCPClient1->ReadLn("\r\n",500);
  if (tmp_ansi=="")
  {
    ++count;
    if (count>3)
      break;
  }
  else
  {
    count=0;
    buffer_ansi=buffer_ansi+tmp_ansi+'\n';
  }
}
...

Вроде работает, только ждать "ломы" 2 сек.

) Меньше ставил timeout, не успевает считать. Может есть что получше? Признак '\0' в возвращаемом tmp_ansi отсутствует...

P.S.: count обнуляю в else, потому что иногда приходят пустые строки, но не больше 2, поэтому я с запасом поставил верхний порог равным 3, когда пора "спрыгивать" с цикла.

Новые блоги и статьи Все статьи Все блоги /
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при создании или изменении элементов справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .

@Neal 83 / 78 / 14 Регистрация: 14.06.2012 Сообщений: 261
	24.07.2013, 14:04
	...или отсутствует знак завершения потока ('\0') Добавлено через 1 минуту или while не завершается 0