كود جعل الفورم شفاف بالفيجوال بيسك 6
اليوم جايب لكم كود يبحث عنه الكثير
كود جعل الفورم شفاف بالفيجوال بيسك . Visual Basic 6 .
ضع في الـ ( General )
كود PHP:
Private Declare Function SetLayeredWindowAttributes Lib "user32.dll" (ByVal hwnd As Long , ByValcrKey As Long , ByVal bAlpha As Byte , ByVal dwFlags As Long) As Boolean Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long , ByVal nIndex As Long , ByVal dwNewLong As Long) As Long Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long , ByVal nIndex As Long) As Long Const LWA_ALPHA = 2 Const GWL_EXSTYLE = (-20)
Const WS_EX_LAYERED = &H80000
و في مكان تحميل الفورم
( Form Load )
كود PHP:
Private Sub Form_Load() SetWindowLong hwnd , GWL_EXSTYLE , GetWindowLong(hwnd , GWL_EXSTYLE) Or WS_EX_LAYERED
SetLayeredWindowAttributes hwnd , 0 , 128 , LWA_ALPHA
End Sub
هدا مثال عن التطبيق
بالتوفيق
