Verfasst: 25.08.2005 22:18
Geht aber nur unter XP:
Code: Alles auswählen
OpenWindow(0, 200, 200, 300, 200, #PB_Window_SystemMenu | #PB_Window_SizeGadget|#PB_Window_Invisible , "Schattentest")
#CS_DROPSHADOW = $00020000
If SetClassLong_(WindowID(0),#GCL_STYLE, #CS_DROPSHADOW) = 0
MessageRequester("","OS unterstützt das nicht!?")
EndIf
HideWindow(0, 0)
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow