多线程之对象创建引起的异常

在写多线程的时候，我们会经常遇到这个错误，这个错误引起的原因：

是因为这段代码，

  serverinfos[0].server := TServerListenThread.Create(True);
  serverinfos[0].server.PortNo := '1';
  serverinfos[0].server.Port := serverinfos[0].serverlistenport;
  serverinfos[0].server.Resume;
  Result := true;

对象不存在，所以会引起这个错误，

解决办法就是要对对象赋值。