منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
تعديل كود تسجيل نقرات الكيبورد - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : تعديل كود تسجيل نقرات الكيبورد (/showthread.php?tid=9410)

الصفحات: 1 2


RE: تعديل كود تسجيل نقرات الكيبورد - عبدالله الصافي - 19-01-17

شكرا جزيلا استاذي الكريم


RE: تعديل كود تسجيل نقرات الكيبورد - عبدالله الصافي - 20-01-17

الكود بمرفق المشاركة 3
Public Function KeyLang()
h1 = GetForegroundWindow
h2 = GetWindowThreadProcessId(h1, 0)
If GetKeyboardLayout(h2) <> 67177473 Then Form1.Timer1.Tag = "en"
If GetKeyboardLayout(h2) = 67177473 Then Form1.Timer1.Tag = "ar"
End Function
مشكلته انه يعمل مع لغة كتابة معينة
مثلا اللغة العربية لمصر غير اللغة العربية لاي دولة اخر
فالكود لا يستيع معرفة لغة الكتابة

فهل من طرقة افضل؟