درس يوم الثامن عن تشغيل الوقت Timer
|
تطبيق الوقت
1 مرفق
السلام عليكم
شكرا لك استاذ خليل على هذا الدرس الهام جدا ان كل ما في الدرس واضح وفي المرفق ارسل التطبيقين الوطلوبين عندي سؤال : الا يمكن ان ندمج النموذجين في نموذج واحد بحيث يظهر الترحيب اولا بعد ثلاث ثواني ثم تظهر الاعداد كل ثانية واحدة اظن ان ذلك تمرين جيد .... وشكرا جزيلا |
ساختبرك هل تستطيع عمل زر ايقاف ما هو الكود للإيقاف التوقيت مثلا هو يشتغل و تريد توقفه قبل ما ينتهي الوقت
|
زر الايقاف للمؤقت
1 مرفق
التطبيق في المرفق التالي:
عند النقر على زر التشغيل يبدا العرض اذا نقرنا زر الايقاف اثناء العرض يتوقف العرض وشكرا |
ممتاز الاخ فادي عمل ممتاز شاهد الدرس الجديد بمنتدى الدورات التعليمية
|
1 مرفق
بسم الله الرحمن الرحيم
السلام وعليكم ورحمة الله وبركاته كيف حالكم جميع الاستاذ الفاضل اني قريت درس التايمر وربما غيابي لظروف قاهرة جعلني غير مستوعبة الاستيعاب المطلوب ولهذا وجدت عندي عدة تساؤلات ومنها ما فهمته في موضوع التايمر هو انك تريد عبارة ترحيب بحيث تبدأ في الظهور بعد 3 ثواني لكن لماذا تم كتابة هذا الكود Timer1.Enabled= false Timer1.Intreval=300 في الفورم ولم يكتب في التايمر أليس هذا أمر يخص التايمر وخاصة اننا يمكننا عمله يدويا وذلك بتغيير خصائص التايمر وليس الفورم وبالمناسبة جربت كتابة هذا الكود في الفورم وشغلت التمرين لكني لم اجد تغييرا أهذا يعني ان الامر غير مرئي للمستخدم لكنه فعال ثانيا : لماذا كتب الكود الذي يظهر عبارة الترحيب (( أهلا وسهلا )) في التايمر ولم يكتب في command رغم اننا اذا شغلنا البرامج نضغط على command وهو بدوره يظهر على الليبل ثالثا : لو قمت بتأدية هذا التمرين بهذه الصورة هل يؤدي نفس الغرض يعني مثلا الادوات الذي سأحتاجها هي ليبل ، وتايمر ، وكموند من خصائص الليبل بمسح الاسم حتى يظل فارغ من خصائص التايمر سأضع عند Enabled false و عند interval 300 حتى اضمن عدم تشغيل التايمر في البداية وفي command سأكتب هذا الكود "اهلا وسهلا بكم "= label1.caption Timer1.Enabled=True ولكم مني الشكر الجزيل خاصة للاستاذ خليل ابراهيم تحياتي اختكم : شجون |
1 مرفق
السلام وعليكم ورحمة الله وبركاته
الاساذ خليل ابراهم ممكن اعرف وين الخطأ في هذا الملف المرفق رغم اني طبقت ما كتبت انت من كود لمشروع عمل عداد تصاعدي دون تغيير شيئ ولكم مني جزيل الشكر |
السلام عليكم
اذا تكتبي كود اكتبيه باحرف صغيرة يعني امحي End If و عيدي كتابتها باحرف صغيرة و بدون فراغ هو اتوماتيكيا سيعدلهم اكتبي endif ثم اضغطي على enter سيعدلهم الى End If اذا الون في الكود احمر يعني في خطا في الكود و نستطيع كتابة الكود بشكل اخر ايضا مثل : كود:
Private Sub Timer1_Timer() |
السلام وعليكم ورحمة الله وبركاته
مشكور استاذنا الفاضل ولكنك لم تجيب على استفساراتي السابقة فلماذا ؟ |
الاخت شجون
اهلا بعودتك بعد الغياب بالنسبة للتطبيق الثاني( العداد) فقد اوضح لك الاستاذ خليل اين المشكلة بالنسبة للتطبيق الاول ( الترحيب بعد ثلاث ثواني ) الفورم الذي نفذتيه يظهر الترحيب مباشرة وليس بعد ثلاث ثواني اذا كان التايمر ممكن اي enabled=trou فسوف يتم تنفيذ الكود المكتوب داخل التايمر بعد الفترة الزمنية المحددة بالخاصية interval لذلك نجعل التايمر متوقف في البداية(اي enabled=false) ونشغله عند الضغط على command( بان نضع في كود الكومند timer1.enable=trou) جربي اعادة تنفيذ الفورم من جديد كما هو مشروح مع مراعاة ان interval=3000 (وهي تعادل 3 ثواني) وليس 300 التي بسببها قد يكون انك لم تلحظي الفرق |
عفوا و تم الرد لم اشاهد الاستفسار إلا الان
|
السلام وعليكم ورحمة الله وبركاته
اشكر الاستاذ خليل وكذلك الأخ فادي على السؤال والايضاح ولكني كنت اقصد 3000 وربما اخطأت في الطباعة عموما اكرر شكري مرة ثانية ودمتم سالمين وجزاكم الله خيرا اختكم : شجون |
ان شاء الله بطبق هالدروس ولي عودة
|
برنامج مسابقة
الي الاستاد الفاضل (خليل) اطال الله في عمرك .....
وبعد.... اريد ان اصمم برنامج مسابقة حيث يقوم الكمبيوتر بطرح الاسئلة وانا اجيب على الاسئلة عن طريق السماعات او ما يعرف بلاقط الصوت (المايك) راج من الله ان تفيدني في عمل ذالك ..... علمني مما علمك الله والسلام في الختام .................................................. .. ................................اخوك ابو ايوب اليبي....................... |
يعني الصوت مسجل ؟ ام انت تريد تسجيله ؟ الفكرة غير واضحة لدي
|
الساعة الآن 11:15 AM |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. TranZ By
Almuhajir