多线程访问全局变量 Tlist 当修改取出来的数据进行修改的时候要不要加锁？

Question

假如一个结构体
  TRequestInfo = record
    QueryListNo  : array[0..20] of Char;
    ListNo       : array[0..16] of Char;
    RoadNo       : array[0..5]  of Char;
    getCount     : integer;
  end;
  PRequestInfo =: ^TRequestInfo; 
全局变量
  G_QueryList : TList;
当添加一个结构体时 加临界区
var
  tmpPValue : PRequestInfo ;
begin
  tmpPValue^.getCount := 0;  
  EnterCriticalSection(g_RCSImgNum)
    G_QueryList.add(tmpPValue); 
  LeaveCriticalSection(g_RCSImgNum);
end;那现在问题出来了 假如我继续修改 tmpPValue^.getCount := 2; 在多线程中会不会有问题呢 安全吗？

Answer 1

InterlockedExchange(tmpPValue^.getCount,2);//安全

Answer 2

只是读取，个人的意见是在Intel/AMD平台下不需要加锁，但是也有人认为不安全。而且可能跟硬件平台也有一定的关系。