[Emam emam]

(26-02-19, 08:08 PM)حريف برمجة كتب :

(26-02-19, 04:08 PM)Emam emam كتب :

السلام عليكم اخوتي

بعد تحزيم البرنامج وتستيبه علي الجهاز هناك ايقونه تقوم باخفاء البرنامج ووضعه بجوار الساعه

ولكن هناك مشكله وهي عند الضغط علي البرنامج من سطح المكتب يقوم بفتحه مره اخري.

والمطلوب انه عند الضغط علي البرنامج من سطح المكتب يتم فتحه ان لم يكن مفتوح وان كان مفتوح من قبل او مخفي بجوار الساعه يقوم باظهاره بدل من فتحه من جديد

وجزاكم الله خيرا

اختر Project ثم آخر خيار Properties 
واتبع الصورة :

جزاك الله خير الجزاء اخي  حريف برمجه  

وجعله الله في يزان حسناتك

---

(26-02-19, 08:08 PM)حريف برمجة كتب :

(26-02-19, 04:08 PM)Emam emam كتب :

السلام عليكم اخوتي

بعد تحزيم البرنامج وتستيبه علي الجهاز هناك ايقونه تقوم باخفاء البرنامج ووضعه بجوار الساعه

ولكن هناك مشكله وهي عند الضغط علي البرنامج من سطح المكتب يقوم بفتحه مره اخري.

والمطلوب انه عند الضغط علي البرنامج من سطح المكتب يتم فتحه ان لم يكن مفتوح وان كان مفتوح من قبل او مخفي بجوار الساعه يقوم باظهاره بدل من فتحه من جديد

وجزاكم الله خيرا

اختر Project ثم آخر خيار Properties 
واتبع الصورة :

جزاك الله خير الجزاء اخي  حريف برمجه  

وجعله الله في ميزان حسناتك

---

(26-02-19, 08:08 PM)حريف برمجة كتب :

(26-02-19, 04:08 PM)Emam emam كتب :

السلام عليكم اخوتي

بعد تحزيم البرنامج وتستيبه علي الجهاز هناك ايقونه تقوم باخفاء البرنامج ووضعه بجوار الساعه

ولكن هناك مشكله وهي عند الضغط علي البرنامج من سطح المكتب يقوم بفتحه مره اخري.

والمطلوب انه عند الضغط علي البرنامج من سطح المكتب يتم فتحه ان لم يكن مفتوح وان كان مفتوح من قبل او مخفي بجوار الساعه يقوم باظهاره بدل من فتحه من جديد

وجزاكم الله خيرا

اختر Project ثم آخر خيار Properties 
واتبع الصورة :

جزاك الله خير الجزاء اخي  حريف برمجه  

وجعله الله في ميزان حسناتك

---

(27-02-19, 03:10 AM)elgokr كتب :

وعليكم السلام ورحمة الله وبركاته

اضافة لما قدمه اخى حريف برمجة

للحل الانسب لما تريده فعلاً 

وحتى تعم الفائدة اذا كنت تريد تنفيذ الامر من خلال كود

يمكنك وضع الكود التالى فى لود فورم الرئيسي عند فتح البرنامج

كود :

       Dim myApp As String = My.Application.Info.ProductName
       Dim CheckApp As Process() = Process.GetProcessesByName(myApp)
       If CheckApp.Count <> 0 Then
           ' كود اذا كان البرنامج يعمل
       Else
           ' اذا كان البرنامج لا يعمل
       End If

تحياتى لك

وتمنياتى لك التوفيق

بارك الله فيك اخي  Elgoker     

دائما سباق بالخير 

ربنا يجعله في ميزان حسناتك