在delphi中创建多线程的例子，适用于初学者学习delphi多线程的使用-Created in delphi the multithreaded example of use, suitable for beginners to learn delphi multithreading