Array Zugriffsverletzung

[Kytrix]

Delphi-Quellcode:

unit mWürfel;

interface

type
  TWürfel=Class(TObject)
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
    PunkteArray: Array[1..8, 1..3] of Integer;
    function GetPunkte(Punkt, Koordinate: Integer): Integer;
    procedure SetPunkte(Punkt, Koordinate, Wert: Integer);
  end;

implementation

function TWürfel.GetPunkte(Punkt, Koordinate: Integer) :Integer;
begin
  Result:=PunkteArray[Punkt,Koordinate];
end;

procedure TWürfel.SetPunkte(Punkt, Koordinate, Wert: Integer);
begin
  PunkteArray[Punkt,Koordinate]:=Wert;
end;

end.

PunkteArray[Punkt,Koordinate]:=Wert; //Hier bekomme ich die Fehlermeldung Erste Gelegenheit für Exception bei $75079617. Exception-Klasse EAccessViolation mit Meldung 'Zugriffsverletzung bei Adresse 004AE2FC in Modul 'Engine.exe'. Schreiben von Adresse 00000008'. Prozess Engine.exe (4720)

Irgendwie stehe ich voll auf dem Schlauch =/ ....