求助 关于delphi多线程问题

第一步：
我建立了两个线程，第一个执行
while True do
begin
  ABC1:='86868686';
end;

第二个执行
while True do
begin
  ABC2:='86868686';
end;
结果一运行立即死掉

第二步：
于是我只建立一个线程执行：
while True do
begin
  ABC1:='86868686';
end;
结果没出问题

第三步：
我又建立两个线程，其中一个执行：
while True do
begin
  Sleep(10);
  ABC1:='86868686';
end;
另一个
while True do
begin
  Sleep(10);
  ABC2:='86868686';
end;
结果没出问题，但是

第四步
我建立了10个线程依次执行：
while True do
begin
  Sleep(10);
  ABC1:='86868686';
end;

while True do
begin
  Sleep(10);
  ABC2:='86868686';
end;

while True do
begin
  Sleep(10);
  ABC3:='86868686';
end;

while True do
begin
  Sleep(10);
  ABC4:='86868686';
end;
。
。
。
。
结果挂了

那么我是不是能够得出结论，在多线程中，即使是对不同的寄存器进行操作也会有风险？

问的好，等楼下的结果，学习了。。

顶一顶，等高手

补充一下，如果我再while循环中加入了互斥等线程同步的手段，即使是不加Sleep(10)程序运行也没有问题，如：
while True do
begin
  WaitForSingleObject(ABCMux,INFINITE);
  ABC1:='86868686';
  ReleaseMutex(ABCMux);
end;

while True do
begin
  WaitForSingleObject(ABCMux,INFINITE);
  ABC2:='86868686';
  ReleaseMutex(ABCMux);
end;

操作字符串，不是简单的寄存器操作，会涉及程序的内存管理
多线程同时操作，肯定要加互斥

即使是对不同的全局变量也要这样吗？