Admin
المدير
المساهمات : 175
تاريخ التسجيل : 21/11/2007
العمر : 40
الموقع : https://elshahed.ahlamontada.net
 |  موضوع: كود لنبض الفورم  الأربعاء 05 ديسمبر 2007, 10:32 pm | |
| كود لنبض الفورم
ضع هذا الكود في قسم التصريحات
Option Explicit
Private Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, ByVal bInvert As Long) As Long
Private mb_Flashing As Boolean
ومن ثم ضع هذا الكود في زر اوامر
mb_Flashing = Not mb_Flashing
Timer1.Enabled = mb_Flashing
If mb_Flashing = False Then
Call FlashWindow(Me.hwnd, 0)
End If
ومن ثم ضع هذا الكود في الوقت
Call FlashWindow(Me.hwnd, 1) | |
|
أحدث الصور 
التسجيل 
دخول 
