Как поместить курсор мышки в нужное место на форме?

uses 
  Windows; 

procedure
 PlaceMyMouse(Sender: TForm; X, Y: word); 
var
 
  MyPoint: TPoint; 
begin
 
  MyPoint := Sender.ClientToScreen(Point(X, Y)); 
  SetCursorPos(MyPoint.X, MyPoint.Y); 
end
;




влагомер купить поиск ПКСД аренда компрессора