Buscar por:

Mover objeto junto com o mouse

Código

1°: //Para mover o objeto junto com o mouse ('como se ele fosse o mouse'):

//Coloque no "OnMouseMove" for Form e de todos os objetos de do form (EXCETO DO QUE IRÁ SE MOVER!) o código:

Objeto1.Top:= y - 3;

Objeto1.Left:= x - 2;

//Se deseja ocultar o mouse do Windows, adicione o código:

showcursor(false);

//Os - 3 e - 2 são para tirar o Objeto um pouco de cima dos objetos do form, para executar o clique.

2°: //Para colocar o objeto  onde está o mouse no momento de um clique:

//Coloque o no evento OnClique em algum objeto do form, o código:

Objeto2.Top:= Mouse.CursorPos.Y;

Objeto2.Left:= Mouse.CursorPos.X;

Pronto!

(Se quiser