[Xclusive]

Как сделать движение Timage за кликом мыши.Координаты с мыши легко взять, а вот как заставить передвигаться картинку ? Я не могу заставить. Она вечно куда то прячется за форму!
Помогите кому не трудно скиньте код. Заранее благодарен.

[Drozh]

Код:

var
 pt: TPoint;
begin
 GetCursorPos(pt);

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