delphi4arab منتديات دلفي للعرب
كيف احرك الفأرة - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف احرك الفأرة (/showthread.php?tid=3675)



كيف احرك الفأرة - karamofweb - 06-12-2011

كيف استطيع تحريك الفأرة من خلال اوامر مثال .. زر يعطيها امر تحرك احداثيات معينة و احسن مثال في الويندوز تستطيع تحريكها بالارقام


كيف احرك الفأرة - hanipino - 06-12-2011

استعمل الدالة SetCursorPos
كود :
[B][color=Black]SetCursorPos[/color][/B][color=Green]([/color][color=Red]X[/color][color=Blue],[/color] [color=Red]Y[/color][color=Green])[/color][color=DarkRed];[/color]



كيف احرك الفأرة - karamofweb - 07-12-2011

شكرا ... و لاستعمال الزرين مادا افعل


كيف احرك الفأرة - hanipino - 07-12-2011

استعمل الدالة mouse_event

كود :
mouse_event(MOUSEEVENTF_RIGHTUP,0,0,0,0);

dwFlags
كود :
const {$EXTERNALSYM MOUSEEVENTF_MOVE} MOUSEEVENTF_MOVE = $0001; { mouse move } {$EXTERNALSYM MOUSEEVENTF_LEFTDOWN} MOUSEEVENTF_LEFTDOWN = $0002; { left button down } {$EXTERNALSYM MOUSEEVENTF_LEFTUP} MOUSEEVENTF_LEFTUP = $0004; { left button up } {$EXTERNALSYM MOUSEEVENTF_RIGHTDOWN} MOUSEEVENTF_RIGHTDOWN = $0008; { right button down } {$EXTERNALSYM MOUSEEVENTF_RIGHTUP} MOUSEEVENTF_RIGHTUP = $0010; { right button up } {$EXTERNALSYM MOUSEEVENTF_MIDDLEDOWN} MOUSEEVENTF_MIDDLEDOWN = $0020; { middle button down } {$EXTERNALSYM MOUSEEVENTF_MIDDLEUP} MOUSEEVENTF_MIDDLEUP = $0040; { middle button up } {$EXTERNALSYM MOUSEEVENTF_WHEEL} MOUSEEVENTF_WHEEL = $0800; { wheel button rolled } {$EXTERNALSYM MOUSEEVENTF_ABSOLUTE} MOUSEEVENTF_ABSOLUTE = $8000; { absolute move }