procedure TForm1.CalculateGP(..)
const
   Price : money = 0;
begin
   ...
   Price := 1.0;
   ...
end;

所以在新项目中，Delphi抱怨说“左侧不能分配” – 可以理解！但是这个代码在旧的项目中编译。所以我的问题是，为什么？是否有一个编译器开关来允许const被重新分配？这甚至如何工作？我以为const在编译时被它们的值替换了？

解决方法

• 上一篇：如何使用Delphi中的DropBox REST A下一篇：我可以做些什么来减少可执行文件的