du hast ja timer1 auch nicht definiert
Delphi-Quellcode:
TKuken = class(TImageSprite)
private
Timer1: TTimer;
Public
Constructor Create(aparent:Tsprite);override;
Procedure right;
end;
und im constructor dann noch
Delphi-Quellcode:
Timer1 := TTimer.Create;
[...]
und im Destructor dann
Timer1.Free;