Control+单击功能在 Delphi XE 中不起作用

Question

在 Delphi 7 中，每当我按住 Control 键并单击某个函数/过程时，它就会转到该函数/过程。但它在 Delphi XE 中不起作用 - 至少不是所有功能都起作用。我在 ExtUtils.pas 中有一个名为 Associate 的函数 该函数已正确编译，因此编译器可以找到 ExtUtils.pas（当然，ExtUtils 已添加到 Uses 子句中，并且其文件夹已添加到“库路径”中）。但是，当我按住 Control 键并单击该功能或单位名称时，它不会将我带到那里。

有办法解决这个问题吗？

---

更新1： 此外，按住 Control 键并单击函数（在当前单元中声明）不会将光标移动到声明该函数的 INTERFACE 部分。

更新2：
我临时将 ExtUtils 单元放入项目文件夹中，现在它可以工作了。因此，Control+Click 本身可以工作，但 IDE 似乎无法找到该单元，即使它的文件夹存在于库路径和浏览路径中。

类似报告：
http://webcache.googleusercontent.com
http://webcache.googleusercontent.com
http://cc.embarcadero.com/Item/28269
这里有一份报告（参见下面的答案）

---

新测试：
我已经完全卸载了Delphi（并手动删除了文件和注册表残留物）。然后又重新安装了。除了 CodeSite 之外，没有安装任何其他工具，甚至没有安装数据库。然后我创建了一个新项目。它包含一个按钮。当我单击该按钮时，它会运行 TestMe 过程，该过程在名为 TestUnit.Pas 的外部 PAS 文件中定义。我在库路径和浏览路径中添加了该库的路径。但是 Control+Click on TestMe 程序仍然无法工作！如果我将鼠标悬停在 TestMe 过程上，弹出窗口会显示“在 TestUnit 中声明”，其中“TestUnit”一词是一个蓝色链接。如果我单击它，我会听到 Windows 系统声音，但 IDE 不会将我带到那里（到设备）。

TestMe 程序是这样的：

procedure TestMe;
begin
  Beep(800, 500);
end;

如果我按住 Control 键并单击 Beep 程序，它会将我带到 Windows.pas。所以，这是有效的。 如果您想要进行不同的测试，请告诉我。

更新：
现在可以了！没有任何明显的原因！我只是打开并关闭并编译了该项目。但除了这两个之外，我没有对 Delphi 进行任何更改： AutoSave options->编辑器文件和项目选项。

更新：
这不可能！！！
因此，现在当我按住 Control 键并单击 TestMe 过程时，我可以访问 TestUnit.pas 文件。 因此，我将不想在初始测试中（Delphi 重新安装之前）工作的原始 PAS 文件 (ExtUtils.pas) 移至 TestUnit.pas 所在的同一文件夹中。你猜怎么着：我可以打开（使用 Control+单击）TestUnit.pas，但不能打开 ExtUtils.pas！！！！
Delphi 的行为如此奇怪且不一致！

更新：
我编辑了 ExtUtils.pas，现在无法再次打开 TestUnit.pas。 Ken White 不会让我说 Delphi 可能存在错误。所以我不能将“bug”与“Delphi”一起使用。有人可以帮我把这些词拼凑起来吗？

更新：
我完全删除了对 ExtUtils.pas 的任何引用 - 因此我将项目恢复到它可以工作的位置（使用 TestUnit）。但现在这个错误仍然存​​在。即使几秒钟前它与 TestUnit 一起工作，现在它也不再工作了。

更新：
现在我意识到一件重要的事情：在我的源代码（在测试项目中）中，我有一行可编译代码：

procedure TForm1.Button1Click(Sender: TObject);
begin
 TestMe;
end;

此代码不会出现蓝点 - 因为它不会被编译。在程序运行的那几分钟里，我看到了蓝点。 我还排除了“自动保存选项->”编辑器文件和项目选项可能是导致此问题的原因。

