موضوع: كود ايقاف الكيبورد و الماوس عن العمل الجمعة 02 أكتوبر 2009, 12:54 am
ضع هذا الكود على الفورم
الكود:
Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Private Sub Form_Activate() DoEvents BlockInput True Sleep 1000 BlockInput False End Sub
توقيــع العضو منار
موضوع: رد: كود ايقاف الكيبورد و الماوس عن العمل الجمعة 02 أكتوبر 2009, 3:51 am
منار يمكن الموضوع مكرر منو مراقب هل قسم ؟ مشكورة يامبدعة
توقيــع العضو دنيــــا
موضوع: رد: كود ايقاف الكيبورد و الماوس عن العمل الخميس 15 أكتوبر 2009, 1:45 pm
مشكووووووور على المعلومة المفيدة يا وردة المنتدى
هع هع هع هع دنيا لازم تحجين كلامج اهنا هم اخ اخ اخ من سمير مو منج هع :shock:
توقيــع العضو Rasti
موضوع: رد: كود ايقاف الكيبورد و الماوس عن العمل الخميس 29 أكتوبر 2009, 2:29 am
عاشت ايدج منار . راستي ليش اخ مني هو اني كاتب التعليق