delphi xe2 datasnap方面的问题

各位高手，请赐教！
    在用delphi XE2 学习datasnap时，使用连接池技术，客户端利用TSqlConnection连接，如果断开TSqlConnection连接再结束程序，程序将出错。提示：
    Error on call to Winsock2 library function shutdown: 应用程序没有调用WSAStartp，或者WSAStartUp失败。

    如何解决？