Const 类型的数据能不能修改,怎么修改?分不够可另开贴

Question

我记得以前不知在何处看过Const类型的数据能修改,但是由于当时没有意识到这样处理的作用而没有注意,现在已经找不到当时那篇文章了。最好能给源代码。Thanks.

Answer 1

procedure TForm1.Button2Click(Sender: TObject);
{$J+}
const
  I: Integer = 10;
{$J-}
begin
  I := 100;
  ShowMessage(IntToStr(I))
end;

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
{$J+}
const
  i:integer= 1234;
begin
  i:= 4;
end;

Answer 3

CONST 常量最好不要去改啊.感觉对维护之类的肯定不好

Answer 4

Thanks jacky_shen(jacky) and pazee(耙子)(灵感点亮生活)