delphi xe 并行 多线程 队列 TCriticalSection TMutex TSpinlock TMonitor
直接上图:运行结果如下:如代码如下:unitUnit5;interfaceusesSystem.SysUtils,System.Types,System.UITypes,System.Classes,System.Variants,FMX.Types,FMX.Controls,FMX.Forms,FMX.Graphics,FMX.Dialogs,System.Diagnostics,FMX.Scr