delphi中报Left side cannot be assigned to错

这是我的代码：

 这是书上的代码：

 报错：

请问哪里出现问题？

解决方案：

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

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

  unit    Unit1; 
  { $J +} 
  interface

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

 {$J+} { Writeable structured consts }