تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] مشكلة في عمل Keyboard
#1
السلام عليكم


اخواني .. لقد تطرقت لعمل كيبورد في Form لاستخدامه بدلا من الكيبورد العادي


واستخدم الكود التالي لتحديد Foucsed Process او Window لكي يقوم الكيبورد الكتابة عليها


كود :
  Declare Function GetForegroundWindow Lib "user32.dll" () As Int32

    Declare Function GetWindowThreadProcessId Lib "user32.dll" ( _
        ByVal hwnd As Int32, _
        ByRef lpdwProcessId As Int32) As Int32

    Public Function GetID() As Integer
        Dim processID As Int32
        GetWindowThreadProcessId(GetForegroundWindow(), processID)

        Return Process.GetProcessById(processID).Id
    End Function


و عند ارسال KEY مثلا حرف E استخدم :

كود :
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        On Error Resume Next
       
                
        AppActivate(GetID())
        SendKeys.Send("E")


    End Sub


ولكن المشكلة هي عند تحديد الوندز المفتوحه اي Foucsed فانه يعتبر برنامجي هو المفتوح اي المحدد Foucesd


لو وضعت Textbox في برنامجي سوف يظهر حرفE في Textbox



ارجوا اني قد شرحت مشكلتي بشكل واضح ,,,,, وشكراا لكم
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة عدم اكتمال تنفيذ بسبب فصل الشبكة او التيار الكهربائي اثناء النتفيذ تناسيم 2 20 منذ 4 ساعة مضت
آخر رد: sendbad100
  [كود] مشكلة مع الحدث keypress مع الاداة datagrideview nooralcown 0 26 أمس, 10:25 PM
آخر رد: nooralcown
  [VB.NET] مشكلة عند تحديث البيانات بالداتا جريد فيو محمد اسماعيل 6 95 13-12-17, 02:13 AM
آخر رد: محمد اسماعيل
Exclamation [VB.NET] مشكلة بسيطة في طباعة Textbox CoderMM 1 70 12-12-17, 09:54 PM
آخر رد: طالب برمجة
  [VB.NET] مشكلة عند تحديث البيانات بالداتا جريد فيو محمد اسماعيل 0 51 09-12-17, 03:28 AM
آخر رد: محمد اسماعيل
  مشكلة في تثبيت اداة Oracle Developer Tools for Visual Studio Marwan9990 9 164 04-12-17, 06:38 PM
آخر رد: Marwan9990
  [VB.NET] طلب مساعدة في حل مشكلة فراس الغزي 8 127 03-12-17, 09:41 PM
آخر رد: طالب برمجة
  [VB.NET] مشكلة فيجوال بيزك ( تهنيج وتخريب ) سارة احمد 6 168 30-11-17, 10:30 PM
آخر رد: سارة احمد
  مشكلة في الريستور abdulla2 0 61 30-11-17, 10:14 PM
آخر رد: abdulla2
  مشكلة في عملية الجمع VB.NET 5 66 26-11-17, 04:09 PM
آخر رد: حريف برمجة

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم