Решение оказалось простым, как 3 рубля:
В методе TSocketDispatcherThread.ClientExecute перед строкой Event := FTransport.GetWaitEvent написал LoadWinSock2;
В результате всё работает правильно, никаких ошибок не возникает!
Выкладываю исправленный компонент.
И никакого ScktSrvr.exe!
|