8

我正在使用带有所有补丁和更新的 Delphi 2007。

我有一个文件被两个不同的项目使用。该文件中有一个过程，我将简化如下：

procedure MyProcedure;
const
  UniqueValue: integer = 0;
begin
  //some code
  Inc(UniqueValue);
  //some more code
end;

Inc() 命令应该失败，因为您不能分配给常量。在一个项目中，我得到了一个错误（我称该项目为“准确”）。在另一个项目中，我没有收到任何错误（我将其称为“Bogus”）。我也没有收到任何警告。我不明白为什么编译器会让这个不正确的代码通过。

这是我在 Bogus 项目中尝试过的：

1 - 引入一个明显的错误，比如在一行中间输入“slkdjflskdjf”

结果：我得到一个错误，这证明它确实在尝试编译这个文件。

2 - 删除.DCU，并重建项目

结果：.DCU 重新生成，再次证明该项目确实在编译此错误代码。

有没有人想过为什么会发生这种行为？更具体地说，为什么它会发生在一个项目中而不是另一个项目中？是否有一些模糊的编译器选项允许分配给常量？

最后一点：两个项目都是从 Delphi 5 转换而来的。在具有相似代码的 Delphi 5 下，它们都可以正常编译。

编辑：感谢您的所有帮助。更改可分配类型常量指令后，我可以在两个项目中获得一致的行为。我今天学了些新东西...

4

4 回答 4

14

在编译器选项中有一个名为“可分配类型常量”的选项。它也可以在您的代码中使用“{$J+}”启用。

于 2009-04-24T15:53:30.440 回答
5

难道这些项目在 $J 编译器指令的设置上有所不同吗？

于 2009-04-24T15:52:38.993 回答
4

我建议检查项目选项，编译器部分，看看你是否能发现任何差异。也许您在 Bogus 项目中启用了选项Assignable typed constants 。

于 2009-04-24T15:58:10.447 回答
3

正如其他人所说，这几乎可以肯定是{$J+}指令。

如果您有差异工具，您可以比较项目文件以了解它们的不同之处 - 它们只是文本文件 - 以解决将来类似的问题。

于 2009-04-24T15:55:39.920 回答