Hallo Alle,
ich versuche gerade, etwas mit einer Klassendeklaration zu programmieren. Leider funktioniert es nicht, wenn ich auf die von mir erstellte Klasse zugreifen will. Jedes mal, beim Zugriff kommt eine
Exception "Zugriffverletzung bei Adresse... . Fehler beim Schreiben auf Speicher."
Was mache ich denn da falsch?
Delphi-Quellcode:
type
Feld = class
public
Pixel : Array of Array of Array of Integer;
PixDef : Array of Array of Integer;
procedure init();
end;
...
private
{ Private-Deklarationen }
Panel : Array [1..2] of Feld;
...
procedure Feld.init();
begin
SetLength(Pixel,20,20,2);
SetLength(PixDef,400,4);
end;
...
for i := 1 to 2 do
begin
Panel[i] := Feld.Create;
Panel[i].init;
cpx[i] := 1;
cpy[i] := 1;
end;
...
Panel[1].Pixel[i,k,l] := 0; //hier tritt der Fehler auf
Danke für Eure Hilfe,
der fidibus