Wo hast du eigentlich den Quelltext her? Und heißt deine Form (Form.Name
) wirklich Spielfeld, bzw. ist sie (bei var) noch als TForm1 oder als TSpielfeld deklariert? Das war nämlich das erste, was mir aufgefallen ist.
Und zur Klassendeklaration: Versuch's mal mit:
Delphi-Quellcode:
tsnake = class
public
x,y:array[1..100] of integer;
vx,vy,r,laenge:integer;
farbe:tcolor;
...
tapfel = class
public
x,y,r,score:integer;
farbe:tcolor;
statt
Delphi-Quellcode:
tsnake = class
x,y:array[1..100] of integer;
vx,vy,r,laenge:integer;
farbe:tcolor;
...
tapfel = class
x,y,r,score:integer;
farbe:tcolor;