منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم ورحمة الله وبركاته Heart

انا اليوم درت برنامج وكملت كل شيئ Angel

بس جاني شيئ غلط Angry

وماعرفتش احله Huh

الكود :

كود :

SendKeys.SendWait("{MouseLeft}")

احتاج تعديل الى ان يرسل ماوس left يعني يرسل ضغظ click بالماوس Exclamation

(25-08-17, 08:53 PM)MeDo Ly كتب : [ -> ]السلام عليكم ورحمة الله وبركاته

انا اليوم درت برنامج وكملت كل شيئ
بس جاني شيئ غلط وماعرفتش احله

الكود :

كود :

SendKeys.SendWait("{MouseLeft}")

احتاج تعديل الى ان يرسل ماوس left يعني يرسل ضغظ click بالماوس

حتى اني عندي مشكله في هادي معرفتش نديرها

مرحبا اخى

SendKeys خاصه بلوحه المفاتيح حتى انها ليس كل المفاتيح

تحتاج API التاليه ضعها في بدايه كلاس الفورم

PHP كود :

<Runtime.InteropServices.DllImport("user32.dll")> _
Private Shared Sub mouse_event(ByVal dwFlags As UInteger, ByVal dx As UInteger, ByVal dy As UInteger, ByVal dwData As UInteger, ByVal dwExtraInfo As Integer)
End Sub
Public Enum MouseEventFlags As UInteger
    MOUSEEVENTF_ABSOLUTE = &H8000
    MOUSEEVENTF_LEFTDOWN = &H2
    MOUSEEVENTF_LEFTUP = &H4
    MOUSEEVENTF_MIDDLEDOWN = &H20
    MOUSEEVENTF_MIDDLEUP = &H40
    MOUSEEVENTF_MOVE = &H1
    MOUSEEVENTF_RIGHTDOWN = &H8
    MOUSEEVENTF_RIGHTUP = &H10
    MOUSEEVENTF_XDOWN = &H80
    MOUSEEVENTF_XUP = &H100
    MOUSEEVENTF_WHEEL = &H800
    MOUSEEVENTF_HWHEEL = &H1000
End Enum 

لان الحدث Click هو عباره عن Down ثم Up تحتاج لهذين السطرين لتنفيذ ضغط الزر الايسر للماوس
لاحظ MouseEventFlags اللي فوق فيها قيمه المفتاح الايمن والاوسط وايضا العجله تبع الماوس

PHP كود :

mouse_event(MouseEventFlags.MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0)
mouse_event(MouseEventFlags.MOUSEEVENTF_LEFTUP, 0, 0, 0, 0) 

بالتوفيق للجميع

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

MeDo Ly

Algeriany

أبو نوره