Delphi - Seguir Etiqueta al puntero

Quisiera saber como puedo que una etiqueta tipo LABEL sigua al raton por la pantalla , pero que siempre este por enciama, es decir, que si pasa por encima de un boton esta etiqueta siempre este por encima, o si se ha dibujado algo en modo de ejecucion en le fondo mediante el metodo paint, el dibujo no se borre tras pasar ala etiqueta por encima, lo necesito para un proyecto fin de carrera.

Aunque lo que pretendes es posible, me parece injustificadamente complicado de implementar. Es mejor que utilices un Hint que, al fin y al cabo, para eso está.

Lo que tienes que hacer es programar un manejador para el evento OnMouseMove más o menos así:

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin

//Form1 debe tener la propiedad ShowHint a True
Self.Hint := 'X: ' + IntToStr(X) + ', Y: ' + IntToStr(Y);

Application.ActivateHint(Mouse.CursorPos);

end;//OnMouseMove