我创建了 TIdTcpServer
的不同实例,并为稍后客户端连接/断开连接/执行时需要的 Data
属性分配了一个指针。
是否可以从 TIdContext
获取“父级”TIdTcpServer
?
如果是这样,我该怎么做?
示例:
procedure TMainWindow.OnConnect(AContext: TIdContext);
var
ParentServer : TIdTcpServer;
begin
// ParentServer := AContext...
end;
最佳答案
将 TIdContext
类型转换为 TIdServerContext
,然后您可以访问其公共(public) Server
属性:
procedure TMainWindow.OnConnect(AContext: TIdContext);
var
ParentServer : TIdCustomTCPServer;
begin
ParentServer := TIdServerContext(AContext).Server;
...
end;
关于delphi - Indy10 - TIdContext 到 TIdTcpServer,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/17734257/