работа с сокетами по UDP помогите.

[евгений_125]

доброго времени суток всем, пытаюсь наладить связь с неким прибором с ПЛК 100 v2.17 по UDP. и вот в чем проблемы:

создаю сокет
IF hClientSocket <>16 THEN
stClientSettings.sin_family := SOCKET_AF_INET; (*тип сокета*)
stClientSettings.sin_port := wPort; (*порт севера*)
stClientSettings.sin_addr := dwIPaddr;
hClientSocket := SysSockCreate(SOCKET_AF_INET, SOCKET_DGRAM, SOCKET_IPPROTO_UDP);
END_IF

hClientSocket возвращает число 16 - сокет создался.

отправляю массив
diSendBytes := SysSockSendTo(hClientSocket, ADR(send_1), 10, c_diFlags, ADR(stClientSettings), SIZEOF(stClientSettings) );

потом через небольшую задержку читаю
diRecvBytes := SysSockRecvFrom(hClientSocket, ADR(sReadFromServer),100, c_diFlags, ADR(stClientSettings), SIZEOF(stClientSettings) );
сокет не закрываю, так как нужен для диалога программа зациклена отправили, мониторю сниффером снимок1.jpg
приходит один пакет и все...
если из кода убираю функцию приема то запросы отправляются как положено....
подскажите, что не так? почему я немогу организовать периодическую отправку ?