如何在发送流时看到indy tcpserver的进度

Question

在使用OnWork事件的客户端中：

Speed := (count / (stoptick -starttick ))/1024; //in mb

我可以轻松确定进度。但是在服务器端..我该怎么做？

Answer 1

完全相同的方式 - 使用OnWork事件。您只需在代码中手动分配事件处理程序，例如在服务器的OnConnect事件中，或者只是在您阅读流时：

AContext.Connection.OnWorkBegin := MyWorkBeginHandler; 
AContext.Connection.OnWork := MyWorkHandler;
AContext.Connection.OnWorkEnd := MyWorkEndHandler;