Здравствуйте, Shtirliz, Вы писали:

NV>вот этот код непонятен
NV>

NV>    If (count >= sTcp)or (count >= sUdp)
NV>

кстати да, я бы ещё посоветовал тут использовать модель ввода-вывода "Перекрытый ввод-вывод с уведомлениями о событии"
ИМХО — это оптимальная модель для использования в потоке и тогда этот код можно было бы считать корректным, так как событие срабатывает тогда, когда пакет уже прочитан.

NV>ведь recv() не обязан дать только один пакет?
да, он так же не обязан вернуть и полный пакет..

NV>кроме того, судя по Synchronize(DoData); и While Not Terminated Do
NV>это код метода Execute, тогда какого рожна там Application.ProcessMessages; ???
NV>это не только не поможет, это просто неправильно !!!
NV>(ну и всякие там FForm.Memo1. это тоже некорректно)

согласен