منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[vb6.0] جعل مشروع الفيجوال بيسك فوق شريط المهام(في المقدمة) - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [vb6.0] جعل مشروع الفيجوال بيسك فوق شريط المهام(في المقدمة) (/showthread.php?tid=15131)

جعل مشروع الفيجوال بيسك فوق شريط المهام(في المقدمة) - shamal - 16-03-16

السلام عليكم
عند تصميم مشروع بسيط في الفيجوال بيسك متكون من نموذج واحد او اثنين
كيف يمكن جعل النموذج في المقدمة (او مع مستوى شريط المهام)

RE: جعل مشروع الفيجوال بيسك فوق شريط المهام(في المقدمة) - Ahmed_Mansoor - 17-03-16

أهلا أخي الكريم , ضع هذا الكود في Module جديد :

PHP كود :
Public Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Public Const HWND_TOPMOST = -1
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOSIZE = &H1 

وضع هذا السطر في حدث الـ Form_Load في الفورم :

PHP كود :
SetWindowPos Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE 


RE: جعل مشروع الفيجوال بيسك فوق شريط المهام(في المقدمة) - shamal - 18-03-16

السلام عليكم
اشكر اخي الكريم على سرعة الاجابة والرد