更新：
我找到了解决问题的方法......几分钟：我将项目和库移动到不同的文件夹中（任何位置都可以）。 Ctrl+单击将起作用一段时间。如果我将文件放回到原始文件夹中，它甚至可以工作。因此，Delphi 似乎保留了某些文件的某种缓存。只要缓存被破坏并且保留缓存，control+单击就不起作用。但是，当我移动文件时，它必须重新创建该缓存，以便它可以正常工作，直到问题再次出现并将其存储在缓存中。

Answer 1

这里我们有 5 位使用 Delphi 2010 的开发人员，还有 2 位也使用 XE，我们在按住 Ctrl 键单击时遇到了与您相同的情况。它似乎随机停止工作。我们永远找不到解决这个问题的模式或解决方案。所以我们时不时会听到小隔间里传来咒骂声……

当这种情况发生时，我会使用shift-ctrl-F进行搜索。

西尔万

Answer 2

首先感谢大家针对这个问题给出的提示。也许这是很久以前的问题了，但最后，经过多次尝试，我认为问题原因实际上是在“项目源代码”

IDE版本中：Delphi XE

请尝试：

1. 在项目选项中>>> Delphi编译器>>编译，确保：

   调试信息：true

   符号参考信息：

2. （dpk文件，通过项目>>查看源文件打开），
   删除{$REFERENCEINFO OFF}
   或者改为 {$REFERENCEINFO ON}

注意，第 2 步非常重要，即使第 1 步完成，没有第 2 步仍然无法浏览源码。

Answer 3

我使用的是 Delphi 5，按住 Ctrl 键单击也有问题，我不知道它是否仍然在新的 Delphi IDE 中工作，但我可以使用 CTRL-SHIFT-UpArrow 或 DownArrow 从声明到实现。
希望有帮助。

Answer 4

Delphi 中始终有这两个不同的选项：

1. 库路径 - 编译应用程序时使用。

2. 浏览路径 – 由 Code Insight 使用，即在按住 Control 键单击标识符时。

您需要检查第二个。它必须包含您尝试使用 Ctrl+Click 导航的源文件的路径。

Answer 5

我发现，如果我在界面部分使用记录类型并且它不是由类型表达式定义的，则 Ctrl-Click 和其他跳转功能（Ctrl+Shift+向上/向下）将不起作用。

type
  TForm1 = class(TForm)
  ...
  public
    Something:record
                A, B:integer;
              end;
    procedure DoSomething;
  end;

使用上面的代码，我无法使用 Ctrl+Shift+Down 跳转到该过程的实现。我必须使用的修复：

type
  TMyRecord = record
                A, B:integer;
              end;

  TForm1 = class(TForm)
  ...
  public
    Something:TMyRecord;
    procedure DoSomething;
  end;

使用 Delphi XE4 进行测试。

Answer 6

备查。使用 Delphi 2010，我发现 interface 部分中 virtual 前面的 ; 会有所不同；

function MyProc(): String;  overload; virtual;
function MyProc(): Integer; overload; virtual;
//                             >>   ^   <<

此 ; 字符可能会破坏 CTRL+Click（代码洞察）功能。尽管如此，编译得很好。

Answer 7

我刚刚在 Delphi 11 中创建了一个包含两个项目的新组项目。之后，我在使用 Ctrl + Click 跳转到函数时遇到了问题。我右键单击 groupproject 并执行“Clean All”，然后“Build All”，之后它再次为我工作。

Answer 8

（符号参考信息）除非启用调试信息和本地符号（见上文），否则此选项无效。

代码补全和代码导航功能 (Ctrl+Click) 仅在“符号参考信息”设置为“参考信息”时才起作用。

Answer 9

解决了！

它对我有用，更改代码洞察类型。

Answer 10

这种情况经常发生在我身上，特别是当同时打开两个 IDE 时。

我发现解决这个问题的方法是：

1. 清理你的项目。
2. 列表项
3. 关闭 IDE。
4. 使用 Windows 资源管理器导航到您的项目。
5. 搜索 *.dcu 删除所有 .dcu
6. 启动 IDE 并加载您的项目。
7. 编译它。

此时，代码导航（Ctrl+单击）应该可以工作。