Delphi系统变量：IsMultiThread对MM的影响

标签：使用   sp   数据   2014   问题   代码   ad   bs   as   

  前几日，调试一BUG，过程先不说，最后调试到MM，即Debug dcu，然后进入到GetMem.inc中的Get/FreeMem函数处后，出现AV。

然后一通找。。。郁闷了N天，后来发现将MM切换到QMM后，一切正常，然后再切回原MM，BUG出现。。。

按经验，此类问题一般由于线程未有锁保护引起，但就是没找到。

好吧，也不怎么滴，突然想起IsMultiThread变量，想起MM的Get/Free/Realloc都需要这个玩意进行保护，而VCL中，只有一个地方对这变量进行操作: Classes.TThread.Create->System.BeginThread

然后才想起自己未使用TThread，使用API.CreateThread进行创建线程，而它未对IsMultiThread进行置true操作，问题找到，BUG解除。

遂，本文记录此问题。

BUG形成：

   1：程序未使用TThread或BeginThread进行创建线程，这样，它就不会对IsMultiThread进行操作

   2：自行使用API.Windows.CreateThread创建线程，且未对IsMultiThread置true

   3：在创建的线程中，进行Get/Free/ReallocMem，并与其它线程（如主线程）进行交互该内存块

BUG展现：

  1：该BUG将会引起MM数据结构错误，问题就大了去。

       出现AV时，watch查看的数据是错误的，且随机的给你不一样的数据

      call stack也傻了，定位到无边际的代码。。。

     总之，一切都傻掉了，不可信了。

BUG避免：

   1：慎用API.Windows.CreateThread，如果要对它操作，请记得IsMultiThread := True;

         如果不记得，请参照代码: System.BeginThread

        或者直接使用System.BeginThread进行创建线程。

   2：使用QMM，QMM是自动维护IsMultiThread，有N(N>1)时, IsMultiThread=true, N=1时, IsMultiThread = false;

         这点，其它MM，俺所查看的，都未做处理。（偶在打广告哩）

         不过，个人建议是：开发环境必备两套以上MM，以作备用，遇到一些莫名问题，切换一下，用以确认是否MM问题引起。

完。

2014.10.15 by qsl

Delphi系统变量：IsMultiThread对MM的影响

标签：使用   sp   数据   2014   问题   代码   ad   bs   as   

原文地址：http://www.cnblogs.com/qiusl/p/4025826.html