Я использую библиотеки скаченные с сайта oscat как и рекомендовали в данной теме
Т.е мне надо заменить условие NOT SysSockBind(server_socket, ADR(sockaddr), SIZEOF(sockaddr)) на BOOL_TO_DINT(SysSockBind(diSocket, ADR(sa), SIZEOF(sa)))<0 ?