كيفية عمل مسج بوكس تظهر لمدة ثم تختفي - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : الأقسام التعليمية - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=90) +--- قسم : مكتبة أكواد المنتدى (http://vb4arb.com/vb/forumdisplay.php?fid=111) +---- قسم : مكتبة أكواد الفيجوال بيسك 6 (http://vb4arb.com/vb/forumdisplay.php?fid=116) +---- الموضوع : كيفية عمل مسج بوكس تظهر لمدة ثم تختفي (/showthread.php?tid=5879) |
كيفية عمل مسج بوكس تظهر لمدة ثم تختفي - RaggiTech - 17-10-12 كاتب الموضوع : AhmedEssawy
منقولة من المنتدى القديم للأخ بدرميديا .تعتمد هذه الدالة على معرفة الهاندلر Handler الخاص بالمسج بوكس لتستطيع بعد ذلك التحكم بها واظهارها واخفاءها كما تريد من خلال مجموعة من الأرقام والقيم قام الأخ بتعريفها في أول الكود مثل الثابت : NV_CLOSEMSGBOX والذي يعني الرقم &H5000 وهو الذي يتم استخدامه ارساله في العملية ولكن هذا التعريف لتسهيل الأسماء فقط . لاحقاً سيقوم بالاعتماد على مجموعة من API's للبحث عن المسج بوكس ومن ثم تفعيلها ، يمكنك في هذه الحالة استخدام أمر SendKeys لارسال ضغطة زر Enter لاغلاق المسج بوكس . نكتب في الموديول كود : Public Const NV_CLOSEMSGBOX As Long = &H5000& كود : SetTimer hWnd, NV_CLOSEMSGBOX, 4000&, AddressOf TimerProc |