Como mudar simplismente a posição do Mouse em tempo de exec?
Ola!
Tenho a seguinte dúvida:
Preciso a pressionar uma tecla <F4>, para mudar a posição do ponteiro do mouse para as coordenadas (50,100), baseado nas config. do form.
Como posso fazer isto ?
A quem puder responder, desde jã meus agradecimentos.
ANT.CARLOS/SP
Tenho a seguinte dúvida:
Preciso a pressionar uma tecla <F4>, para mudar a posição do ponteiro do mouse para as coordenadas (50,100), baseado nas config. do form.
Como posso fazer isto ?
A quem puder responder, desde jã meus agradecimentos.
ANT.CARLOS/SP
Ant.carlos/sp
Curtidas 0
Respostas
Du_nirvana
23/06/2008
Olá, no procedimento vinculado a sua tecla de execução codifique o seguinte:
var vl_p: TPoint; begin vl_p.X := 50; vl_p.Y := 100; vl_p := ClientToScreen(vl_p); SetCursorPos(vl_p.X, vl_p.Y); end;
GOSTEI 0