Speicheranspruch Leerstring in Konstante

[dominikkv]

Zitat von 1234588:

Delphi-Quellcode:

const
  i: Integer = 123;

begin
  Writeln('0x', Integer(@i));
  Writeln(PInteger(@i)^);
  PInteger(@i)^ := 666;
  Writeln(i);
  Readln;
end.

ueber pointer laesst sich die konstante i aendern. folglich muss sie im arbeitsspeicher liegen.
(geht aber auch nur mit typisierten konstanten).

funktioniert zumindest mit fpc wunderbar (auch ohne {$J+})

versuch das mal mit einer "richtigen" konstante:

Delphi-Quellcode:

const
  i = 123;