多线程下载东西一个线程出错前部都停了..........

我创建了一个多线程的单元来下载东西，
其中有个函数是用来下载网页的，
    Down:=TNMHTTP.Create(nil);
    Down.OnFailure:=OnErrorOne;
    Down.TimeOut:=5000;
我为了处理错误就写了个procedure OnErrorOne让它在down出错的时候执行一些操作，原来是一直编译不过去，修好之后程序可以执行，但Down一出错所有的线程好像都停止了，请问动态建立的对象如何重新定义它的错误事件。谢谢。还有个小问题，我的很过个线程中在线程单元的全局变量是该线程自己还是所有的线程都可以用，不好意思，这点我弄不明白，是不是每一个线程序都可以当做一个单独的程序来看待。