Как поместить курсор мыши на форму?
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;
Имя (обязательное)
E-Mail (обязательное)
Сайт
Подписаться на уведомления о новых комментариях
Обновить