Bitmap mit tastatur in einer paintbox bewegen?!

[legalex]

ich führe hier nochmal die frage aus meinem vorherigen thread auf:
wie kann ich eine bitmap in einer paintbox mit tasten bewegen?

wenn ich die steuerung wie folgt implementiere bekomme ich eine fehlermeldung nachdem ich die taste 'a' gedrückt habe:

Delphi-Quellcode:

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
 if Key='a' then
 begin 
  Tetrisbox.Canvas.Draw(240+10,y,Brix);
 end;
end;