منتديات كركوك تايمز

منتديات كركوك تايمز
 
الرئيسيةس .و .جالتسجيلدخول
أفضل 10 أعضاء في هذا المنتدى
فيــرو - 3141
 
شميران كركوكي - 2120
 
Rasti - 1769
 
zoba - 1578
 
كــاردينيــا - 1350
 
دمعة حزن - 579
 
A.O.J - 538
 
Aramos - 497
 
ديدار - 410
 
دانيار كوردى - 404
 
المواضيع الأخيرة
» استضافة مجانية مع دومين .com مجاني مدى الحياة
الخميس 10 ديسمبر 2015, 4:36 pm من طرف hayderaltimimi

» ليلى والخمسين حرامي .. بقلمي
الإثنين 09 نوفمبر 2015, 7:19 pm من طرف حجي تمساح

» شل c99 مع الشرح بالفيديو
الأربعاء 04 سبتمبر 2013, 4:56 pm من طرف فيــرو

» شل c99 مع الشرح بالفيديو
الأربعاء 04 سبتمبر 2013, 4:52 pm من طرف فيــرو

» ثغرة XSS
الثلاثاء 27 أغسطس 2013, 5:20 pm من طرف فيــرو

» موقع يقدم اخر الثغرات
السبت 24 أغسطس 2013, 7:04 am من طرف فيــرو

» ثغرة جديدة
السبت 24 أغسطس 2013, 7:01 am من طرف فيــرو

» برنامج الهجوم على المواقع
السبت 24 أغسطس 2013, 4:57 am من طرف فيــرو

عداد الزوار

hit counter

شاطر | 
 

 تعطيل الكيبورد والماوس عن العمل

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة
فيــرو
مؤســـس منتديـــات كركوك تايمزمؤســـس منتديـــات كركوك تايمز
avatar
بيانات العضو
الجنس : ذكر
عدد المساهمات : 3141
نقاط : 42628
تاريخ التسجيل : 20/09/2009
العمر : 28

مُساهمةموضوع: تعطيل الكيبورد والماوس عن العمل   الخميس 24 سبتمبر 2009, 7:50 am

كما تعودنا في معظم الأكواد ومع استخدام المكتبة user32 يمكننا التعامل مع BlockInput والتي تقوم بتعطيل وسائل الادخال في الجهاز .

طبعاً سنقوم باستخدام Sleep للتوقف لفترة معينة ، ويمكن الاستعاضة عنها ب Timer عادي .
الكود:

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 10000
    ' إعادة لوحة المفاتيح والماوس للعمل مرة أخرى
    BlockInput False
End Sub


مع السلامة
توقيــع العضو فيــرو
الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://xp10.ahlamontada.com
دنيــــا
مشـــرفة المنتديـــات الفنيـــــةمشـــرفة المنتديـــات الفنيـــــة
بيانات العضو
عدد المساهمات : 119
نقاط : 14764
تاريخ التسجيل : 01/10/2009

مُساهمةموضوع: رد: تعطيل الكيبورد والماوس عن العمل   الجمعة 02 أكتوبر 2009, 3:43 am

مشكورين يا مبرمج على الكودات المهمة فريقنا مهزوم
توقيــع العضو دنيــــا
الرجوع الى أعلى الصفحة اذهب الى الأسفل
فيــرو
مؤســـس منتديـــات كركوك تايمزمؤســـس منتديـــات كركوك تايمز
avatar
بيانات العضو
الجنس : ذكر
عدد المساهمات : 3141
نقاط : 42628
تاريخ التسجيل : 20/09/2009
العمر : 28

مُساهمةموضوع: رد: تعطيل الكيبورد والماوس عن العمل   الأربعاء 18 نوفمبر 2009, 3:29 am

العفو يدللو منورة الموضوع
توقيــع العضو فيــرو


يرحل من يرحل . . لن تهدم الدنيا .. ولن تغلق ابواب السماء
فأنا لا ألتفت ابدا للوراء... فالحب والصداقه لا يأتوا بالتوسل والرجاء
وغرور من امامي زادني كبرياء
....فإن كان وجودهم شيئا فإن كرامتي أشيااااء

الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://xp10.ahlamontada.com
فيــرو
مؤســـس منتديـــات كركوك تايمزمؤســـس منتديـــات كركوك تايمز
avatar
بيانات العضو
الجنس : ذكر
عدد المساهمات : 3141
نقاط : 42628
تاريخ التسجيل : 20/09/2009
العمر : 28

مُساهمةموضوع: رد: تعطيل الكيبورد والماوس عن العمل   الأربعاء 18 نوفمبر 2009, 5:46 pm

شكرااااااااا
توقيــع العضو فيــرو


يرحل من يرحل . . لن تهدم الدنيا .. ولن تغلق ابواب السماء
فأنا لا ألتفت ابدا للوراء... فالحب والصداقه لا يأتوا بالتوسل والرجاء
وغرور من امامي زادني كبرياء
....فإن كان وجودهم شيئا فإن كرامتي أشيااااء

الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://xp10.ahlamontada.com
شميران كركوكي
أدارةأدارة
avatar
بيانات العضو
الجنس : ذكر
عدد المساهمات : 2120
نقاط : 18432
تاريخ التسجيل : 23/09/2009
العمر : 29

مُساهمةموضوع: رد: تعطيل الكيبورد والماوس عن العمل   الخميس 02 سبتمبر 2010, 5:17 am

عاشت ايدك
توقيــع العضو شميران كركوكي



بیر له‌ زیان بكه‌وه‌ به‌لام خه‌فه‌تی بو مه‌خو
الرجوع الى أعلى الصفحة اذهب الى الأسفل
 

تعطيل الكيبورد والماوس عن العمل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منتديات كركوك تايمز :: منتديات الكومبيوتر و الانترنيت :: منتدى لغات البرمجة-
a
انتقل الى: