Image bewegen

[Jonski]

Soweit bin ich jetzt:

Delphi-Quellcode:

if Image1       then
begin

end
else begin
case Key of
  VK_LEFT:  Image1.Left := Image1.Left - 10;
  VK_RIGHT: Image1.Left := Image1.Left + 10;
  VK_UP:    Image1.Top := Image1.Top - 10;
  VK_DOWN:  Image1.Top := Image1.Top + 10;
end;

nur ich weiß nicht wie man eine Berührung erkennt.