كود لفتح برنامج مصغر في taskbar واظهاره

[hosslom]

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

أخوتي الكرام 

عندي برنامج تم عمل minimize له في ال taskbar وليكن برنامج windows media player 

محتاج كود اكسس لتكبير البرنامج maximize وإظهاره 

هل يوجد طريقه؟؟

شكرا جزيلا أعضاء المنتدي الكرام

 

 

 

 

 

 

 

 

[الحلبي]

7 ساعات مضت, hosslom said:

محتاج كود اكسس لتكبير البرنامج maximize وإظهاره 

توجد امثله كثيرة على تصغير اى برنامج بجوار ساعة الجهاز ( ابحث بكلمة بجوار الساعة)

[Moosak]

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

هذا كود API  وظيفته نقل التركيز من نافذة الأكسس إلى برنامج آخر أو إعادة التركيز إلى نافذة الأكسس مجدد :

#If VBA7 Then
    Public Declare PtrSafe Function SetForegroundWindow Lib "user32.dll" (ByVal hwnd As LongPtr) As LongPtr
#Else
    Public Declare Function SetForegroundWindow Lib "user32.dll" (ByVal hwnd As Long) As Long
#End If

الدالة تحتاج إلى المعامل التالي hwnd  للبرنامج الذي تريد التركيز عليه سواء كان الأكسس أو برنامج آخر ( بعدما تكون قد فتحته كـ Object ) ..

وطريقة استدعائه كالتالي :

    SetForegroundWindow oWMP.hwnd  'windows media player

    SetForegroundWindow Application.hwnd  'Access

 

[hosslom]

4 ساعات مضت, Moosak said:

    SetForegroundWindow oWMP.hwnd  'windows media player

    SetForegroundWindow Application.hwnd  'Access

شكرا اخي الكريم علي الاستجابه والاهتمام

انا جربت الكود ولكن لايعمل معي

جربته علي برنامج الواتساب لسطح المكتب ولكن لايعمل يظهر رساله object required

معلش ممكن مثال صغير للكود جزاكم الله كل خير جعله الله في ميزان حسناتك

تم تعديل أكتوبر 16, 2022 بواسطه hosslom

[Moosak]

7 ساعات مضت, hosslom said:

ممكن مثال صغير للكود

تفضل أخي ..

استخدمت نفس الكود هنا :