Столкнулся с проблемой, пытаюсь сождать сокет
Код:
var
S:TSocket;
begin
S:=socket(AF_INET,SOCK_STREAM,0);
if S=INVALID_SOCKET then
showmessage('Fail');
end;
При выполнении возвращает INVALID_SOCKET, чем это может быть вызвано и как можно избавиться от данной проблемы?