delphi l临界区的新写法 记录下

System.TMonitor.Enter(sgNums);
// dephi 新版的写法,相当于临界区, 其参数，可是为任何一个 TOBJECT 实例
// 此处选了 sgNums 也可以自定义变量做为参数，如：FLockCurRow:Tobject,然后 Creat 后再使用。
// 以便更好理解

 System.TMonitor.Exit(sgNums);