تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] طريقة عمل فاصل زمني بين كودين
#1
السلام عليكم 
اريد طريقة شافية لعمل فاصل زمني بين عمليتين أو أمرين ينفذهما البرنامج 
و للتوضيح أكثر برنامجي يقوم بفتح فورم جديد ( هذا الفورم مزود بمتصفح ) و بعد فتحه يوجهه لرابط معين 
اريد أن يقوم هنا بوضع فاصل زمني بين فتح الرابط و الأمر الذي يأتي بعده 

يعني سيكون الكود هكذا 

نضغط على الزر
يفتح الفورم الجديد
يتم التوجه الى الرابط المحدد
( فاصل زمني )
تنفيذ آخر أمر 

أتمنى أن تساعدوني بهذا الخصوص و شكرا
الرد
تم الشكر بواسطة:
#2
الحل بسيط اخي الكريم استعمل Thread
اللهم لك الحمد كما ينبغي لجلال وجهك و عظيم سلطانك
في حل و ترحال
الرد
تم الشكر بواسطة: thevest_knight
#3
ممكن توضيح لو سمحت
الرد
تم الشكر بواسطة:
#4
السلام عليكم

إذا كنت تقصد بالفاصل الزمني أن تنتظر حتى تحميل الصفحة في المتصفح WebBrowser
فيوجد حدث خاص بالمتصفح WebBrowser يحدث عند انتهاء التحميل وهو DocumentCompleted ضع فيه الأمر الآخر
الرد
تم الشكر بواسطة: thevest_knight , thevest_knight
#5
شكرا أخي لكن document completed لن تنفعتي بهذه الحالة لأن المتصفح بفورم آخر و الأمر الذي اريد تطبيقه بعد انتهاء تحميل الصفحة هو عبارة على سكريبت يتم حقنه بالصفحة و هذا السكريبت يحمل 20 قيمة مختلفة يعني لدي 20 زر لادخال تلك السكريبتات بالفورم الاول
الرد
تم الشكر بواسطة:
#6
شكرا لكما أحواي العزيزين على المتابعة
قمت بحل المشكل عن طريق استخدام التايمر بالفورم الثاني لتأخير حقن السكريبت الذي حللت مشكلة تعدد الايديهات معه عن طريق label بالفورم الأول Big Grin
تحياتي لكما و بارك الله فيكما و زادكما علما
الرد
تم الشكر بواسطة:
#7
ساعطيك مثال بسيط يبين لك طريقة عمل Task .
حيث يتم الانتظار الى ان يتم تنفيذ هذا Task و بعدها يتم تنفيذ الكود الذي يلي هذا Task
انشئ فورم جديد و استورد فضاء الاسماء التالي
PHP كود :
Imports System.Threading.Tasks 
الان في حدث التحميل ضع الكود التالي
PHP كود :
       CheckForIllegalCrossThreadCalls False 
الان لدي مثال بسيط و هو حلقة من الارقام تبدأ من الصفر الى 100 يتم تعبئتها في مربع نص و بعد هذه الحلقة لدي حلقة اخرى تبدأ من 101 حتى 300 و يتم تنفيذها بعد انتهاء الاولى بـ 7 ثواني
يمكنك التحكم بالمدة من Task.Dealy(x).Wait

ضع زر و مربع نص على الواجهة
في حدث الضغط على الزر ضع الكود التالي و جرب
PHP كود :
   Dim T1 As Task Task.Factory.StartNew(Sub()
 
                                                  Threading.Thread.Sleep(2000)
 
                                                  For As Integer 0 To 100
                                                       TextBox1
.AppendText(Environment.NewLine)
 
                                                  Next

                                               End Sub
)
 
       T1.Wait()

 
       Dim T2 As Task Task.Factory.StartNew(Sub()

 
                                                  Task.Delay(7000).Wait()
 
                                                  For As Integer 101 To 300
                                                       TextBox1
.AppendText(Environment.NewLine)
 
                                                  Next

                                               End Sub
)
 
           T2.Wait()

 
           If T2.IsCompleted True Then
                Dim completed 
As Boolean T2.IsCompleted
                TextBox1
.AppendText(Environment.NewLine T2.Status.ToString "  " completed)
 
           End If 
في اخر الكود فحص حالة Task2 
الان يمكنك الاستفادة من هذه التقنية و معرفة المزيد عنها في مراجعها الرسمية
اللهم لك الحمد كما ينبغي لجلال وجهك و عظيم سلطانك
في حل و ترحال
الرد
تم الشكر بواسطة: thevest_knight , thevest_knight , hassan , hassan
#8
شكرا لك أخي أبو ليلى كفيت و وفيت
الرد
تم الشكر بواسطة: ابو ليلى


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Rainbow [سؤال] ممكن طريقة عمل زر يذهب الي اخر سطر بتيكس بوكس Ali 2020 9 155 13-09-20, 10:12 PM
آخر رد: Ali 2020
  [سؤال] طريقة عمل برنامج دمج ملفات التيكس بوكس Ali 2020 2 92 11-09-20, 07:44 PM
آخر رد: Ali 2020
  [سؤال] طريقة التحقق هل انا وقف علي اخر سطر في اليسة بوكس Ali 2020 1 110 10-09-20, 07:22 AM
آخر رد: diggitalk2017@gmail.com
  طريقة عرض بيانات جدولين في الداتا قريد ZaerAllail 7 247 05-09-20, 01:44 PM
آخر رد: Anas Mahmoud
  [سؤال] هل من طريقة لجعل نص الاتصال في ملف خارجي لكن كلمة سر قاعدة البيانات في موديول؟ WaeLx 6 356 27-08-20, 03:31 PM
آخر رد: حريف برمجة
  طريقة استخراج كمية الاصناف المتألق9 4 322 17-08-20, 07:14 PM
آخر رد: المتألق9
  طريقة جمع الوقت لأكثر من 24 ساعة جيولوجي مبتدئ 5 516 16-08-20, 09:07 AM
آخر رد: جيولوجي مبتدئ
  [سؤال] طريقة تعامل هاتف مع حاسب عبر من USB عبد الناصر موسى 3 304 07-08-20, 01:13 AM
آخر رد: عبد الناصر موسى
  [سؤال] ما هي أسرع طريقة وأضمنها لحذف كل شيء من النص باستثناء الحروف العربية؟ السندبااد 3 312 02-08-20, 05:07 PM
آخر رد: Anas Mahmoud
  [VB.NET] أريد طريقة البحث بين تاريخيين sql server / vb.net 20410 RADOS 4 325 25-07-20, 04:06 AM
آخر رد: RADOS

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم