NMStrm 和 NMStrmServ 控件的一点小问题，只浪费您一分钟

我用以上两个控件实现局域传输文件的操作
我在传送端传送文件过程中，可以通过OnPacketSend 事件用如下代码实现文件传送进度（字节数）的实时显示。
procedure TForm1.NMStrm1PacketSent(Sender: TObject);
begin
  ProgressBar1.Max:=nmstrm1.BytesTotal;
  ProgressBar1.Position:=nmstrm1.BytesSent;
  Lab_position.Caption:=inttostr(nmstrm1.BytesSent)+'/'+inttostr(nmstrm1.BytesTotal)+' Kbs';
end;现问题如下：
我在接收端接收文件传递进程时，如何也能实时地显示所接收到文件进度(字节数)望各位大侠指点！