线程执行完就会Sleep,你要让它再次执行需要将其唤醒.要想释放资源只需在线程执行完之前指定FreeOnTerminate := True就行啦.