23-09-12, 05:30 PM
الصفحات : 1 2
23-09-12, 05:54 PM
يمكن معرفة حالة الضغط على اي زر من ازار لوحة المفاتيح عن طريق API بدالة GetKeyState
الرابط : اضغط هنا
الرابط : اضغط هنا

23-09-12, 06:39 PM
Raggi Tech كتب :يمكن معرفة حالة الضغط على اي زر من ازار لوحة المفاتيح عن طريق API بدالة GetKeyStateشكرآ اخى لاكن لم افهم شيئ
الرابط : اضغط هنا

23-09-12, 06:48 PM
هذا مثال بـــفيجوال بيسك دوت نت 2010
التحميل : Key Logger.zip
التحميل : Key Logger.zip
23-09-12, 07:03 PM
Raggi Tech كتب :هذا مثال بـــفيجوال بيسك دوت نت 2010جزاك الله كل خير
التحميل : Key Logger.zip
انا جربت الكود وضع كلمه فى **** لاكن بدل مايكتب الكلمه مرا وحدا اعد يكرره اقصد انا خليته يكتب 1 فى ****box اعد يكتب 111111111111 هل يوجد حل؟
23-09-12, 07:59 PM
بعد الكثير من المحولات الفاشله تم اجاد هذا الحل لان فى مشكله
هذا هو الكود
لاكن عند الضغط على اى زلر اخر يكرر الكلمه وى ازا وضعته فى حدث e.keycode مابيشتغلش المفتاح
انا فاشل كليآ بخصوص المفاتيح
هذا هو الكود كود :
Private Sub ****Box1_KeyDown(ByVal sender As Object, ByVal e As System.******s.Forms.KeyEventArgs) Handles ****Box1.KeyDown
If Keys.Control Then
****Box1.**** &= "vb4arb"
End If
End Subانا فاشل كليآ بخصوص المفاتيح

23-09-12, 08:02 PM
تم ايجاد الحل بعد مرتين فشل من اخر كود هذا هو الحل للافاده
كود :
Private Sub ****Box1_KeyDown(ByVal sender As Object, ByVal e As System.******s.Forms.KeyEventArgs) Handles ****Box1.KeyDown
If e.KeyCode = Keys.ControlKey Then
****Box1.**** &= "vb4arb"
End If
End Sub23-09-12, 08:08 PM
[COLOR="#000080"]اخي ان كنت تريد ان لا يحدث تكرار فاستخدم KeyUp وليس KeyDown
[/COLOR]
كود :
If e.KeyCode = Keys.ControlKey Then
te xtbox1.te xt &= "vb4arb"
End If23-09-12, 08:31 PM
Raggi Tech كتب :[COLOR="#000080"]اخي ان كنت تريد ان لا يحدث تكرار فاستخدم KeyUp وليس KeyDown
[/COLOR]كود :
If e.KeyCode = Keys.ControlKey Then
te xtbox1.te xt &= "vb4arb"
End If
لاسف تم التجربه مسبقآ ولم ينفع الى مهم عرفت اشغل Ctrl key
لاكن مازلت اريد ان لا يكرر الكلمه وى جارى التجربه شكرآ لى مرورك اخى
ان المسه الاخيره صعبه ديمآ

23-09-12, 08:49 PM
اخي الكود يعمل معي كيف لا يعمل !!
الصفحات : 1 2