delphi线程中操作mscomm

我用delphi写的程序，在主程序中生成多个线程，每个线程中生成一个mscomm，并操作它，给下位机发送命令或者读取数据，现在的问题是我在启动程序时，有时会卡在线程启动处不动了。我不知道是不是因为这个线程中操作mscomm的问题还是其他什么原因。我换另外一台机器时，会在线程启动时停顿一会（时长时短），就会启动。我不知道是程序的原因还是机器的原因。请帮忙解决。