Доброго времени суток.
Столкнулся со следующей проблемой.

Порождается нить.
Создается сокет FSocket := WinSock.socket(AF_INET, SOCK_STREAM, IPPROTO_TCP).
Создаются три события FEvents[k] := WSACreateEvent.
Ассоциируем последнее событие со всеми событиями WSAEventSelect(FSocket, FEvents[2], FD_ALL_EVENTS).
Происходит подключение WinSock.connect(FSocket, FServerAddr, SizeOf(FServerAddr)).
Далее до завершения нити выполняется цикл проверки WSAWaitForMultipleEvents(3, @FEvents, False, WSA_INFINITE, False).
Когда происходит последнее событие, вызывается WSAEnumNetworkEvents(FSocket, FEvents[2], NetEvents) и анализируется структура NetEvents, а именно NetEvents.lNetworkEvents. Например:

Внимание, вопрос!
Хронически приходит NetEvents.lNetworkEvents равный нулю! Это происходит после события чтения, причем не всегда. Интервал времени между событием чтения и этим "нулевым событием" тоже непостоянен - от десятков до сотен миллисекунд. Я бы не обращал на это внимания, да только пока не пришло "нулевое событие" почему-то не удается отправлять данные в сокет.

PS WSAEnumNetworkEvents не возвращает ошибки, всегда ноль.

Печаль, никто не отвечает(