Array mit Werten bestücken

[Chemiker]

Hallo Flips,

mit lokalen Variablen aber nicht.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject); 
Const
  Arr1: array[0..10] of integer= (10, 20,0,0,0,0,0,0,0,0,0);
var
  Arr: array[0..10] of integer = (10, 20,0,0,0,0,0,0,0,0,0);
begin 
  ShowMessage(IntToStr(Arr[3])); 
  Arr[3] := 42; 
  ShowMessage(IntToStr(Arr1[3])); 
end;

Bis bald Chemiker