السلام عليكم ورحمة الله وبركاته
اخواني اريد كود للحصول على قيمة ال( handle (hWnd للبرنامج النشط active الي يستخدمه المستخدم ؟
السلام عليكم ورحمة الله وبركاته
اخواني اريد كود للحصول على قيمة ال( handle (hWnd للبرنامج النشط active الي يستخدمه المستخدم ؟
السلام عليكم ورحمة الله وبركاته
يمكنك استخدام دول API اما الدالة GetForegroundWindow أو الدالة GetActiveWindow
وهذه الدوال لاتحتاج لاى معاملات ويتم الاعلان عنها بالصورة الاتية
Private Declare Function GetForegroundWindow Lib "user32" () As Long Private Declare Function GetActiveWindow Lib "user32" () As Long
إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال
سيتطلب هذا دوال API وبالتحديد FindWindow....
نصنع موديول ونضع فيه هذا الاعلان
Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
ثم من نافذة الكود نضع في Sub
("q = FindWindow(vbNullString, "Put the window title
والله أعلم
In this world I love Islam ,Computer ,Communications ,Electronics and
المسلم كالغيث أينما حل نفع
Don't ever trust machines
الدالة FindWindow تستخدم اذا كنت تريد مقبض نافذة معينة تعرف عنوانها بالكامل اما الدوال GetForegroundWindow , GetActiveWindow فهى تعود بمقبض النافذة النشطة :rolleyes:
إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال
صحيح يبدو أننا كتبنا المشاركة في وقت واحد فلم أر مشاركتك....
على العموم كله ينفع:)
In this world I love Islam ,Computer ,Communications ,Electronics and
المسلم كالغيث أينما حل نفع
Don't ever trust machines
ألف شكر اخواني
رحم الله والديكم :)
هذا الموضوع مغلق.