Array mit Werten bestücken

[Flips]

Also bei mir funktioniert folgender Quelltext:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows {...}

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  {...}
  end;

var
  Form1: TForm1;
  Arr : array [0..5] of integer = (10,15,20,25,30,35);
implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(IntToStr(Arr[3]));
Arr[3] := 42;
ShowMessage(IntToStr(Arr[3]));
end;

end.

Und mit der 0 haste natürlich Recht