Delphi WSAStartup 启动WinSocket

WSAStartup 启动WinSocket。

$0101 参数：$符号在delphi中16进制数的写法，和C的0x一个意思。
WSAData 参数：属于 TWSAData类型。 

第一个参数是调用都想要使用的版本号，是一个WORD类型的变量。这个变量的高字节指定了次版本号，低字节指定了主版本号，两个字节加到一起，就是你想要的Winsock库的版本号了。比如，你的代码中的版本就是2.2。

第二个参数指向了一个WSADATA结构体的指针，这个结构体是你创建的，然后把这个结构体传递给WSAStartup函数，它会在这个结构体中返回WinSock库的一些信息，如版本号，监听队列的大小，你能创建的最多的socket数目，等等。

以下是示例：

  if WSAStartup($0101, WSAData) <> 0 then begin 
    WSAErr := 'Winsock 没有响应"'; 
    Exit; 
  end;