الموقع العربي الاول للعبة Silkroad Online

الموقع العربي الاول للعبة Silkroad Online (https://silkroad4arab.com/vb/index.php)
-   قسم شروحات لغات البرمجة و التطوير (https://silkroad4arab.com/vb/forumdisplay.php?f=407)
-   -   [VB .NET] كود بسيط ومهم ( انتظار العمليه ثم تنفيذ الشرط ) (https://silkroad4arab.com/vb/showthread.php?t=584622)

Neoon 24-04-2015 11:53 PM

كود بسيط ومهم ( انتظار العمليه ثم تنفيذ الشرط )
 
http://img253.imageshack.us/img253/629/599785054.gif

اهلاً بيكم أعضاء و زوار منتدانا الكرامـ

مرحبا بكم في

قسم شروحات لغات البرمجة و التطوير


اقدم لكم

....
............................


عندك برنامج وعشان تظبطه برنامجك لازم تستنى عمليه في البروسسر تتقفل ثم تنفذ شرطك

يعني عايز تفعل الانترنت منجر ، فلازم تقفل البرنامج من البروسسر وتنتظر لغايت لما يقفل ثم تنفذ الشرط او السطر الي بعده


هو دا الكود

كود Visual Basic


كود:

Dim WaitRunningProcess As System.Diagnostics.Process = Process.GetProcessesByName("aaa")(0)
WaitRunningProcess.WaitForExit()


................................


تم بحمد الله

EL_NSR 26-04-2015 11:18 PM

رد: كود بسيط ومهم ( انتظار العمليه ثم تنفيذ الشرط )
 
تسلم على الكود المفيد

Midget1337 01-05-2015 05:48 PM

رد: كود بسيط ومهم ( انتظار العمليه ثم تنفيذ الشرط )
 
فيه مثال طيب؟ :)

3ashek El7ozn 03-05-2015 12:55 PM

رد: كود بسيط ومهم ( انتظار العمليه ثم تنفيذ الشرط )
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Midget1337 (المشاركة 5190640)
فيه مثال طيب؟ :)

اعتقد لا Copy ~ Past = FTW :thumbup1:

youssef13 03-05-2015 02:33 PM

رد: كود بسيط ومهم ( انتظار العمليه ثم تنفيذ الشرط )
 
اقتباس:

فيه مثال طيب؟ :)



الاستخدام الاكثر شهرة حيكون في التلغيم ..

يتم انتظار الفاحص يقفل برامج مراقبة الاتصالات زي ApateDNS وبعدين يعمل Load للـ Assembly ( اللي هى حتكون السيرفر )

لو محتاج مثال عملى غير كدة .. لتوضيح الفكرة اكتر , ممكن اقدملك مثال بسيط , لكن غير مُجدى وملوش استخدام في برامج عملية ,,


جرب حط الكود دة في Button1_Click كمثال ..

كود:

        Try
            Dim p As Process = Process.GetProcessById(Process.GetProcessesByName("Notepad")(0).Id)
            MsgBox("Process is opened..Waiting it to close")
            p.WaitForExit()
            MsgBox("Process is closed")
        Catch
            MsgBox("Process isn't opened")
        End Try




الشرح


كود:

Dim p As Process = Process.GetProcessById(Process.GetProcessesByName("Notepad")(0).Id)


متغير يحتوى على قيمة البروسيس Notepad في مثالنا دة

جميل

لو حصل خطأ في السطر دة يبقى البروسيس مش مفتوحة .. ساعتها حيتم التوجه لـ Catch ويطلع رسالة بان البروسيس مش مفتوحة .. ودة سبب استخدام جملة Try/Catch

لو محصلش خطأ حيكمل عادى .. حيظهر رسالة بان البروسيس مفتوحة وفي انتظار اغلاقها

بعد كدة ييجى سطر WaitForExit

الكود حيفضل واقف في السطر دة لحد ما يتم اغلاق الـ Notepad ..
اول لما يتم اغلاقه .. الكود يكمل ويظهر رسالة بان البروسيس مُغلقة


youssef13 03-05-2015 03:49 PM

رد: كود بسيط ومهم ( انتظار العمليه ثم تنفيذ الشرط )
 
هو مغلطش علشان اسلوبك يبقى كدة ..
الكلام في الموضوع منتهى .. جارى حذف المشاركات واتخاذ الاجراءات اللازمة علشان اسلوب حضرتك .

Midget1337 11-05-2015 06:18 PM

رد: كود بسيط ومهم ( انتظار العمليه ثم تنفيذ الشرط )
 
شكراً يا يوسف


الساعة الآن 05:26 AM.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.