[Drozh]

Код:

var
 pt: TPoint;
begin
 GetCursorPos(pt);

 Image1.Left := pt.X - Form1.Left;
 Image1.Top := pt.Y - Form1.Top;
end;