DelphiXE多线程全局变量、函数访问禁忌

zxm8513

于 2020-03-08 10:13:23 发布

阅读量1k

点赞数

分类专栏： DelphiXE相关技术

本文链接：https://blog.youkuaiyun.com/zxm8513/article/details/104727545

版权

DelphiXE相关技术专栏收录该内容

147 篇文章 ¥19.90 ¥99.00

订阅专栏

超级会员免费看

这篇博客分享了作者在Delphi XE 10中遇到的多线程全局变量访问的问题。测试发现，TCriticalSection和TRTLCriticalSection在匿名线程中不可靠，Monitor也存在锁死现象。最终，通过采用自旋锁成功解决了问题，尽管自旋锁可能因长时间未使用而被系统自动释放，但总体上提供了一个有效的解决方案。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

今天经过实地的测试对于Delphi XE 10多线程对于全局变量的访问有了实地的结果：
TCriticalSection和TRTLCriticalSection同样的机制，根本不能用，尤其匿名线程。
Monitor使用效果不明显，存在通信线程对于UDPServer对象的锁死问题，匿名线程会不工作，主要是因为XE2之后它还是基于TCriticalSection的优化，因此也不行。

最后使用了自旋锁成功解决问题，对于问题的核心本质好需要观察一段时间，看是否真正的有效果。

自旋锁的使用也很简单，创建，进入，退出，用了也不用释放，是一个比较好的解决方案，弊端就是长时间不用系统会自动释放掉，需要重新创

//引用：
interface
uses
   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
   Dialogs,Math,StrUtils,IniFiles,comobj,SyncObjs;
//定义  
FLock           : TSpinLock;                     //自旋锁;保护datainfo的唯一性
//使用