delphi中报Left side cannot be assigned to错

这是我的代码：

这是书上的代码：

报错：

请问哪里出现问题？

解决方案：

 似乎在Delphi2007版本的常量好像是可以修改的。你可能使用的是Delphi2007以后的版本。而在Delphi2007以后可以通过以下方法来修改常量：

    方法一：
    在单元文件开头加上{$J+}就可以，例如： 

 unit    Unit1;
 { $J +}
 interface

    方法二：
        Project---> Options--> Compiler---> Assignable   Typed   Constants勾选中，就可以了！(如图所示)