Delphi/Indy 多线程服务器

Question

我正在尝试将我的应用程序变为多线程。我想要实现的是： - 通过 TidHTTPServer 接收命令 - 执行本地操作（可能涉及使用 tidHTTP 向其他服务发送/接收数据） - 将执行结果返回给原调用者

由于我对多线程还很陌生，所以我想知道我的设计理念是否正确

1. TMsgHandler=Class(TThread)
2. 在 TidHTTPServer.OnCommandGet 我创建一个新的 TMsgHandler 实例并传递 ARequestInfo 和 AResponseInfo
3. TMsgHandler.Excecute 解释数据
4. TMsgHandler.Execeute 能否在我的 Main 中使用 Objects（TidHTTP 的后代）与其他服务进行通信？
5. TMsgHandler 通过 AResponseInfo 发送应答并终止。

这行得通吗？

Answer 1

这不是正确的设计。

THTTPServer 是一个多线程组件。它的OnCommand... 事件在 Indy 为您创建的工作线程上下文中触发。

因此，您不需要从TThread 派生您的TMsgHandler。而是直接在OnCommand... 线程的上下文中执行您的TIdHTTP。在您的事件处理程序退出之前，不会将响应发送回客户端（除非您手动发送）。但是，您不应该从主线程共享单个 TIdHTTP（除非您绝对需要，在这种情况下您需要同步对它的访问）。您应该根据需要直接在您的OnCommand.../TMsgHandler 代码中动态创建一个新的TIdHTTP。