我正在尝试为 delphi 实现Fitnesse Slim 服务器，但在通信方面存在一些问题。

Fitnesse 将启动我的进程，并给我一个端口号作为命令行参数。

然后我应该在给定的端口号上创建一个套接字，Fitnesse 将连接到该端口。

我正在使用 TTcpServer 来完成这项工作：

在 OnAccepted( ) 事件中，我发送要使用的协议版本，如规范中指定的那样。

当我调用 ReceiveBuf() 时，进程结束，fitnesse 抛出异常：

我使用oSpy来查看发送和接收的内容。它表明在我的代码发送协议版本后，fitnesse 会发回一条消息，并且当我尝试接收此消息时连接已重置。

有谁知道这可能是什么原因？我做错了什么吗？

顺便说一句，当我使用fitnesse 附带的java slim 服务器时，一切正常。oSpy 然后显示相同的通信，直到第一次读取。虽然我的阅读尝试失败了，但这本书按预期工作。

我正在编写一个程序来将文件从一台 PC 发送到另一台 PC。我正在尝试使用 发送它char* buffer，但我遇到了一些问题。我认为它发送缓冲区，但结果是一个大小为 0 KB 的文件。我怀疑我没有将缓冲区写入文件，但我真的不确定。我的缓冲区数据来自 *bmp 文件。我确实在几乎同一件事上找到了另一个问题，但我真的需要更多解释。

我正在使用 C++ Builder 2010，很难找到任何教程。它具有可能有用的各种组件和功能。

编码：

客户端：

服务器：

我有两种形式，一种用于服务器，另一种用于客户端。在服务器表单上删除 ttcpserver 并将其 localhost 属性设置为 127.0.0.1 并将 localport 属性设置为 55555 并将 Active 属性设置为 true 后，我编写了一个 button1(sendtextbutton) onclick 事件处理程序：

然后在客户端表单上，我删除了 1 个 ttcpclient 1 标签 2 个按钮，将客户端远程主机属性设置为 127.0.0.1 并将远程端口设置为 55555，为 connectbutton(button1) 编写了一个事件处理程序：

为 ttcpclient 编写了一个 onconnect 事件：

最后是 ttcpclient 的 onrecieve 事件处理程序：

我的客户端程序标题应该更改为“消息”（在我连接并单击服务器表单上的按钮后），但它没有。我做错了吗？如果是，那该怎么做？我正在尝试从服务器向客户端发送短信（是的反向连接！）

这两个控制台应用程序包括一个使用 bmThreadBlocking 模式的 TTcpServer 的套接字服务器和一个使用 bmBlocking 模式的 TTcpClient 的套接字客户端。TTcpClient 旨在连接到服务器，发送一条线路，然后断开连接。TTcpServer 旨在侦听传入的连接，并回显在其 OnAccept 事件处理程序中收到的行。

这两个控制台应用程序在 Windows（XP 和 7）中运行良好。但是，当我直接使用 CrossKylix 或 Kylix 编译它时，应用程序无法在 Linux（SuSE 10.0 和 CentOs 5u7）中按预期运行。只要一个客户端连接，即在 TTcpServer 的 OnAccept 事件处理程序之内/之后，服务器应用程序就会立即获得“[1]+ Stopped ./TestSocketServer_1_Console_Native”。你能帮忙评论一下这个问题吗？任何帮助将不胜感激！

这两个控制台应用程序可以在http://www.multiupload.com/9HIIG61W93下载

为方便起见，源代码也粘贴在这里。（端口号 98765 或 1876 或其他数字没有帮助。）

TestSocketServer_1_Console_Native

TestSocketServer_1_Console_Native.dpr

uServerDataModule.pas

TestSocketClient_1_Console_Native

TestSocketClient_1_Console_Native.dpr

uClientDataModule.pas

我正在使用 TTCPServer 在 delphi 6 中编写一个网络应用程序。在此组件的 OnAccept 事件中，我为另一个表单调用 showmodal。这导致挂起主窗体。我认为这是因为线程，但我不知道如何在这个事件中显示表单。我真的不得不这么称呼。我很感激任何答案。谢谢。

我已经为此奋斗了：我正在尝试编写一个 TCP 客户端代码，并且该代码必须将数据发送到服务器并获得响应。客户端代码如下：

远程主机接收数据并做出响应。不幸的是，我没有得到 $str 中的数据。我不控制远程主机，我只能看到它已经接收到数据并生成了响应。你能建议一下，我到底哪里错了？

我正在实现简单的 http 服务器，我希望我的响应取决于一些全局状态。例如，如果我第一次从同一个客户端收到请求“get_settings”，我将发送大型设置 json，而第二次我将发送“未修改”http 响应。

类似的东西

问题是我该如何实现它？我想尽可能简单地手动完成，没有任何 Monad Transformers 等等。让代码丑陋，但简单。谢谢

我需要有关 TCPServer 和 TcpClient 问题的帮助。我正在使用 Delphi XE2 和 Indy 10.5。

我基于流行的屏幕捕获程序制作了服务器和客户端程序：

ScreenThief - 通过网络窃取屏幕截图

我的客户端程序向.zip服务器发送一个文件和一些数据。这通常可以单独工作几次，但是如果我将其进行压力测试，其中通过计时器在 5 秒内执行 5 次传输，则恰好在尝试 #63 时，客户端将无法再连接到服务器：

套接字错误#10053
软件导致中止连接。

显然，服务器似乎资源不足，无法接受更多的客户端连接。

出现错误消息后，我无法以任何方式连接到服务器 - 不是在个别测试中，也不是在压力测试中。即使我退出并重新启动客户端，错误仍然存​​在。我必须退出并重新启动服务器，然后客户端才能再次连接。

有时客户端会发生套接字错误#10054，这会使服务器完全崩溃，必须重新启动。

我不知道发生了什么事。我只知道如果服务器必须不时重新启动，它就不是一个健壮的服务器。

以下是客户端和服务器的来源，以便你们测试它们：

http://www.mediafire.com/download/m5hjw59kmscln7v/ComunicaTest.zip

运行服务器，运行客户端，勾选“Just check to Run Infinite”。在测试中，服务器运行在localhost.

谁能帮我 ？雷米勒博？