
And i must also keep this lines ?
Code: Select all
Result=LoadImage(1,#PB_Compiler_Home + "..\Examples\#Commun\bmp2.bmp")
hBrush=CreatePatternBrush_(ImageID(1))
OpenWindow(0, #PB_Ignore, #PB_Ignore, 1800, 1200, "GIF example")
SetWindowLong_(WindowID(0),#GWL_EXSTYLE,GetWindowLong_(WindowID(0),#GWL_EXSTYLE)|#WS_EX_LAYERED|#WS_CLIPCHILDREN)
SetClassLongPtr_(WindowID(0),#GCL_HBRBACKGROUND,hBrush)