我得到'由于优化'变量x无法访问'

Question

即使构建配置设置为'调试'并且优化为假，我也会得到'变量ForAllUsers由于优化而无法访问'。所以，我无法调试我的程序。

为什么我得到这个？
当我按下“运行”按钮时，哪个版本运行？
我怎么能看到

---

procedure Test(ForAllUsers: boolean); 
VAR 
    FName, Path1, Path2: string; 
    RootKey: HKEY; 
begin 
Result:= FALSE; 
TRY 
    if ForAllUsers 
    then 
    begin 
    RootKey:= HKEY_CLASSES_ROOT; 
    Path1:= ''; 
    Path2:= ''; 
    end 
    else 
    begin 
    RootKey:= HKEY_CURRENT_USER;   <----- Break point here 
    Path1:= '\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\'; 
    Path2:= '\Software\Classes\';  
    end; 

... 结束;

---

更新：
只有几分钟的路程，因为我张贴了这个问题，它已经投了两次，并出演两次。看起来这是一个很常见的问题。接受David提供的答案。

Answer 1

我们都不时遭受这种痛苦。我有时候做的是在我需要调试引用变量但什么都不做的变量的地方添加一些伪代码。例如：

if x>0 then x := x*1; 

或者如果它是一个布尔值，则：

if b then b := not not b; 

东西沿着这些线路通常是足以让编译器写出来，保持该变量活代码，以便调试器可以检查它。确保你把代码放在例程的底部！并确保你还记得在检查代码前将其删除

Answer 2

让我们来看看有和没有在代码优化的区别：

procedure test; 
var 
    x,y,z: integer; 
begin 
    x:= 1; //x is stored in register EAX. 
    Inc(x); 
    y:= x; //this is a no-op because it's just a rename. 
//After this point x is no longer used. 
//Here you will get `Variable x inaccessible here due to optimization` 
    z:= 0; //z is never used 
    if (y = 1) then Inc(z); //because Delphi knows this code will never execute 
end; 

这里的汇编代码与优化：

Project5.dpr.12: x:= 1; //x is stored in register EAX. 
004085E8 B801000000  mov eax,$00000001 
Project5.dpr.13: Inc(x); 
004085ED 40    inc eax 
Project5.dpr.18: if (y = 1) then Inc(z); 
004085EE 48    dec eax //test to see if eax=1, triggers `jz` if true. 
            //Delphi put it in to facilitate the `if`, but 
            //is not smart enough to eliminate it :-) 
Project5.dpr.19: end; 
004085EF C3    ret 

这里还有没有优化的代码：

Project5.dpr.11: begin //note that Delphi doesn't use registers, but the stack 
          //to keep variables. 
004085E8 55    push ebp 
004085E9 8BEC    mov ebp,esp  //init the stack frame. 
004085EB 83C4F4   add esp,-$0c 
Project5.dpr.12: x:= 1; //x is stored near the top of the stack. 
004085EE C745FC01000000 mov [ebp-$04],$00000001 
Project5.dpr.13: Inc(x); 
004085F5 FF45FC   inc dword ptr [ebp-$04] 
Project5.dpr.14: y:= x; //y sits on the stack frame. 
004085F8 8B45FC   mov eax,[ebp-$04] 
004085FB 8945F8   mov [ebp-$08],eax 
Project5.dpr.17: z:= 0; //z is also in the stack frame. 
004085FE 33C0    xor eax,eax 
00408600 8945F4   mov [ebp-$0c],eax 
Project5.dpr.18: if (y = 1) then Inc(z); 
00408603 837DF801   cmp dword ptr [ebp-$08],$01 
00408607 7503    jnz $0040860c 
00408609 FF45F4   inc dword ptr [ebp-$0c] 
Project5.dpr.19: end;  //all vars stay in scope. 
0040860C 8BE5    mov esp,ebp //until the stack frame is dismantled. 
0040860E 5D    pop ebp 
0040860F C3    ret 

所以，你的情况应该从未发生与优化功能，但是......

您可以在源代码中也设置优化/关：

{$Optimization on/off} or 
{$O+/-} 

如果该行是在前面你的例程会覆盖全局设置。

http://docwiki.embarcadero.com/RADStudio/en/Optimization_%28Delphi%29

Answer 3

您发布不编译原样，所以我不能100％我没有杀我的个人modificications再现的情况下，使其运行的代码... 但我无法重现您的特定问题。任何人都可以？

当然，调试器/评估器在优化开启时抱怨，但问题肯定随着优化和重建而消失。你确定你做了一个适当的重建？

我有点不同意戴维斯的声明“我们都不时遭受这种痛苦”。除了已知的和可预测的边界情况（变量超出范围并且断点结束）我实际上从来没有遇到这个问题。只要我阻止我的同事通过优化检查dproj进入版本控制，就是说。