hi VB Forums
i have vb code for making a form transparent, but that code has got 1 problem- it with that code if u click in the form area it takes click to the window behind that form
here's the code im using:
so i want my form fully trans-parent but dont want any interactions with window behind it.....Code:Option Explicit Private Declare Function GetWindowLong Lib "user32" _ Alias "GetWindowLongA" ( _ ByVal hWnd As Long, _ ByVal nIndex As Long) As Long 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 SetLayeredWindowAttributes Lib "user32" ( _ ByVal hWnd As Long, _ ByVal crKey As Long, _ ByVal bAlpha As Byte, _ ByVal dwFlags As Long) As Long Private Const GWL_EXSTYLE = (-20) Private Const WS_EX_LAYERED = &H80000 Private Const LWA_COLORKEY = &H1& Private Const LWA_ALPHA = &H2& Private Sub Form_Load() 'Set the Form transparent by color. BackColor = RGB(127, 127, 0) 'Unique but explicit (non-system) color. SetWindowLong hWnd, _ GWL_EXSTYLE, _ GetWindowLong(hWnd, GWL_EXSTYLE) Or WS_EX_LAYERED SetLayeredWindowAttributes hWnd, BackColor, 0, LWA_COLORKEY End Sub
if anybody have code then please post it here.
Thank you
Boing




Reply With Quote