高分求教indy传送文件的问题

我用idTcpServer和idTcpClient编了一个文件传送的程序。有几个问题，望高人回答：
1、在客户端接收时，如果文件较大在执行这个语句时有一段时间（大约几秒）鼠标指针都动不了,然后程序才有响应。
ReadStream(AStream, -1, True);//AStream：TFileStream
2、在onworkbegin事件中写代码
ProgressBar1.Visible:=True;
ProgressBar1.Max :=AWorkCountMax;
控制进度条以显示传送进度，但是AWorkCountMax总是为0
3、同时传送多个文件在客户端该怎么写??
最好有例程（indy自带的没有这样的）
分不够再加！！