问TIdHTTPServer和100%的CPU使用率

EN

我们经常使用TIdHttpServer，没有问题。我们在Delphi10.3-10.4.2中使用了它，但这不是问题的原因。程序可以工作几个月而不重新启动。

根据我们的经验，我们可以说，这种意外行为的问题可以(按概率排序)：

• 代码不是线程安全。事件OnCommandGet不是在主线程中运行的，因此必须通过某种同步机制(锁、TEvent、同步、互斥、信号量或其他)来访问全局对象/资源/etc。如果代码不使用同步-它可能破坏逻辑，抛出异常或做一些其他意想不到的操作(如高CPU usage).
• Connections计数超过限制。TIdHttpServer具有像ListenQueue和MaxConnections这样的属性。可能是您提出了更多服务器可以处理的请求。在这种情况下，您的新请求将等待，直到代码能够处理它们，并且它可以进行一些额外的CPU使用。要诊断这一点--尝试在事件开始时增加一些内部变量，并在事件结束时减少它。发出一些服务请求以返回此变量，您将知道所有变量是否都正常工作。其他类似的情况-连接不关闭后，使用内部事件和留在内存，然后你也可以超越限制。尝试解决属性TIdHttpServer.ReuseSocket := rsFalse.
• Memory和TIdHttpServer.KeepAlive := false泄漏的问题。尝试设置变量ReportMemoryLeaksOnShutdown := true并启动应用程序，发出一些请求并关闭它。如果您将看到一条带有泄漏的消息--那么您会做一些错误的事情，尝试以正确的方式处理这些对象。在生产过程中，这些小泄漏可能占用大量内存，而Windows将将部分内存转储到交换文件中，因此您的新请求将需要更多的时间来处理。

没有一个例子，我们不能说更多。