19-07-21, 10:35 PM
(19-07-21, 10:18 PM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله وبركاتهبارك الله فيك و جزاك عنا كل خير....وكل سنة و انت طيب
كل عام وانتم بخير اضحى مبارك
اخي الكريم جيولوجي والاخ الكريم asmarsou
الموضوع هو اقرب مايكون الى ScreenSaver
اي يجب ان يتحسس البرنامج توقف الماوس او توقف ضربات المفاتيح لمدة معينة يتم حسابها
بالنسبة للمثال التالي استخدمت توقف حركة الماوس وهي الاكثر استخداما في البرامج
بعد فتح الفورم الثانية يتم تحديد مكان الماوس ومع التايمر في حدث التيك سيتم تحديد مكان الماوس ومع الحركة false
سيتم تنفيذ اغلاق الفورم بانتهاء المدة
اما اذا تم تحريك الماوس فمع كل حركة سيتم تحديد مكان الماوس والحركة اولها true واخرها False
المثال عملته على عجل وهو يعمل بشكل جيد وهو مبني على الثواني يمكنك تغيير الى دقائق غير قيم R1 و R2
من
الىكود :
R1 = Now.Second
R2 = Now.Second
ناحية اخرى وضعت عدد من التكست بوكس لعرض القيم ومايحدثكود :
R1 = Now.Minute
R2 = Now.Minute
يمكنك الاستغناء عنها وقد وضعت الاكواد بدون العرض في مربعات النصوص تحت الاكواد وجعلتها Comment
قم بالتجربة وان شاء الله يفي بما طلبت