Delphi 线程详解

https://blog.csdn.net/yegshun/article/details/78139536