Konstante oder nicht Konstante, das ist hier die Frage.

[Corpsman]

Hi Leutz,

ich hör da grad ne Vorlesung zu Compilerbau und Programmanalysen, und da hat der Prof. doch was interessantes gesagt.

Schaut euch dieses Code stück an und überlegt euch die Antworten bevor ihr es ausprobiert .

Delphi-Quellcode:

const blub:integer = 10;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
type p = ^integer;
var i : P;
begin
  i := @blub;
  i^ := 5;
  showmessage(inttostr(blub));
end;

Kann dieser Code Compiliert werden ?

Wenn ja was zeigt die Messagebox ?