procedure TForm1.CalculateGP(..) const Price : money = 0; begin ... Price := 1.0; ... end;
所以在新项目中，Delphi抱怨说“左侧不能分配” – 可以理解！但是这个代码在旧的项目中编译。所以我的问题是，为什么？是否有一个编译器开关来允许const被重新分配？这甚至如何工作？我以为const在编译时被它们的值替换了？
项目 – >选项 – >编译器 – >可分配类型的常量
此外，您可以向pas文件添加{$ J}或{$ WRITEABLECONST ON}，这可能更好，因为即使将文件移动到另一个项目也可以使用。
