ImageList Problem bei for-Schleife

[Nightshade]

Delphi-Quellcode:

procedure TForm1.imgBackroundMouseDown(Sender: TObject; 
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer); 
begin 
if klick = true then begin 
  if Sender is TImage then begin
    FigurListe.Draw((Sender as TImage).canvas,0,0,3,true);
  end;
end;

Villeicht gehts so...