Verständnissproblem

[Generaljim]

Danke erst einmal für die Erklärung.Nun tritt aber leider bei mir eine Zugriffsverletzung auf und diese muss irgendwie mit dem übergebenden image zusammenhängen, vieleicht könnt ihr mir ja sagen woran es liegt.

Delphi-Quellcode:

 TSupermari=class (TObject)
  private
  supermario:TImage ;
  supermario2:TImage;
  constructor Createme(img,img2:TImage);
public
posx:integer;
posy:integer;
procedure bewegen(x,y:integer);
end;

var
  Form1: TForm1;
  Supermari:TSupermari;


implementation

{$R *.DFM}
Constructor Tsupermari.Createme(img,img2:TImage);
begin
inherited Create;
supermario:=img;
supermario2:=img2;end;
procedure Tsupermari.bewegen(x,y:integer) ;
begin

if y>0 then begin;
supermari.supermario.visible:=true;
supermari.supermario2.visible:=false;
end; end;




 procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key ='s' then begin
Supermari:=Tsupermari.create;
Supermari.bewegen(0,100);end;
Supermari.free;

end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Supermari:=Tsupermari.createme(supermario,supermario2);
end;

end.