السلام عليكم
أخواني أريد الرجوع للفورم الرئيسيةعند عدم تحريك الماوس لمدة معينة قمت بكتابة الكود التالي ويقوم بالعودة للفورم الرئيسي المدة المحددة وهي دقيقة لكن المشكلة أنه يعود سواء حركت الماوس أو لم أحركه
كتبت في حدث Form7_MouseHover
Timer2.Stop
كتبت في حدث form7_MouseLeave
Timer2.start
كتبت في حدث Timer2_Tick
form2.show
me.close
لكم جزيل الشكر
دمتم بود
السلام عليكم ورحمة الله وبركاته
كل عام وانتم بخير اضحى مبارك
اخي الكريم جيولوجي والاخ الكريم asmarsou
الموضوع هو اقرب مايكون الى ScreenSaver
اي يجب ان يتحسس البرنامج توقف الماوس او توقف ضربات المفاتيح لمدة معينة يتم حسابها
بالنسبة للمثال التالي استخدمت توقف حركة الماوس وهي الاكثر استخداما في البرامج
بعد فتح الفورم الثانية يتم تحديد مكان الماوس ومع التايمر في حدث التيك سيتم تحديد مكان الماوس ومع الحركة false
سيتم تنفيذ اغلاق الفورم بانتهاء المدة
اما اذا تم تحريك الماوس فمع كل حركة سيتم تحديد مكان الماوس والحركة اولها true واخرها False
المثال عملته على عجل وهو يعمل بشكل جيد وهو مبني على الثواني يمكنك تغيير الى دقائق غير قيم R1 و R2
من
كود :
R1 = Now.Second
R2 = Now.Second
الى
كود :
R1 = Now.Minute
R2 = Now.Minute
ناحية اخرى وضعت عدد من التكست بوكس لعرض القيم ومايحدث
يمكنك الاستغناء عنها وقد وضعت الاكواد بدون العرض في مربعات النصوص تحت الاكواد وجعلتها Comment
قم بالتجربة وان شاء الله يفي بما طلبت
(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
قم بالتجربة وان شاء الله يفي بما طلبت
بارك الله فيك و جزاك عنا كل خير....وكل سنة و انت طيب
وبارك الله فيك ولك اخي asmarsou
السلام عليكم ورحمة الله وبركاته
وكل عام أنتم بخير وعيد أضحى مبارك
سأجرب الكود وأخبركم بما حصل معي
لكم جزيل الشكر
دمتم بود
السلام عليكم ورحمة الله وبركاته
كل عام وأنتم بخير عيدكم مبارك
الشكر لكم جميعاً على مجهودكم تم المطلوب على أحسن حال
وآسف لتأخري في الرد بسبب ظروف العيد
لكم جزيل الشكر
دمتم بود
وانت بالف خير اخي الكريم جيولوجي
اتمنى ان تكون قد استفدت من الطريقة