Support for GetLayeredWindowAttributes
Posted: Sat Aug 13, 2011 5:14 am
Because PureBasic already supports SetLayeredWindowAttributes, but not getting them.
PureBasic Forums - English
http://www.purebasic.com
https://www.purebasic.fr/english/
Support for GetLayeredWindowAttributes
Page 1 of 1
Re: Support for GetLayeredWindowAttributes
Posted: Tue Dec 10, 2019 8:03 am
+1 still missing
Re: Support for GetLayeredWindowAttributes
Posted: Tue Dec 10, 2019 7:31 pm
It's probably faster to add missing API functions yourself... 
- copy user32.lib (from your desired WinSDK) to ".\PureBasic\PureLibraries\Windows\Libraries"
- create an .imp file and copy it to ".\PureBasic\PureLibraries\Windows"
- edit ".\PureBasic\Compilers\APIFunctionListing.txt" and add the function
Re: Support for GetLayeredWindowAttributes
Posted: Fri Dec 13, 2019 8:11 am
Hi
Code: Select all
Prototype LayeredWindowAttributes(a,b,c,d)
OpenLibrary(0, "user32.dll")
Global GetLayeredWindowAttributes_.LayeredWindowAttributes = GetFunction(0, "GetLayeredWindowAttributes")
OpenWindow(0,0,0,640,480,"",#PB_Window_ScreenCentered| #PB_Window_SystemMenu)
SetWindowLongPtr_(WindowID(0), #GWL_EXSTYLE, GetWindowLongPtr_(WindowID(0), #GWL_EXSTYLE) | #WS_EX_LAYERED)
SetLayeredWindowAttributes_(WindowID(0), $0000FF, 128, #LWA_ALPHA)
GetLayeredWindowAttributes_(WindowID(0), @color, @alpha, #LWA_ALPHA)
;GetLayeredWindowAttributes_(WindowID(0), @color, @alpha, #LWA_COLORKEY)
Debug color
Debug alpha
Repeat
EventID = WaitWindowEvent()
Until EventID = #PB_Event_CloseWindow
CloseLibrary(0)
Re: Support for GetLayeredWindowAttributes
Posted: Fri Dec 13, 2019 2:43 pm
Hi
Code: Select all
GetLayeredWindowAttributes_(WindowID(0), @color, @alpha, @flags)
Debug color
Debug alpha
Debug flags