[YazanOtoum]

السلام عليكم

اخواني

لدي مشروع موجود به picturebox ويقوم بالتقاط صورة لشاشة الجهاز عند فتحه 

الان انا اعرف كيف اقوم بجعل الماوس ينقر على postion معين في الشاشة 

ولكن لم اعرف كيف احتسب postion picturebox بالنسبة للشاشة يعني اجعل عندما اضغط على مثلا داخل picturebox عند صورة form1 كما هو موضح بالصورة ...يجعله يقوم بالنقر بشكل حقيقي على الشاشة الكامله

انا اعرف موضوي معقد ويمكن ما عرفت اوصل الفكرة ولكن باختصار شديد اعتبر Picturebox اعتبارا انها RemoteDesktop ولما تضغط عليها انت عمم تتحكم بششاشة الجهاز  

ارجوا انو وضحة وشكرا لكم

كود لتحديد Postion  في picturebox عند الضغط عيها 

كود :

 Private Sub PictureBox1_MouseClick(ByVal sender As Object, ByVal e As MouseEventArgs) Handles PictureBox1.MouseClick
        PPoint = New Point(e.X, e.Y)
        MsgBox(e.X & " , " & e.Y)

    End Sub

وهذا كود لتغير مكان mouse 

اي postion الخاص به

كود :

 Private Declare Function SetCursorPos Lib "user32.dll" ( _
ByVal X As Int32, _
ByVal Y As Int32 _
) As Boolean

والاستدعاء :

كود :

  SetCursorPos(5, 5)

وتغير الرقمين 5

و كود النقر 

كود :

Private Declare Sub mouse_event Lib "user32.dll" ( _
    ByVal dwFlags As Int32, _
    ByVal dx As Int32, _
    ByVal dy As Int32, _
    ByVal cButtons As Int32, _
    ByVal dwExtraInfo As Int32 _

والاستدعاء بالنقر يمين او شمال mouse

كود :

 mouse_event(&H2, 0, 0, 0, 1)

        mouse_event(&H4, 0, 0, 0, 1

الصورة المرفقة فيها برنامجي Form1 ملتقط صورة للشاشة  والشاشة الاصلية