delphi - 如何使用参数启动Indy TCP Server？

Question

我正在使用Indy 10（来自Delphi 2009）构建TCP服务器。在OnExecute事件中，我需要从主线程访问一些数据。启动时是否可以将数据传递到服务器线程？服务器以IdTCPServer1.Active:=True;启动，因此我看不到如何传递一些参数。

Answer 1

无法将其他参数传递给TIdTCPServer。您的服务器事件处理程序将需要在需要时从主线程检索数据。

若要跟踪事件之间的每次连接数据，可以使用TIdContext.Data属性，或从TIdServerContext派生自定义类并将其分配给TIdTCPServer.ContextClass属性。例如，您的OnConnect事件处理程序可以使用TIdSync或TThread.Synchronize()从主线程检索最新数据，然后将其缓存在上下文中，以供OnExecute使用。