任何人都知道用Delphi编写的TCP套接字代理应用程序的任何示例？我正在构建一个小型代理应用程序，它需要侦听给定TCP端口上的套接字连接，读取通过连接发送的XML数据包，通过TCP将请求提供给从可用后端服务器池中选择的服务器，并提供结果响应回到原始TCP连接。
我非常熟悉TCP和套接字级编程，但更愿意找到示例代码作为起点。如果有可用的东西，它将节省大量的时间和精力，因为我不需要重新发明轮子。我记得在2003/2004年看到一个用Delphi编写的小型TCP代理，但似乎已经忘记了链接。
答案 0 :(得分：7)
您是否正在寻找袜子代理实施？如果没有，那么只需从服务器（http很可能是一个好的开始）开始，并在其中构建处理入站XML数据包并进行适当调用的能力。类似Synapse框架的东西会使这个项目变得相当简单。如果您抓住Synapse，请从SVN获取最新版本。它支持所有最新版本的Delphi。
有一个可用于突触的httpproxy演示，如果你想要实现更传统的东西，这可能会有所帮助。一个好的启动http服务器example也可用。
答案 1 :(得分：-1)
nSoftware的IPWorks应被视为Synapse的商业替代品。他们还有一些Biztalk适配器。
我已经使用过Synapse和IPWorks，它们都非常好用。我没有使用引用的BizTalk适配器。